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ゲー ム も 仕事 も スピ ー ド スタ ー ト 

クイ ッ ク テ イィ スク (QD) 
フロ ッ ピ ー の 高速 性 と カセ ッ ト の 経済 性 を 備え 
た 新しい 記憶 装置 で むれ プロ グラ ム や デー タ を 
読み 取る スピ ー ド は 、 何と カセ ッ ト の 約 30 倍 
(当社 2000 ボ ー の デー タレ コー ダ 比 )、 も う 気 
持ち の 乗り も 違っ て きま す 。 


キャ ラク タプ くり も 自在 、 き わ だ つ グ ラフ ィ ッ ク 
PCG1000 文 字 

グラ フィ ッ ク は ひと 味 違 う ク リエ イ テ ィ プ ブ 設計 。 
1000 文 字 の PCG ま た は 320x200 ド ッ ト 8 色 フル 
グラ フィ ッ ク +24 文 字 の PCG が 使い 分 けら れ 、 
目的 に 合わ せ て オリ ジ ナ ルル グラフィック が 存 分 
に 駆使 で きま す 。 


音楽 演奏 だ っ て お 手 の も の 
PSG2 チ ャ ン ネ ル 

パン コン を より クリ エイ ティ ブ に 活用 する た め の 
サウ ンド 機能 と じ て 6 オ クタ ー プ 3 重 和 音 の PSG 
を 2 チャ ン ネ ル 内 蔵 。6 重 和音 の 音楽 と 2 つの 
効果 斉 が 楽し め 、 音楽 演奏 、 サ ウン ド 効 果 に 
グン と 厚み を 増し て きま す 


日 本 語 表 示 、 ワ ー プ ロ へ の 活用 も 
漢字 対応 QD-BASIC 

漢字 対応 BASIC を は じ め 、 漢字 ROM ボー ド 
(オプ ショ ン )、 辞 書 ROM ボ ー ド (オプ ショ ン ) の 
サポ ー ト な ど ワ ー プ ロ へ の 対応 も 考慮 じ て い ます 


上達 に 合わ せ て 進化 する 

64 に KB オー ル RAM の クリ ー ン 設計 
BASIC 以 外 の 言語 へ の 発展 性 を 秘め た 、 
いわ ば あな た の 上 達 に 合わ せ て 進化 する 
シス テム 設計 で す 


人 き 能力 を グン と アッ プ さ せる RAM フ ァイル (オプ ショ ン ) 
「 ボイス ボー ド ( は オプ ショ ン ) を 使え ば 、MZ-1500 が し ゃ 
べ る パソ コン に 。 鞭 「 パ ター ン エ ー ス 」「 住 所 録 」「 ミ 
ДВ Ау TET- 」 ШЕ, ЖӨГ ТОН 
か ら 即 使え る ソフ ト を バン ドル 。 


"ショ イシ ジョ ブック " 
PORKE l! 


家族 ひと り ひ 上 り が 楽し め ゆる 7 種類 の 新しい 


DUD ツ フト を リン シッ パッ 多 
JOY JOY PACKII м2-5400 


幅広 い 年 令 層 に Ж i оЕљочжи, — > ë 
Е Соу 
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ゲー ムセン ダー や ファ ミリ ー コ ンピュータ で 人 気 の 高い テニ ス 
が MZ-1500 で 楽し め ま す も 

ワー プロ оз,» 

stry- ペン シル 
家族 みん な で 活用 で きる 、 学習 機能 付 ワ ー プ ロー カレ ン 
ダー 機能 。 ス ケ ジ ュ ー ル も 書き 込め ます , 
4 ママ キー パー | 
ЯН >2(012%55222>>ЖТЖАЛЗ»У2ОС1»Н 
の トー タル も エッ チリ 。 


5 スタ デア ・ ベイ 人 
楽し みな が ら 学 習 で きる 、 堅 苦し い 勉 強 ソ フト と は ひと味 
違っ だ い わ ば パン コン 暗記 カー ド 。 


6 45/ ビ スタ ディ 


いち いち マニ ュ ア MERAN Eb: 画面 と の 対話 形式 で 
BASIC の 基礎 学習 が で きま すれ 


で WI 
誕生 パー ティ を は じ め 楽 し い 集い を 効果 的 に 演出 LC てく れる 
グ " ラ フッ クソ フト で すむ 


標準 価格 16.800 円 


好評 JOY JOY PACK I (MZ-5A001) 標 準 価格 16.800 円 も 発売 中 / 


ТІЛ ШАМА,» —” 
HERR 


三波 豊和 ・ 白 石 ま る み 


ソソ コン ザ サンデー" 
ガブ ジ ジ ナ ルン シフ 人 募 葉 / 


募集 期間 : 昭和 60 年 5 月 1 日 一 7 月 31 日 (消印 有効 ) 

応募 方 法 : Ф 一般 部 門 」( 中 学生 以上 ) と 「 ち び 
っ 子 部 門 」( 小 学生 以下 ) に 分 け て 行 
いま す 

Вр ゲー ム ・ グ ラフ ィ ッ クス ・ ビ ジネス な ど 
各種 ジャ ン ル の 作品 を 募集 し ます 
倫 作品 は シャ ー プ パソ コン MZ シ リー ズ ・ 
X1 シ リー ズ 用 ソフ ト に 限り ます 
答 作 品 は 未 発 表 の オリ ジ ナ ル 作品 に 
限り 、 一 人 5 点 ま で の 応募 と し ます 

Ж 表 :「 パ ソコ ン サ ン デ ー,」9 月 22 日 放送 内 で 
発表 し ます 

応募 先 :〒540 大 阪 市 東 区 京橋 前 之 町 2-2 

テレ ビ 大 阪 ! パ ソコ ン サ ン デ ー ソ フト 募集 |Ж 
mi 部 門 


DF 


他 、 метр 多 数 
_ ちら び っ こ 部 門 


“ちび っ こ 大 賞 ” aR Se SEA) RRS ea ire aS 1 
^Dr. パ ソ ュ ン 賞 …… ド ドド ドー 1 
他 、 有 豪華 商品 多数 
> 詳しく は 最寄り の パソ コン ショ ッ プ で 
お た ず ね くだ さい 。 


レマン コン スズ スクー リンク, の お 移ら せ …… 

血 講 習 場 所 : シ ャ ー プ 東京 支社 パソ コン 教室 容 03(260) 
生日 時 :5 月 30 日 朴 PM5:00 一 8:00・6 月 15 日 中)/ 

6329Н  #РМ1:00—4:00@ 8: 5202 (Ж BI(- 

уена) Фан 1 000 円 


Mt -MARIL Í жн тоз 大 阪 市 阿倍 野 区 長池 町 22 番 22 号 佑 (06)621-1221( 大 代表 ) @ お 問い 合わ せ は … 本 社内 国内 情報 シス テム 営業 本部 まで 


パー ソナ ルコ ンピュータ 
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票 準 価格 89.800 円 

p 写真 の 14 型 カラ ー デ テイ スプ レイ М2-10 15B 
標準 価格 72,000 円 は オプ ショ ン 
画面 は ハメ コミ 合成 で す 
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Personal Computer 


信頼 と 創造 の 富士 通 


TIRIK R IIÍ Fo 


ドア ドア tt ドド に ーー 5 400 円 
バイ スク ー ル アド ベン チー ра 5,6003 
地獄 の 練 z 問題 %%%44....шеш өзеее зе... 6,800 円 
АТАСЫНА, ТТТ ТЕТІН 11000 円 
ザ ・ ナ イト オプ . ワ ンダ ー ラ シド )… 付 000 円 
ТЕА... 9.80089 
リキ ャ プチ ャ ー ....вв”!.-..!ө б өз өз. 9800 
F Z23252 В asua ih. А, 16.800 円 
信長 の 野望 %%%%%%990%%%0өөө еб ЛК 6.800 円 
団地 妻 の 誘惑 жб sisa EN RC 6.800 円 
イド ライザ イフ "оек өө өө өөө 00 өөеееесесегее 7.80089 
Е, ТИЧОРАТ 6.800 A 
ダン ジョ ン ...өвв!швшеееаекеөгееевее 0 ) 7.800 円 
コリ ドー ルー ドド ドド ドド ーー 6.800 円 
ザ ・ コ ッ ク ピッ ト wa د وای‎ oie w кеке ө ary の 5.800 円 
エー トイ ーー ドド に 6.800 円 
マイ ナー 2049 ОТТЕ 6.800 ІҢ 
バグ ・ ア タッ ク АТТ 6.800 円 
ミス ター・ ロ ボッ ト ОТЕ 6,8008 
ハイ 人 人 6.800 円 
クラ イシ スマ ウン テン ...........шш а: 6,800 円 
70) EE 6,800 A. 
УАУ, ОНУ 6.800 円 
0 АУ» ДЕНТІ ahi 6.800 
RAT ӘУ АЛЫ ЫСЫН E ТО 6.800 A 
スワ ッシュ パッ クラ АН ТТ. 6,800 A 
新 プロ フェ ッ シ ョ ナル 麻雀 ………… 6.800 円 
クラ ンス ドン マー i eas i 12800 円 
ユリ シー ズー 12800A 
ブラッ ク プー ル の 剣 | 9800 円 
ESSE PEE НЫД cos 9,800 A 
ОРВА Ает" 12,300 A 
PERYF ЭК 8.800 3 
улат ARA TIDA saas eiai 8,800 F3 
IREZ 5—........................ 4 800 円 
ギャ ラベ ー タ ー・ ス ー パ ー ト ラン ポリ ン 4 800 円 
Mr.HEADING tee 4 800 円 
Lode Runner で に に に に eee 5 800 円 
СНОРЦІЕТЕВ::-55555555555555-9-.... 5800 3 
ウォ ル ガ ー ドー 6.800 円 
フラ ッ ピー DDO 6,800 円 
3-D ゴル フシ ミュ レー ショ ンス ー パ ー バ ー ジ ョ ン 
ece ea se E e 6.800 A 
スタ ー ア ー サ ー 伝 説 惑星 メ フ ィ ウ ス 6.800 円 
スタ ー ア ー サ ー 伝 説 II 暗黒 星雲 …・6.800 円 
スタ ー ア ー サ ー 伝 説 軸 テラ 4001……6.800 円 
サン ター・ フ ォ ー ス コン スト ラク ショ ン ……… 6.300 円 
フフ ラス ズ スマ ・ ラ イン ドー ドー トド ドド ドー ドー 6.900 円 
7% ッ ク マ ン 8...вш!.швш d Anneke pa besas наьаа 5.800 A 
ラリ ーー ドド ドド ドド ドド ーー 580018 


マイ コン スカ イラ プ : FM シリ ー ズ の ハー ド か ら ソ フト まで 一 挙 に 展示 実演 、 あ な た の パソ コ ン の コン サル タン ト と し て ご 活用 くだ さい 。 
e 仙台 (0222)66-8711 


(011)222-5476 


富士 通 株 式 会 社 : @ ハ ソコ ン 販 売 推進 統轄 部 (03)216-3211 @ 北海 道 支店 (011)271-4311 
@ 名 古屋 支店 (052)201-8611 


ゼビウス ( ジョイスティック 付 )……… 9300 円 
ジン ンド 580083 
LAN РТР КЕЯ 5 800 円 
女子 大 生 プ ライ ベー ドド かー …… 6.200 円 
異 炊 元 か ら の 脱出 ……… パ … パ の ………… 5.800 円 
スー パー ホロ スコ ー プ 漢字 版 ……… 7.800 円 
RO E O E E 87001 
し 7 と スー 7200 円 
サラ ダ の 国 の トマ ト 姫 …………… 6,8009 
ا‎ E E A E 9800 円 
アー ケー ド ・ オ リン ピッ クス ……………・ 6,800 A 
il E атуға, TE O O АҚАН 5800A 
Be 58003 
OE 2222 А ААҚ on ES 5 800 円 
あー な BEAT E 5,800 3 
太 ン ギー ラン ドー 6,800 3 
ゴル ゴ 13 foo TE 4 800 円 
スー パー タロ ッ ト …… 上 … パ ドド ドド ーー… 9.800 円 
ЕНЕ СЫ NO а 6.500 円 
SKIN е RS 発売 予定 
ЖЕ OO① 〇 で ドド ドド トー 発売 予定 
ОА» Бел АРАП ТКТ ТЕР ТЕ ИНЕ САНАСЫН 6800 
オラ ンダ 妻 は 電気 ウナ ギ の 夢 を 見 る か ? 
pasak O a ua su, 0 7.800 円 
Р GILE BRI 14 800 円 
ар А WAP CT 12 300 円 
シャ ー ウ ッ ド ・ フ ォ レ スト .4%.......... 11,800 円 
3 se 14 800 円 
УЛАК ОИ КЫП S TEE > 。 1980018 
Жеке уа» ИД тШ: 7.800 円 
スト レン ジ ・ オ デュ ッ セ イ ………… ド …… 8800 
ЖО ЬУ, S REEE ЫШ 8800 円 
アマ ゾン 学術 探険 ………… ド ー…… 9,800 A 
E E 56-65% 9,800 A 
ARR FP rea aa 発売 予定 
パ バック ギャ モン ・ エ クセ レン ト en 7900 円 
WEIRD・2 LOOK ナミ ミミ ミト ミミ ミミ ドミ すす すす すす すす すす 発売 予定 
ТІМЕРТИЕКЫ Мы Guau ui 発売 予定 
DE ae Ex 0 Т УАР RE 6.800 円 
狼 男 殺人 事件 … 〇 ひ ぬ ホ ド ホバー バ … ド トド ……- 6800 
ピン ボー ル ゲ ー ム ロッ クン ロー ラー …6.900 円 
チャ ン ピ オ ン バル タダ ダッ シュ ……… ド …ー 6.800 円 
BRODER S EAE TST 7.800 円 
さよ な ら ジ ュ ピ ター アド ベン チャ ー……:5 800 円 
UNDER SEA ҒІЕЕТ:·:::--::::..... 5.000 円 
БӘТ ҚУА рел ылы 5000 
ЖАРҚЫН m I u a 5.000 円 
КАРУ ИП. АА лы ТШ. 5000 
CP-YOU-FMD VER.1.00 18,000 A 
КШ КИК ЕЛАНА АКЕН» 8.80085 
MIDI コ ン ヒ ュ ミ ュー ジッ クソ フト ウェ ア MCP-FM77……… 
EO GE ae v aT ar 18,000 A 


ҒМ-ЖЖҰНУ)-591-3%Ң ҰШ 各 6.800 円 


F M- 若 葉 府 シリ ー ズ 受験 用 英 単 語学 習 ……7.800 円 
FM- 若 業 季 シリ ー ズ 中 1-3 英 文法 学 習 各 6.800 円 
FM- 若 業 藝 シリ ー ズ 受験 用 英文 法学 習 ……7.800 円 


РМЗ 7-Х 91-34868 各 6.800 円 
FM- 若 葉 府 シリ ー ズ 受験 用 英語 重要 文型 学習 … 7.800 円 


国語 算数 学習 1 年 生 Eê e da êre Sa Br 13,800 A 
国語 算数 学習 2 年 生 STEET эр aa 14 800 円 
国語 算数 学習 3 年 生 Se os sooo aees oie ооо 15,800 円 
国語 算数 学習 4-6 年 生 ……… 各 16.800 円 
中 学 数 学 13 年 生 …………… 各 18.000 円 
記 学 習 理論 編 1 RG ов giera s pina; 7 .400 円 
注記 学習 問題 編 Pe аө өө k... š... өэ s... 7.400 A 
電 訳 パソ コン 英語 編 ……………… 9800 円 
お も し ろ タイ プ 英 文 十 仮 名 ………… 6,000 F3 
ニュ ー ホ ライ ズン 中 1 -3 用 マイ 英語 レッ スン 各 7.000 円 
ニュ ー ブ リン ス 中 1 -3 用 マイ 英語 レッ メン 各 7000 円 
ニュ ー ク ラウ ン 中 1-3 用 ………… 各 7000 円 
マイ 数 学 レ ッ ス ン 数 ]-1 正 の 数 負 の 数 < 小数 ……8.800 円 


マイ 数 学 レ ッ ス ン 数 1-2 文字 式 の 計算 8800 円 
マイ 数 学 レッ スン 数 1-3 一 次 方 程 式 … 8.800 円 
マイ 数 学 レッ スン BII RORE 8,800 A 
マイ 数 学 レッ スン 数 II-2 連立 方 程 式 …8.800 円 
マイ 数 学 レッ スン 数 II-3 不等式 …8.800 円 
マイ 数 学 レ ッ スン 数 皿 -1 多項式 の 計算 8800A 
マイ 数 学 レッ スン 数 皿 -2 平 方 根 の 計算 8.800 円 
マイ 数 学 レッ スン 数 皿 -3 二 次 方 程 式 …8.800 円 
パソ コン 算数 博士 た し ざん ・ ひ き さ ん 7000 円 
パソ コシ 算数 博士 か け ざ ん ・ わ りさ ん 700A 
マイ 仏語 レッ スン 発音 練習 テー プ 付 16.800 円 
中 学 数 学 マス ター シリ ー ズ D] 連立 方 程 式 …・5.000 円 


中 学 数 学 マス ター シリ ー ズ D2 図形 -]1………・ 5,000 円 
中 学 数 学 マ スタ ー シ リー ズ 03 式 の 展開 …… 5.000 円 


中 学 数 学 マ スタ ー シ リー ズ D4 一 次 関数 と グラフ (|) 5.000 円 


中 学 数 学 マス ター シリ ー ズ 15—АЮҢ 2772) 5.000 円 


中 学 数 学 マス ター シリ ー ズ D6 一 次 関数 グラ フ (3) 5.000 円 
中 学 数 学 マス ター シリ ー ズ D7 一 次 方 程 式 …5.000 円 
中 学 数 学 マス ター シリ ー ズ D8 一 次 不等式 …・5.000 円 


中 学 数 学 マス ター シリ ー ズ D9 図形 2……-5.000 円 
中 学 数 学 マス ター シリ ー ズ D10 最大 公約 数 と 最小 人 数 
ҚАЛАЛА арда а dats ла АТТАР KYO KK 5,000 ІҢ 
中 学 数 学 マス ター シリ ー ズ 011 因数 分 解 ……5.000 幅 


中 学 数 学 マス ター シリ ー ズ D12 二 次 方 程 式 … 5,000 円 
中 学 数 学 マス ター シリ ー ズ 013 統計 と グラ フ …5.000 円 
らく らく 学習 シリ ー ズ ニュ ー 算 数 は か せ A・B 


SA は ee ЗИ. 各 7.000 円 
マイ 英語 レッ スン 高校 受験 用 …… 発売 予定 
英語 学習 中 学 1 年 一 3 年 ……… 各 13.500 円 
ハロ ー キ ティ の か いも の ゲー ム ……… 10.000 円 
CAL 会 計 学 仕訳 編 … ド ーー………… 25.000 円 


めき めき 〈 ん シリ ー ズ NFER Л РУМО. I~ 1: 

OSes S w Qw о EEE е 各 7.000 A 
めき めき 〈 ん シリ ー ズ 小学 4 年 算数 計算 編 Vol.I~V…… 
ооо ооа ао «Айшаға ы жана ваа a 発売 予定 
めき めき くん シリ ー ズ 小学 5 年 算数 計算 編 V.1- V …… 
Se OARS res Cae йене Ts ra 発売 予定 
めき めき くん シリ ー ズ 小学 6 年 算数 計算 編 Vol.I~IV …… 
аф реба өе дф аза нене селте Жете aus... WW 発売 予定 
めき めき くん シリ ー ズ 中 学 英語 プリ ンス 1 年 3 年 ( 全 9 巻 ) 

е А кру а a КҮЧ еа осв еее ts eet を な 発売 予定 
めき めき くん シリ ー ズ 中 学 英語 ホラ イズ ン ] 年 3 年 ( 全 9 巻 ) 
ДРТ Аске ЫЕ, E РИМИНИ 発売 予定 
めき めき くん シリ ー ズ 中 学 英語 クラ ウン ] 年 3 年 ( 全 9 巻 ) 

EET qa TITTARE аала н OE 604 発売 予定 
@ 教 育 管理 

SCHOOL/UP 40 ее 29800 
E・E・S NO.2 экөө RE TT EY 14,800 円 


0 日 本 語 ワ ー ド プロセッサ 

ЈЕТ-ЕМ + АЗАА АИА 26,8003 
COMAS-V3E ТОЕ 33.000 円 
COMAS-V3G ааа ааа аата ына ан 55,000 A 
COMAS-V3S ыла ааа а orah a ж 75.000 円 
STYLOGRAPH ааваа ааа Ж Еа 48,000 FJ 
SPELLING CHECKER………… 48,000 F3 
Word біагееееее еее 125,000 円 
Spell Фаг: 38.000 円 
Май Мегде все есе ia кизее 38,000 A 
PN-101 Ran OA E a a 18,000 円 
PN-101(400 ラ イン 対応 )……… 28,0003 
РМ-101/П LLLE КККК ГУЛУ ГГ 38,000ҒН 
PN-101/II(400 ラ イン 対応 )…… 発売 予定 
日 本 語 ワ ー ド プロ セッ サ ( ユ ー カ ラ ,(400 ライ ン 対 応 ) ……… 
еее аео ТКЕН E E E T 発売 予定 
Sura Sura ПАРТЕ ОЕ Каа ыы 20,000 円 
FM-JWP/77……… 400 ライ ン セ ッ ト に 添付 
@ 英 文 ワ ー ド プロ セッ サ 

イー ジー ライ ター・ ス ー パ ー Ver.II 20.000 円 
Text Processer Cr トイ 25,500 円 
@ñh5 = ss 

PN-401 ЖҰЛЫННАН q ӨЗ Ө Қа sassa ea 発売 予定 
PN-401(400 ラ イン 対応 ) ……… 発売 予定 
ЕМ TSS Cu Қ Raa ua i 16.000 円 
ЕМСДЕС» 55 РЛЫ ЛЫ ss 48.000 円 
FMCALC ワ ー ク シー ト ……… ド ドド … 9.800 円 
Hu CAL 日 本 語 ……… ひ …… ド ……… 発売 予定 
Hu CAL 日 本 語 (400 ラ イン 対応 )‥ 発 売 予定 
NEW-VIP Excellent……………… 19.800 円 


@ 東 京 ・ 妨 の 内 (03)215-2392 東京 秋葉原 (03)251-1448 札幌 < 時 計 台 ビル > 


@ 名 古屋 < 第 2 アメ 横 ビ ル >(052)251-7231 @ 大 阪 (06)344-7628 341-0486 @ 広 島 (082)247-3949 ө 福岡 < 開設 準備 室 〉(092)471-7203 
@ 東 北 支店 (0222)64-2131 金沢 支店 (0762)63-7621 長野 支店 (0262)26-8222  ew 静 岡 支店 (0542)54-9131 
@ 大 阪 支店 (06)344-1101 e 広島 支店 (082)221-2288 e 高松 支店 (0878)51-8167 ө 九州 支店 (092)411-6311 @ 沖 縄 支 店 (0988)66-0655 


3 5 イン チマ イク ロフ ロッ ヒ ィ ディ スク 感 。 あ な た は 、@⑲ ン フト が し っ ぱい な こと /F/M-// 盛 に 200 
種類 以上 の ソフ ト が ずら り 。 新作 ソフ る 続 そく 登場 で タフ な こと (プラ スチ ッ ク の ハー た 


ケー ス 。 KIJ St FPF YI BEUTLER O ハン ティ な こ 
ら な い コ ン パ クル ト ザ イズ 。 ЖҒУМСАИОИҒЫЕОСа3%203125 
成績 を お さめ られ た の で ここ に 表彰 し まあ ーー 


әтетеед 

英文 文献 検 索 イー ジー アク セス 」25.000 円 
Letter Bank oes aaa... aa 33 0003 
COMAS-KZE ....вшғ:%%%%%ееө өз егеееее, 55.000 円 
COMAS-K2G Ir 85.000 円 
COMAS- KIB Noses ES 99.8003 
独占 // 情報 管理 1.4%%%............. 15.000 円 


マル チマ ッ ト 27……(… ド mm 29.000 円 


PN-301 


…30.000 円 
PN-301(400 ラ イン 対応 )………… 発売 予定 
SUPER PPG ピカ ソン "rm 13.000 円 
SBIR ドド ドド ーー ドー 35.000 円 
等 高 線 作画 КҮРТТТІГГТТТГТІТ 100.000 円 
@ グラフィック 
グラ フィ ッ ク ペ ン で [ii の 40.000 円 * 
TRACE…… ド ドド に 36.000 円 
実戦 / ООБА) з-ду! 20.000 円 
実戦 / QC 管理 (B) eneren 20.000 円 
НИВА: е 15.000 円 
パタ ー ン エディ ター ドド ドド ドー 7.000 円 


スー パー グラ フィ ッ ク エ ディ ター ・6.800 円 


実戦 / 在 庫 管理 … 15.000 円 
実戦 ググ 仕 入管 理 ee 15.000 円 
実戦 / 販 売 管理 ……………… 15.000 円 
実戦 顧客 管理 (自動 車 販売 ・ 整 備 業 用 ) 
ЕКЕ Se еы ББ ИМА ЫРДЫ ОЕ 50.000 円 


実戦 / 顧 客 管理 (一 般 販売 店 用 )…50.000 円 
実戦 / 顧 客 管理 (電気 店 ・ ク レジ ッ ト 店 用 ) 


E E E i ad tt eae 50.000 円 
独占 (E ШЕ с 15.000 円 
商売 繁盛 К КУТТ ТЕ 298008 
FM-ZAIMU/ II %.444%4%%%% еше еш еше ее 180.000 円 
ЕМ-ВАМК:5 55555 ІҢ 発売 予定 
出納 くん ЕЕ 10 0008 
財務 会 計 2.4 ЛО ОООО 68.000 円 
ワー プロ 付 手紙 例文 集 ・……………… 29.800 円 
39 シ リ ー ズ 給与 計算 ЕНЕ 39.000 円 
39 シ リー ズ 売 上 管理 ……… ひ ………… 39.000 円 
39 シ リー ズ 仕 入 管理 essssossesoesoooe 39.000 円 
39 シ リー ズ 在 庫 管理 ………… ド … 39.000 円 
39 シ リー ズ 請 求 書 発 行 …………… 39.000 円 
39 シ リー ズ 顧 客 管理 44%............ 39 .000ҒН 
スー バー 漢字 住所 録 …………… 16.500 円 
ЖОЛКУ И. ае 18.000 円 
注射 剤 配合 変化 検索 シス テム (pH 版 ) 発売 予定 
青色 申告 プロ グラ ム ТТІ 50.000 円 
満期 日 管理 ТТЕ 29.8000 
COMAS-K2 給与 ee 119.800 円 


2 が れ た コス トバ 7 


FM-KOKYAKU ПАЧ sp jap das “еле 30.000 円 
FM-KOKYAKU(400 ラ イン 対応 ) 発売 予定 
FM-BANK(400 ラ イン 対応 ) ……… 売 予定 
FM-ZAIMU(400 ラ イン 対応 ) > 発売 予定 


三次 元 座標 基本 ルー チン ……… バ 45.000 円 
多 変量 解析 プロ グラ ム …………… 80.000 円 
ей іледер 2 ыы 50.000 円 


は じ め て の 人 の た め の 土 木 技術 計算 ・22.500 円 
建築 設備 シリー ズ No 空調 負荷 計算 148.000 円 
建築 設備 シン リー ズ No2 風 導 集 計 積 算 .… 45.000 円 
建築 設備 シン リー ズ No3 冷蔵 負荷 計算 ・… 78.000 円 


建築 ソノ トシ リー ズ FM- 積 算 PART | (R) Ver. 2 ……… 
фев ө өө э өэ өөө эө E өө ө э е ы 250.000 円 
建築 ソノ ト シリ ー ズ FM- 積 算 PART 2 (鉄筋 ) Ver.2………… 
E ae rr қылыштан» уак > AT xA 250.000 円 
SUPER MAT RIX s... i. eas oS 75.000 円 
測量 計算 プロ グラ ム 「 ブ プン ピ ツ 」… 350.000 円 
応力 解析 (平面 架構 )V3………… 59.000 円 
実験 計画 法 プ ログ ラム …………… 25.000 円 
土木 技術 計算 プロ グラ ム 1 ……… 20.000 円 


Super Disk Editor 18.000 円 
GPIB IAIN =... 20.0003 
05-9 Utilities-1 E ara L A T 12.000 円 
05-9 Ғійеге-1-е-еееееееее 12.000 円 
文字 列 検索 変更 プロ グラ ム ……… 8.000 円 
プロ グラ マー ズバ パル 66660. 18.000 円 
BASIO ジェ ネ レ ー タ РУЧА РРА 18.000 円 
ファ イル 入 、 門 A AOS wq a g es aaa a a M 18.000 円 
CP・You-F MD/3 Ver.1.00 (イン タフ ェ ー ス 付 ) 
459455 q wy a maia мезет ааа aaa тыда 27.500 円 
кА еке оа) шысын 7 a tide 12.000 円 
ユー ティ リティ …… ツー ドド ドド ドー 37.500 円 
FM-SE ete 28.000 円 
Dyna аг... 75.0009 
Debugpack TTT SS E | 25.500 円 
TERM 6-еліеееевееәегеевеееевеісй4%й4ьел LAN 28.000 円 


3.5 イ ンチ 時 代 の 400 ラ イン バ パソ コン 


FM-"7"7 14 


と (スト ックス ペー スズ を と 
お いて きわめて 優秀 な 


庁 和 60 年 5 月 吉日 、 パソ コン 愛好 家 一 司 。 


6809 Dis АѕѕетЫег: +++: 30.000 円 
Support Pac-77 で の ei の 30.0003 
6800 Cross АззетЬег + 48,0003 
6800/2 Cross Assembler……… 48.000 円 
6801/3 Cross Assembler: 48,0003 
6301/3 Cross Assembler……… 48,0003 
6805/6305 Cross Assembler……48.000 円 
GD I i ia 30.000 円 
ロビ LADOS? NEEE E EE А 9 800 円 
スー パー Т 00577 АРРА, 6.90009 
DIS ASSEIMBEE = の で come 9.800 円 
ЕВСР/М №10 ра оа фода ся аа 19.800 円 
OPIN ユー チ ィ 9 チ ポ らい mhr 15.000 円 
OK НМ ES nuy ESE 12.800 円 
САР-Х % СОМР-Х сооб обоо ноев ёв 発売 予定 
дебид-боу-“езезезезеееев 12.000 円 
Word Маѕіїег: + 38.000 円 
Super Sorteeri seriesas 63.000 円 
F-BASIC TOOL: BOX V1.0 …… 22.000 円 
GPIB 用 拡張 F-BASIC…………… 82.000 円 
BASIC TOOL-AD +++ ++ 7.90089 
СОВЕ - AD РРР РУ 7.90009 


FORCE- AD er 6.900 円 


63.000 円 

48.000 円 
O E E 68.0003 
Intro-C Сотріїег- srs 237.500 円 
A/BASIC Compiler eesin ira 37.500 円 
BA SO уан ТЕТЕ АТЫ 375008 
Exton BASIO sapre 50.000 円 
(2 Compiler ео ооо o... 0 во воно dems еа 175.000 円 
ЕОВТВАМ-%--ееееееез 210.000 円 
раа аа да ДА 7 800 円 
ASSEMBLER-AD 4444.............. 9.80003 
lisp-PROLOG ooo 58,0003 


Ұ238,ОООоввв-ғм гө 


デス ク と ソフ ト で 差 を つけ る 天才 パソ コン 


ҒМ-77 


EVE -NWZ x99, 800( 本 体 価格 ) 


атн 


\228.000( 本 体 価 格 ・F M Logo 付 ) 


moro- PROLOG Зу ета 72.000 円 
F-BASIC V3.5……… 400 ラ イン セッ ト に 添付 
СР/М-80 У2.2 L2.0…… Z80 カ ー ド に 添付 
FM-Logo У20-ее-ееееезе- 16.000 円 
05-9 Level 1-ееееееееее” 48,0003 
05-9 Level 2: 58.000 円 
НОТ ШМЕ-80-----: +: 50,0009 
HOTLINE-1200-:: i... 80.000 円 
ВТАМ-80----ееееееееее 198.000 円 
TTY ファ イル 転送 / フ ルレ スク リー ン …… 50.000 円 
FM FILE TRANSFER………… 18.000 円 
ЕМ-СОМ-%----““.  “ҡ ң 32.000 円 
Теіеѓаік- +... ненен. 18.000 円 
FT 18.000 円 
ІМЕТ-80<--ееееееееее- 150.000 円 
RJE -80 eae eee e o e ea 140,0003 
BX Net JCA 4.44%%%%%..4шө өш е еее!» 発売 予定 


以上 の ソフ ト は 、FM-77 用 に 、 ソ フト ハウ ス 各 社 か ら . 
発売 され て いる も の の 一 部 で す (順不同 ) 


*※ は FM-77L4 に は 使用 で きま せん 


ソフ ト は 定評 ある FM-7 と 完全 互換 、 
し か も 数 々 の 卓越 し た 機能 を すべ て 継承 し まし た 。 


“ан. IRSX742Z 


ЕЖ. 会 話 も 0K、 ラル カラ ー40 画 面 以上 + 
ャ ラク ター 多数 / 
つ 日 本 ビク ター か ら VHD ビ デオ て 、 東 京 書籍 か ら は 本 で 発売 / 
EIF 7 Н 567 / 
MSX (32k 以 上 ) テ ー プ 版 3 Ж Ұ4,800 


A アク ティ ブ 
R ロー ル 
Р デレ イン グ " 
G ゲー ム 


① ア クシ ョ ン ゲ ー ム の リア ル タ イム 処理 に 

(② ロ ー ル プレ イン グ ゲ ー ム の キャ ラク ター を 成長 させ る 楽し さと 

③ ア ド ベ ンチ ャ ー ゲ ー ム の 秘密 捜し の 面白 さ を 融合 

誠 画 面 瞬時 切り 替え (X-1 四 方 向 スク ロー ル ) 婦 キ ャ ラク ター は 15 種 以上 

文 一 括 ロ ー ド 、 ア クセ ス 無 し 放 ゲ ー ム 途中 で の デー タ セ ー ブ ロ ー ド 可能 

廊 さ ら に 加え て 、 華 衣 な グラ フィ ックス と 高度 な 重ね 合わ せ 処 理 に よる 立 
体 画面 。 水 に 没 し 、 木 に か くれ 、 な め ら か に 動く キャ ラク ター は は 、 広 大 な マ 
ッ プ 上 を 駆け 巡り ます 。 


MSX、FM-/ 版 新 登場 / 


人 @ 新 発売 MSX(32K)……… テー プ 版 \4.800 @PC-6001mkI1 /6601/58--7- 7) Ұ4,800 

WW a ч ⑧ 新 発売 FM-7 /77/NEW7…3.5FD 版 \6.800 ӨРС-66014 55-5 3.51D 版 \6.800 
Waaa шы 287 ті 2» 1 ⑧ 新 売 売 FM-7/77/NEW7……・5FD 版 \6.800 ӨРСс-660158% eee 3.5100 \6.800 
ШІ. eee СИР. 0 «ЖҰ өзө FM-7/77/NEW7…… テ ー プ 版 \4.800 WPC-8801/mkII/SR……… 5FD 版 \6,800 
t i ее ӨХІ/с/шіо-------------. テー プ 版 \4.800 @Xiturbo.................. 5FD 版 \6.800 


PC-8801、FM-7 


S, RIREO riea l روو رخ‎ 
KEPED 


[| 新開 発 の 高速 3-D ピ クチ ャ ー エ ディ ター 大 画面 数 、 コ マン ド 、 会 話 数 も 大 幅 ア ッ プ 
| 中 間 色 を 含む 1 枚 の 画面 を 、3 次 元 的 に 回 転 き せ た り 、 放 リア ル タ イ ムシ ー ン は 、 ワ イヤ ー フ レー ム に よる 高速 リア 
БЕЙ 所 大 ・ 縮 さ せ て 描き 、 さ ら に 、 描 いた 何 枚 か の 画面 を ル タ イ ム 3-D シ ミュ レー ター (残念 な が ら 、 ス トー リー の 


自由 に 組み 合わ せ て お り ま す 。 展開 上 内 容 は 公開 で きま せん 。) 
3 王国 上 W 昌 文 画面 を 切り 変え る た びに 居場所 が 変わ っ て いく キャ ラ 娘 ロー ルプ レイ ング ゲー ム の 要素 も 加え 、 シ ー ン 1( カ セッ 
クタ ー ト 1) だ け で も 60 以 上 の 地区 (画面 ) を 自由 に 移動 で きま す 


1 枚 の 画面 は 、 何 枚 か の 背景 の 画面 と キャ ラク ター の ほ IPC-6601mkII/6601 版 は 、3-D ピ クチ ャ ー エ ディ ター は 

画面 と の 組み 合わ せ に な っ て いて 、 ゲ ー ム 進行 の 条件 使用 し て いま せん が 、 新 開発 の 高速 グラ フィ ッ ク エ ディ タ 

に 合わ せ て 、 そ の つと 、 背 景 と キャ ラク ター の 組み 合わ せ 一 に より 、 一 画面 表示 は 暗黒 星雲 の 倍 の スピ ー ド に 

を 変え て 描き ます 。 な っ て いま すず す 3-D シ ミュ レー ター は 疑似 3-D と な っ て 
文 登場 人 物 、 お 馴 み の キャ ラク ター は も ちろ ん 、 全 20 キ ャ おり ます 

ラク ター 以上 が 登場 


l — @FM-7/NEW7/77 …… テー プ 版 \4,800 @PC-6601 FA- 3.5"ТОЛ Ұ6,800 
Татан ы. @FM-7/NEW7/77 ……… 5FD 版 \6.800 ӨРС-660158 Я-- 3.5"1DD 版 \6.800 
FM-/ 画面 2 ШШ @FM-7/NEW7/77 … 3.5FD 版 \ ぎ 6.800 ӨРС-6601ткП /6601/SR テ ー プ 版 \4.800 


づ - リ ゴル フジ だ 7 の 


st > 


PC-6001mRTi 


OPC SOOT EI oe テー プ 版 \ ぎ 4.000  @PC-6601SRE 89 ---............ 3 ОТОС АБ 800 ӨМУІСП0 -------------.. QD 版 \4.000 
@PC-6001mkII SR 専用 ………・… テー プ 版 \ ぎ 4.000“ ӨРСЗСПІЕ ご に こっ БОБОЕВ 和博 FN ぴー 3.5"FD 版 \6.800 
@PC-6601 専 用 ……… ド ………・ е Бы. О САЛТ ИН Тт テー プ 版 \4.000 ФІЕМ-Х --...................... 3.5'2DD 版 \6.800 


PEZE ザー ズン ラブ 
製造 ・ 販 売 / 株 式 会 社 テ ィ ー ア ンド イー ソフ ト 合 (052)773-7770 


ж 応募 要項 は |!/O 6 月 号 、T&E マ ガ ジ ン NO.5 に て 
Pio6 月 号 77465 名 古屋 市 名 東 区 豊 が 丘 1810 番 地 


Е а Р oA Jf— f 


カタ ログ © KAERA CSS Ше WS THE ERE. * 機 種 名 を 明記 の 上 当社 宛 お 送り 下さ い 。 (送料 サー ビス ・ 速 達 希 望 の 方 は 300 円 プラ ス ) 
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カー ブフ プ の 中 で ライ バル 車 を 追い 越 
す ,/ 思 い 切 っ た ハン ドリ ング と 後 
妙 な アク セル ・ ワ ー ク の タイ ミン 
グ ク が 合わ な けれ ば , 確実 に クラ ッ 
ン シ ュ か コー ス ・ ア ウト . 上 手 に 追 
い 越 せ ば 美しい 風景 を 楽し む 余 裕 
が 生ま れ , ゲー ム と 現実 の 境界 線 
が 消え る . この 瞬間 が 好き だ ./ 新 
号 場 の MZ-1500 版 は さら に 精密 に 
な っ た スカ イラ イン RS に , コー 
ス ・ エ デイ タ と タイ ム ・ ト ライ ア 
ル を 新装 備 し , 最速 と 言わ れ た PC 
版 の 速度 を し の で ぐ . 背景 も ビル の 
ほか に 山 , 街路 樹 , トン ネル を 新設 . 
作 / 早 川 栄 大 


ホバー 戦士 を 思い どおり に 飛ば す 
この コツ を 覚え れ ば , こん な 大 格 
闘 戦 が 楽し め る . ゲー ム の 世界 に 
浸っ た 瞬間 の 動き と 速 さ は 残念 な 
DM BRUKER. E/T vy E f 


ラク グラ ンジ なし L-2 


向こう に 渡る に は ? 数 日 間 も 頭 を 悩 
ませ た 局面 が ほん の 一 瞬 の ひら めき 
て 解決 する . 今 ま て の 苦労 が 吹き 飛 
ん で て 警告 音 と と も に イエ ロー に 輝く 
レー ザー ブリ ッ ジ が 伸び て きた . 解 
いた 喜び を さら に 強く する 動く 画面 
は この シー ン の 他 に も 数 ヵ所 . その 
他 に 新 ア イデ ア を 満載 し , 今 X 1 ユ 
ー ザ ー は ラグ ラン ジュ ・ フ ィ ー バ ー. 
制作 / ヴ ィ ー ク ル ・ ソ フト 

4 輸 レ ー ス も いい が , バイ ク に は ` 
バイ ク の クラ イマ ックス が ある . 
ハン グ オ ン で コー ナー に 突っ 込み 便 
確実 寄っ て くる ライ バル の すき E 
を つい て , スロ ッ ト ル を 開く . Ж 
いた 瞬間 , ライ バル の 激しい 憎悪 
と 体 に 当たる 風 の 冷 た さ が 感 じ ら WE 
れれ ば , あな た は 一 流 ラ イダ ー だ . 


ы っ し EE 
作 / 三 清 頁 


接近 し た か と 思う と , 急 に 後退 し て 身 
構え た 機甲 戦士 に な か っ た . ノ スク ロー 
ル * ゲ ーー ム で て こん な に アニ メチ テック な 
動き を 見 せる な ん て / と 感激 し つつ , 
負け ず に 自 機 を 空中 攻撃 モー ド に 変 
形 さ せる 僕 だ っ た . 作 プ 北口 徳 一 
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DP C-980| 用 5 2D F1 221320 D 対 応 で , P C-9801/E/F で こ 使用 に な れ  ⑥FM-7 用 ソフ ト は 表記 が な く と も FM-NEW7/77/77L4 で ご こ 使 用 に な れ ま す . 
ます . 5 2H D は M2/3 で こ 使用 に な れ ま す . また , 表記 の な い ソ フト は 高 解 の X| 用 ソノ フト で 要 Hu-BASIC と ある の は CZ-8CB0I が 必要 で す . X1 turbo I OL 


像 度 C R T が 必要 で す . 外 の X | に は 本 体 に 付属 し て いま す が turbol0 に は 付属 し て いま せん . また , 
2P C-8801/m k II 用 ソフ ト は SR の N88-BASIC V1mode(S) で 使用 可 表記 が な く と も XI(CZ-800C) は G-RAM が 必要 で す . 他 の X | は 標準 装備 . 
3P C-8001/m k II 用 ソフ ト は SR お よび PC-880I/m k II/S RO N-BASIC 813/51, S | 用 ソフ ト は それ ぞ れ の 拡張 R А M が 必要 で す . 

mode で こ 使用 に な れ ま す . 媒体 表記 等 に 次 の 略号 を 使っ て お り ま す . C つ カセ ッ ト , D つ 5'2D デ ィ ス 
4 PC-800Im k II 用 ソフ ト は PC-800Im k II S R の N80-BASIC mode 7J, 2, Нр-572Н0>4 42, 3.5D 一 3.5"2D デ ィ ス ク , 0 D っ クイ ッ ク ・ テ 
5P C-6001/m k II 用 ソフ ト は S R,660| シ リー ズ の N-60BASIC 32k mode 可 . ィ ス ク , J S つ っ ジョイスティック. 
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ゲー ム の 中 に , これ は ./ と 思う シー ン が ある . 
強 楓 を 向こう に まわ し て の ドッ ク ・ フ ァ イ ト , 
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大 自然 , 市 街区 , 工場 区 , 海上 基地 な どの 精彩 な 風景 を 
バッ ク に , 戦闘 メカ や 動き が 綿密 に 設計 され た 敵 と 渡り 
あう ./ 速 さる, 滑ら か さ , 精密 さが美 に 進化 し た と 言う だ 
け あ っ て , 1 周 29 分 の ほとん ど が シャ ッ タ ー チ ャ ンス ./ 
いた る と ころ て 激しく 美しい 戦闘 シー ン を 見 る こと が で 
きる . た くさ ん の 写真 の 中 か ら 選 ん だ の が この シー ン . 
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43 枚 の 写真 は 合成 で す . 
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も し か し た ら , あれ が 謎 の … 


スク ロー ル ・ ゲ ー ム で は 高 得点 を と る より も , 
到達 し た 時 の 喜び の 方 が 大 きい . それ が 謎 に 包 
まれ た 巨大 要 寒 で あれ ば な お さら , 一 目 見 た い 
た め に キー を 叩く . ノ その 熱い 思い が な けれ ば , 3. г 
上 手 に は な ら な い . し か し , 要塞 の 先 に は ……. е 
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プレ イク スル 
見 た か / 盟 間 3 変形 の ハイ メカ / 


忌 に 激突 する ./ キ ー を 連打 する と 戦闘 機 が 一 瞬 の うち に 中 間 形 態 , 
機甲 戦士 へ と 連続 変形 し , 激突 寸前 で スク ロー ル が 停止 し 戦士 は 
落下 する . 洞窟 の 入口 で 再び 変形 , 中 間 形 態 で 突入 する ぞ ./ 特 性 
の 異な る З 形態 を 操る ハイ メカ & ハ イ テ ク は 合成 写真 で な けれ ば 
表現 で き な い ./ 
DRE G6O:HIGH 5988:LEFKORE  G6Ə:HIGH = 5888:LEFT KORE 779:HIGN дт 


カメ ラマ ン の 一 言 

一 瞬 の 輝き に 心 が 揺れ 動く 時 , みな さん も 経験 あり ます よね . 
そこ て 今回 , コム パッ ク の ゲー ム の 中 か ら 私 な り に 「 シ ャ ッ タ ー チ ャ ン 
ス ノ 」 と ば か り に 撮っ た 写真 を 選ば せ て も らい まし た . あま り の 高速 スピ ビー ド の た め , 
写真 が プレ て し まう カメ ラマ ン 泣 か せ の ゲー ム や , 最高 の シー ン な の に な ん と 走行 線 が 人 っ て し 
و‎ ノ と りあ え ず 独断 と 偏見 で す が , この シャ ッ タ ー・ チ ャ ンス は 自信 が あり ます . (М.М) 
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時 は 199 X * RR T (+ J уа 
の 死 を 遂げ る 事件 が 多発 し て いた 。 私立 
探偵 の あな た に 、 3 日 以内 に ダッ チワ イ 
フ を 3 体 集 め る 、 と いう 依頼 が 持ち こま 
れ た 。T、4800 円 、PC880I(mkII)、D 5” 
7800 円 PC 880I( m k II )、9801( E). F M ( 
МЕМ) 7 、FM77、[8800 円 、PC980IF ・ 
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@ 数 ある 音楽 ソフ ト の 中 で 、34 年 度 最も 
高い 評価 を 得 た 、 あ の 「 ス ー パ ー・ シ ン 
セ (MSX 対 応 )」 が 、 さ ら に 機能 を アッ フ 
し て 、FM 版 で 新 登場 

@ キ ー ボ ー ド が その まま シン セ サ イ ザー 
に 君 変 り 。 エ コー も 、 ビ ブラ ー ト も 、 ビ ピッ 
チャ ペン ダー も か か り 、 デス トー ショー・ 
サウ シン ド も で きま すむ ライ ブ 派 に ビッ タル 

© 1vco ご と の 後 妙 な 音 づ くり が 楽し め 、 
な ん と 、 マ ル チ 録 音 も 可能 に な り ま し た 。 

@ サ ウン ド ・ ミ ックス ・ モ ー ド 

Ж マト リッ クス ・ プ レイ 
6 パタ ー ン の シン セ ・ マ トリ ックス を 変化 
SUDE ТУУ? Муд 
ど 、 リ アル ・ タ イム で 思い の まま の サウ 
ンド づく り が で きま す , つく っ た 音 は 、 そ 
の まま ファ ンク ショ ン ・ キ ー に 自動 的 に 
設定 され ます 。 

太 ファ ンク ショ ン ・ プ レイ 
1veo こ "と ( に ボリ ュー ム 、 エ コー、 オ クタ 
ー プ な どの 後 妙 な 変化 を つけ られ 、 マ 
トリ ックス ・ プ レイ で つく っ た 音色 に 太 み 
を 加え られ る 、 な どの 機能 が 新しく 拡 
張 さ れ ま し た 。 

ORE BEEF ; 

テン ボ を 設定 し 、 ガ イド ・ テ ン ボ に 合わ せ 

て レコ ー デ ィング その 際 、 録 音 方 法 と し 

て 、1 ト ラッ ク か マル チ 録 音 か の 選択 が 可 

能 。 テ ン ボ 、 拍 子 を 変え て の 再生 機能 搭 

載 。、 リ アル ・ タ イム の 音色 変化 が で きま す 

今 音 符 表 示 、 楽 譜 プ リン ト ア ウト ・ モ ー ド 


ディ スプ レイ 、 も し く は プリ ンタ ー に 楽譜 を 


表示 。 小 節 指 定 、VOICE 指 定 が 可能 で す 。 


Фе. п-к. Е-Е 
オリ ジ ナ ル の メロ ディ ー、 サ ウン ド を ディ ス 
ク ( カ セッ ト ) に 登録 可能 で す . 

< 制作 ・ ミュ ー ジ カル ・ プラ ン ッ > 
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Super Synth 
BARRETT ш 


16KB 対 応 


ROM カ ー ト リッ ジ バ 
+ 


|м-20001-20002 5,800 
ー タ 入り カセ ッ ト 


感性 を 刺激 する 、 ア クセ ス 作 曲 法 . 


cliche 


FM- 4/NEWI4/ 対応 

る ディ スク J 版 

5 イン チ Е-5008 

3.5 イ ンチ F-3508 

カセ ッ ト 版 

Е-1013 ¥ 5,800 

5 月 末 発 売 予定 

@ ヒ ッ ト 曲 の 多く は 、 曲 の 構成 、 コ ー ド 進 
行 、 リ ズム な ど そ れ ぞ れ の 要素 の 中 
で 、 あ る 一 定 の パタ ー ン で 形づくら れ 
て いる も の で す 。 
その 約束 事 の パタ ー ン や 自由 度 な ど 
を バラ メー ター で セッ ト し 、 コ ンピュータ 
ーー 側が 自動 的 に つく る メロ ディ ー を 、 つ 
きつ き と 組 み 含 わ むせ て いく こと に よっ て 、 
自分 の イメ ー ジ の 作品 を 完成 させ る の 
が この ! ク リ シ ェ 」 の シス テム TCT 

氏 既 成 曲 の パタ ー ン を 分 析 し 、 そ の バリ 
エー ショ ン を 楽し むこ と も で きま す 。 

供 音 楽 の ジャ ン ル 、 リ ズム パタ ー ン 、 コ ー 
ド 進行 、 曲 の 構成 、 メ ロディ ー の 自由 度 
な ど を バラ メー ター で セッ ト す る こと が 
で きま す 。 で も 、 最 終 的 に は 、 あ な た の 
感性 で 決ま り ま す . 

© Cliché; で つく っ た メロ ディ ー (1 パー 
F) を 、 「MUSIUM1」 で 再現 し 、 音 色 変 
更 、 曲 の 手直し な ど が 可能 。( ス ー パ 


\7.800 


ーー 


CS a 


gc=oSss MEDIa cE 


“ “ | 
ノ М ォ ク ルク ル ま わる 。 
7 アノ が 弾け な く て も 、 コ ンピュータ ー の 助け を か り れ ば 、 
謗 まで 音楽 に 和 れ 、 ク リエ 休 す る こと が で きま す 。 


ん な . ソ フト を ヒ ク タ ー は だ くる A ん 用意 し て いま る 
範囲 で の 、 各 ソフ ト 間 相 А 


ー・ プ リン ター・ プ ラス を 使用 すれ ば 、 
САЗ E 

1」 と も 可能 ) 
ВЕ: 22—27 
ルミ ブラ ジン > 


MUSIUM1 フ ォ ー マ ッ ト 楽 譜 プ リン ト ア ウ 
ト + サ デー タ 変 換 ユ ー テ ィ リ ティ 集 


Super Printer” 


F"M- 4/NEW4/ >15 

る ディ スク 版 

5 イン チ ・3.5 イ ンチ ¥ 6.800 
カセット 版 \5.800 
近日 発売 


W パ バー ト 指 定 に より 、3 パ ー ト の スコ ア 諸 、 
また は 単 バ パー ト の 譜 が 選べ 、 小 節 指定 


も で きま す 
@ 1 ペー ジ 最 大 9 段 ま で の 、 単 桂 7 連続 
印刷 が 可能 。 


信楽 詳 上 部 に 40 廊 字 ま で の タイ トル 、 ま 
た (は コメ ント が 入れ られ ます 。 

オプ ショ ン で 、 スペ シャル コマ ンド の 同 
時 印刷 、 デ ー タ の ダン プリ スト や 、 エ ン 
ベロ ー フ プ ・ テ ー ブ ル の 印刷 な ども 可能 

W「 ス ー パ ー・ シ ン セ 1」、「 ク リ シ ェ 」 な ど 
と 「MUSIUM1」 と の 共通 部 分 で の デ 
ー タ 相互 変換 ユー ティ リティ 付属 。 


MUSIUM1 の デー ター を フリ ント アウ ト し た も の で す 


トッ プシ ン バ ル の 音 も 、 リ アル だ . ノ 


MUSIUM 1 


FM- 4 НКА 対応 
る ディ スク 版 
5 イン チ ۴-4 
3.5 イ ンチ F-3504 
Oty 
Ғ-1005-1006 \6.800 
信 音 楽 の ワー ブロ MUSIUM2 
FM 音源 対応 。6 声 。 こ の 夏 発 売 了 予定 
(PC-8801mkIISR 他 ) 
Өх MUSIUM1 ま も な く 完 成 


\8.800 


タ 交 換 の ユー テリ テ 1 も あり まま 


ауе 

ター 

五線譜 上 で 、 音 と 目 で 
認 し な が ら 作業 が 

で きま すず 三 声 独立 し 

て 、 エ ン ベ ロ ー プ パタ 

ー ン を 変化 させ る こと 


F'M- プ мн? тт 


が で きま す 。 
Фу (Е: : スク ラッ チ の リズ ム を 使っ 
た ディ スコ チュ ー ン 、 リ ズミ ッ ク な ロッ ク 


ンロール な ど 多数 。 
(2) グ ラフ ィ ッ ク ・ プ レイ ヤー 
美しい 宇宙 船 の コン ソー ル 風 な 画面 の 
中 で 、3 パ ー ト の イン ジ ケ ー タ ー が リカ ルレ ・ 
タイ ム で 動き ます 左右 は 音 の 高き さ 、 上 下 
は 音 の 大 き さ に 対応 。 
@ シ ンク ルル ・ プ レイ 、 オ ー ト ・ プ レイ 、 ジュ ー 
ク ・ ボ ックス な どの 演奏 モー ド が あり ま 
す (ディ スク 版 ) 


ファ ン の 熱望 に 応え て 、VOL.1,VOL.2 
同時 新 発 売 ./ 


MUSIUM 1 


F'M-V4/ NW Ей 対応 
5 イン チ ・3.5 イ ンチ ¥4000 СТ ҰЗ,000 
)MIRAGE の 絶妙 な る アレ ンジ に より 、 
3 バー ト と いう 限界 を 超越 / 
特に 「MUSIUM1」 お 買い 上 げ の 方 に 
スベ シャ ル サ ポ ー ト と し て 発売 いた し 
ます 
VOL.1「 バッハ ・ イ ン ベ ン ショ ン & シ ン フ 
ォ ニ ア 集 ( 全 30 曲 )」 
氏 バ パッ ハハ 作曲 の 2 声 イ ン ベ ン ショ ン !5 曲 、 
3 声 シ ン フ ォ ニ ア 15 曲 の 作品 集 。 
@MUSIUM・ バ ロッ ク の 集大成 。 
VOL.2 ウ ラシック ビア 名 曲 集 ( 全 20 曲 )」 
Г 「 引 れ の 曲 」「 雨 だ れ の 前 奏 曲 」「 マ 
ズル カ 」「 夜 想 曲 」/ シ ョ パン 名 ' 亜 麻 色 の 
髪 の 乙 女 」』/ ド ビッ シー 「 楽 興 の 時 」 
「 セ レナ ー ヲ 」/ シ ュー ベル トト ロイ メ > 
イ 」「 飛 翔 」/ シ ュー マン 島 「 熊 蜂 の 飛行 」 
/ コ ル サ コ フ 氏 「 ト ルコ ・ マ ー チ 」/ モ ー ツ アァ 
JUF@ 「 春 の 歌 」/ メ ン デ ルス ゾー ン 倫 ' 白 
島 」/ サ ン サ ー ン ス 氏 「 フ ー ガ 」/ バ ッ ハ 
@⑱「 ハ ン ガ リー 舞曲 第 5 番 」、/ プ ブラームス 
な お 、MUSIUM1 БЕ: VOL 1, 
VOL2. は 直接 下記 へ ご 注文 下さ い 
@ お 問い 合わ せ 、 お 申し 込み は 
一 日 本 エイ ・ ブ イ ・ シ ー 株 式 会 社 企画 部 
203 (486) 412I 及び 、 ビ クタ ー 音 楽 産業 
株 式 会 社 PS 制作 部 2203 (486) 9470 


ТТІ 


た っ た 5 人 の 家族 か 200 万 の 騎馬 
ыОЛатағы 42,4... 
7.19565: L ER. F 
シア 大 陸 に 男 の ロ マン が か け 

А a 
ЕМ16,: .PC9801(E : F£ M)D 
版 、8800 円 他 機 種 開 発 中 | 


コリ ドー ル 


CORRIDOR 


ЕТА АЕО от 


北 の 国 サウ ロス で て は 国王 リコ ゴー ラス IMV 世 が 頭 を 痛め て い 
た 。 王 の 3 人 の 息子 は 皆 優 れ て お り 、 い ずれ 王位 を だ れ 
に つが せる べき か 、 白 の 賢者 ′" ナタル の 意 に より 、 一 
週間 の 後 、 国 の 主 な る 者 を 集め て 王 は 次 の よう な 宣言 を 
下 し た 。 「 今 より 直ちに 王子 ら は 旅 に 出 よ 、 そ し て 3 年 
の 間 旅 を 続け 、 最 も 素 晴 し い 冒 険 を し て 帰り 着い た 者 が 
次 の 王 で ある 。」3 人 の 王子 の うち 1 人 は あな た で ある 
呪い に よっ て 沈ん だ と いわ れる 伝説 の 城 を 求め 、 あ な た 
は 旅立つ 。 

T、4500 円 、PC6001mkII(SR)、8001(mkIl ・ SR )、88 
01(mkIl)、FM( NEW) 7 、D 5”, 6780003, РС 8801( тк 
П). FM(NEW) 7 . (780003. PC 8001F ° м2). 03.5” 
680009. F M77 


長老 トマ の 求め に 
洗練 され た ゲー ム ・ 


リー 展開 。 日 本 の ロー ルプ レイ ン А 


る 、 実 力 派 RPG ГА 
れ な い / РС W 


T223 横浜 市 港北 区 日 吉本 町 1876 光栄 ビル IF 12044 6| 


— 4112 
528 эз 


ウ ワ ー ン つい に 出 た よ お ‚ Ж 

ク 等 は こん な ソフ ト を 待っ て いた ん 

だ / 全 国 6000 万 人 の お 医者 さん ご っ 

こ フ ァ ン の 皆さん を 狂 責 させ た ロリ 

コン ゲー ム 「 マ イ ・ ロ リー タ 」 あ な 

た の 後 妙 な 指 使 い が 、 少 女 た ち を 魔 

病 か らら 救う 。「 先 生 、 お な か が いた 一 

қаға E a сақ ы “СИН 

ウ し ょ う ね 。」 ああ 素晴らし き 世 紀 末 。 
FM7・NEW7・77、PC8801(mk 
I] ) 用 (D、5800 円 T、3800 円 ) 


m2 ドラ イブ 仕様 
FM-7、NEW7・5 2D・2 枚 組 \\9,800 
FM-77・3、52D・2 枚 組 \\9,800 

PC-8801 MKII SR・52D・2 枚 組 \\9,800 


на 
Ке н 
W мш you а 
you na compt |: 


пн? 7 ооло) ВНЕ HF Го 
い が 生 じ る 場合 が あり ます の で 御 了 承 下 さい 。 


SWAT S>- 


や る か 、 や られ る か 。 人 類 最 後 の 切 札 .、 ス ワッ ツ 号 
を 発射 せよ 。 壮 絶 な スペ ー ス ロマ ン が 今 始ま る 。 


ҒМ-7“МЕУ/7.520Ұ7;800 


プロ グラ マー 急募 ・Z80、6809 の 理解 
さる れ て いる 方 。 ご 希望 の 方 は 履歴 書 に 自作 
ソフ ト 1 ヶ を 添え て 当社 人 事 部 迄 お 送り 下さ い 。 


+ 
2 


ШҒМ-7:МЕМ7-777— 7 :%5 ,000 
mFM-77・3.5 イ ンチ 2D\8,000 m FM-7・NEW7:5 イ ンチ 2D\8,000 


新 発 売 / 
HAN AFU DA 


ミス ター ハナ フ ダ 


ひょう きん タヌキ が 音楽 に あわ せ て 、 持 札 を 配り ます , 5 
ヌキ に 気 を ゆる め て は ダメ 。 そ こ は 、 勝 負 の 世 界 。 コ ン ピ 
ュー タ の お し ゃ べり と 、 画 面 メ ッ モ セー ジ に 従っ て 進行 す 
る 花札 コイ ユイ 。 | J 
PC-6001Mk II /SR・PC-6601/SR・ テ ー プ 版 


3.5 イ ンチ ティ スク 版 Ұ4,900 


新 発 売 / 放っ ロー ル テ ー ム 、 


usx サ „7 771)» Х 


敵 の 基地 まで 長い 道のり 。 岩 あり 、 木 あり 、 川 あり 。 
6 もちろん 敵 も ご まっ て いな い 。 こ ちら も ジー プ に 搭載 
の 機関 銃 で 応戦 だ / 

MSX・16K・ テ ー プ 33,800 


LEY 


PC-9801F・ デ ィ ス ク 版 5'2DD ¥17 , 8O00 


° = 
ге” ш «ш шаны а 南 寺町 2-71 船 場 双葉 プラ ザ 
ЕЕ ЧА ЖШ ms Jm m 大 阪 市 東 区 南 久 宝 寺 町 2- ラ ザ 
SCSI £ TEL.06(261) 43344 


ラッ プ 人 JJ к. 近 示 市 ニュ ー ヨ ー グ の к 
REN FEES. 22. 
ラッ プ 人 の 出現 は 、 今 か ら 約 1 万 年 


近く も 前 に さか の ぼる 。 PC-8801/mkll/sn さか hl に 発売 中 


ТЕРТ Б Е-МУ/374 2O29 年 、 対 ラッ プ 人 プロ ジェ 2O6 フ 年 6 月 БЕН 14. 
ЕТІНЕ: S59 E 2 f A (ТАРТ) RU. ガ う 多数 の 飛行 物体 確認 。 ラ ツブ フ 
最高 機 究 で あっ , 1 ラッ プ 人 壊滅 作戦 開始 。 人 は 地球 から の 大 移動 を 決行 し だ 
x ! ж も よう 。 

2O ら 6 年 、 第 3 次 世界 大 戦 終結 。 => АЭА ТЕР aga c E ao * 

各国 ひら の 報告 に より 、 和 人類 と 種 ラッ プ の 絶滅 も 時 間 あ 問題 と 思わ ニュ ー ヨ ー ク に 大 規模 な ラッ プ 人 
を 異 に する 超 能 力 種 族 ラ ッ プ の 存 れる 。 だ だ し 、 超 能 如 増幅 効果 を の 徴候 。 緊 急 警 戒 体制 DX 発令 。 
在 が 証明 され だ 。 DDINI PID NE k- 

※ 


” х PC-8801 8801mkll SR 7 — Z k ¥ 3.800 
ж PC-3801  8801mkl] /SR > 7 х 7 А ¥ 5,800 
*FM-T/NEWT TI テー ブ プ 版 \3.800 
ЖЕМ-І NEW7 ーーーー デ テディ スク 版 \5.800 


g Ж Š 
PE: 7 


CoM: P> гий 
1,0,2,5 


J 981 


12 "が 
1) 42W- 
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хатна. 318. 

人 類 に その 超 能力 を 知ら れ だ ラ | H Rr 

し て 虐殺 され だ 55 (5 “н Ж Ше: әде‏ رو ب 
Те о MIM НЕ УУ yi 8‏ 


さあ 、 ゲ ー ム 開始 まず は 近 未 来 都市 
ニュ ユー ヨー の 地理 を さぐり 、 仲 間 を 


м | аяр: . ч ‚М 2032E NIYE, 
کا رک تاو کے ر‎ 【 八 類 は 多勢 を 利 し て ラッ プ 倫 


NEE PAI LI. 


LL. ТҮП ) 
ЫЫ LLL 


ВОЛМЕСЕ. CO 


ESP 探 知 シ ステ ム に ひつ か か миа ні ` 
つて し まっ た / ま たたく 問 に 口 | 仲間 も 揃っ だ と ころ で 、 い よい | Віс- or 
ボッ ト が '…。 こ れ で は きり ガ な い 。 | “ よ 軍 事 基 地 へ …。 新 た な 移住 地 PO COS << 

| 2 を 知る ラッ プ 人 を 救い 出す の だ 。 222. 


本 配り の フロ ロー CI. 


ー 株 式 会 社 ホッ ト ・ ビ イィ 〒164 東 京都 中 野 区 東中野 4-4-1 лй ヒル 5F 容 03-360-3623 | 


西遊 記 | 、 ザ ブラ ッ ク バ パス 西部 の 成り あがり 


АЯБА THE RRR 東洋 不思議 アド ベン チャ ー ゲ ー ム ./ PC-9801 新 発売 / (高速 ダ ラフ ィ ッ ク バー ジョ ン ) 人 生地 道 に 肉体 労働 それ と も 一 発 大 博打 
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MN 243 
2 3512 
мМ rri 


IEM 7042: 34 ЗУ» 
703 HN өл. 


тж Ç ра 
Ж РС-8801 8801 тк / SR 

бн Ж РС-8801//8801 тк / SR 
Ж РС-8801 48801 ткП /SR— テー プ 版 ¥ 4,500 Ж РС-8801 48801 ткП/58 一 - デ ィ ス ク 版 \7.800 ЖЕМ МЕМ/1,/11,//8 


ニー — =: Ж ЕМ-1// NEW? /8——— — T1 
*FM-1/ NEW] /1l] 7 — ZhR * 4,500 Ж ЕМ-7// NEW] 8 ディ スク 版 ж 1.800 ャ ら 1 一 テー プ 版 \4.500 ディ スク 版 (5"2D 


婦 X 1( 開 発 中 ) 一 ーーーーー テー プ 版 № 4,500 *РС-00! 一 一 ーーーーー テ ィ ス ク 夏 \8.300 ディ スク 版 (5'2HD 


ОСІ, 読者 の 皆様 の ご 要望 に 応え て , 3 月 18 日 か ら パ ソコ ユン ・ ネ ットワーク [TeleStar( テ レス ター)] の 実験 を 開始 し まし た . 
パソ ツン コン ・ ネ ットワーク に つい て は , 各地 の クラ ブ や 出版 社 で 実験 が 行なわ れ て お り , それ ぞ れ 注目 すべ き 成 果 を あげ て いま す 
が , PiO で も 読者 の 皆様 の 協力 を 得 て ,. で きる だ け 多 く の 機 種 の 方 が パソ ユン ・ ネ ットワーク を 利用 で きる よう に し て いき だ た い 
と 考え て いま す . 多 数 の 読者 の 皆様 の 参加 を お 待ち し て いま す . 


以下 に , TeleStar で 子 定 され て いる 実験 内 容 を 示し ま 77: 
これ は 固定 的 な も の で は な く , 参加 者 の 皆様 の ご 協 ТЕЛЕ 
l), 随時 拡張 ・ 改 良 を 行なっ て いき た い ЗЕ Зы й 


Жі 現在 予定 され て いる 実験 内 容 


BBS (電子 掲示 板 シ ステ ム ) () 
電子 メイ ル 

I/O 編 集 部 か ら の 
PiO 編 集 部 か ら の 連 
TeleStar バ パ バザール 


° 
ДЕВ 
х 


ор 
ГІ š Š 


hai 
مهد‎ 
o» 


国内 外 の ニュ ー ス 
毎 外 旅行 情報 
TV 番組 情報 
aR EIA #6 
(ANK と は , アル ファ ベッ ト ・ 数 字 ・ カ タカ ナ を 指す ) 


о 


上 記 の 表 1 の よう に , 表示 は ANK 廊 字 ( ア ルフ ァ ベ ッ ト ・ 
数 字 ・ カ タカ ナ ) と 漢字 で 行なわ れ ま す . 当面 は 。 ANK 文 字 
に 対応 し た ダー ミナ ル ・ プ ログ ラム を , で きる だ け 多 く の 
マシ ン で 作動 させ , TeleStar 上 で 相互 に メッ セー ジ を 交換 で 
きる よう に し た いと 考え て いま す が , 最終 目標 は も ちろ ん 


も も ちろ ん 開発 の 努力 を し ます が , 読者 の 皆様 の 絶大 な る 


表 2 発表 済み の ANK タ ー ミ ナル ・ プ ログ ラム 


X 1turbo 


横田 秀次 郎 ///O エ ンジ ン ・ ル ー ム 


51 

РС-9801/8801 横田 秀次 郎 

FM -7/NEWV7/77 横田 秀次 郎 / 塚 田 徳 /|/O エ ンジ ン ル ー ム 
横田 秀次 郎 //O エ ンジ ン ル - ム mu O 


横田 秀次 郎 ///O エ ンジ ン ル ー ム 
(以上 の プロ グラ ム は , フロ ッ ピ ー デ ィ ス ク ・ ド ライ ブ , 音響 カプ ラ が 必要 ) 


ご 協力 を お 願い いた し ます . 


TeleStar は , 3 2 に 挙げ た マシ ン だ け で な く , 表 3 に ある マ 
シン に 対し て も 実験 を 行ない た いと 考え て いま す . LPL, 
БИО 2а; ター ミナ ル ・ プ ログ ラム は まだ すべ で の 機 
種 に は 対応 し て いま せん . 読者 の 皆様 の ご 協力 を お 願い い 
сат; 


Еу FE: : 8 ビット 

Хи: Жр 

スト ッ プ ・ ピ ビ ピット : 1 

通信 速度 : 300 ボ ー 全 2 重 (将来 的 に は 1.200 ボ ー 半 2 重 も 子 
定 し て いま す ) 

漢字 コー ド : L 7 FJIS 

Хоп/ХоН: : あり 


@RS-232C イ ンタ ー フ ェ イ ス の 内 蔵 さ れ た パソ コン : 漢字 
КОМ (715% 1 水準 ) と 漢字 表示 を サポ ー ト し た ター ミナ 
ルッ ルン / 答 が 用 が あれ ば まり よい 

OR: 音響 カプ ラ を 継ぐ 場合 は , 電 々 公社 の 普及 型 と 同 
型 の 受話 器 を 持っ た も の . モデ ム 電 話 な ら 音 響 カ プラ は 
不要 . 

@ ヌ ル モ デ ム ・ ケ ー プ ブル : パソ コン と カプ ラ を 継ぐ ケー プ 
JL. 1/O よ りき ぎ 4.,000 で 実費 販売 . た だ し , RS-232C イ ンタ 


要 RS-232C と コネ クタ コム パッ ク よ り 有 販売 
2-7 б 
Ж RS-232C カ ー ド 


オム ノバ パク グルリ 販売 


ー フ ェ イ ス に ケー ブル が 付属 し て いる 場合 は 不要 . 
@ フ ロッ ピー ディ スク : アッ プロ ー ド , ダグ ダウンロー ド に は 。, 
フロ ッ ピ ー デ ィ ス ク が 必要 . NM 
一 実験 参加 申し 込み 方 法 一 
実験 参加 申し 込み 方 ? 


@A 会 員 : 参加 費 十 音響 カプ ラキ ケー プル テ 平 40,000 


ӨВ? : 参加 費 十 音響 カプ ラ = Ұ 36, 000 
ФСР: 参加 費 = * 6, 000 


A 一 C 会 員 に お 申し 込み の 方 は 。 ハガキ に 住所 , 氏名 , 

年 齢 , 職業 , 電話 番号 , 使用 マシ ン , 希望 する 会 員 の 種別 
(A— С) を 書い て 下記 に お 申し 込み くだ さい . 

な お , 第 1 次 分 の 参加 募集 は シス テム の 状況 を 見 て 締め 
切ら せ て い だ だ きま す . ぜひ 参加 したい, と いう 方 は お 早 
目 に お 申し 込み くだ さい . 

9151 東京 都 渋谷 区 代々 木 1-37-1 ぜん らく ビル 5F 

和則 テレ スタ ー 
АЗЫП ネ ク の 2 е RAL AVERT RE АК d: Lus E C, 

「 テ レス ター」 か ら 購 入 で きる も の に つい て は 「 申 し 込み 
書 」 送 付 時 に , 改め て ご 案内 し ます . 

実験 シス テム は 9 月 末日 まで 続け , 10 月 1 日 以降 は 上 位 
シス テム を 立ち 上 げ , 本 格 稼 働 へ と 移行 する 予定 で す . X< 
の 際 の 課金 で す が , 1 年 分 の 参加 費 と し て 頂い て いる 6,000 
円 (500 円 / 1 箇月 ) を , 月 割り の 計算 で , 月 間 基 本 料金 へ 充 
ННІ СЕ Ж», #& b DVU ГАК 722%, 

な お , 実験 シス テム 稼働 中 の ファ イル 使用 料金 , 時 間 当 
たり の 使用 料金 な どす べ て 無料 と し ます . 参加 者 各位 の ご 
協力 を お 願い し ます . 


手続 き の 要領 


① 葉 書 で 応募 
(②TeleStar よ り 申 し 込み 書 
⑧ 代 金 払 い 込み 

〈④ パ パスワード と 必要 な 機器 


TeleStar 


カ プラ 仕様 


使用 電話 機 600 形 電話 機 


ІН (8/77, 全 2 重 / 半 2 重 切り 換え 可 
通信 速度 300bps 

E JF 電池 D.C4.8V( 約 4 時 間 JA C 100V 
外形 寸法 ( 高 さ , tg, 047 )72X 290 х 83mm 


ЕЗ % 650g( 含 電池 ) 


: 参加 費 十 音響 カプ ラ + ケ ー ブ ル = テ ャ \20,000 

テレ スタ ー 発 足 記念 の 特別 会 員 募 集 は , 3 月 10 日 を も 
っ て 締め 切ら せ て い だ だ きま し た が , ぜひ 特別 会 員 に … 
と いう 方 が その 後 も 相当 数 いま し た の で , 抽選 で 限定 50 
名 の 方 を 募集 し ます . 

希望 の 方 は 返信 用 封筒 を 同封 の うえ ぇ 住所 , 氏名 , FS, 
職業 , 電話 番号 , 使用 マシ ン を 書い て 6 月 10 日 (当日 消 
RAW) TCE 0 (WSL. 
B151 東京 都 渋谷 区 代々 木 1-37-1 ザ ぜん らく ビル 5F 

жт их у – 「 特 別 会 員 2 次 募集 」 係 

な お , 特別 会 員 第 1 次 募集 の 当選 者 の 方 の 正式 申し 込 

み は 5 月 30 日 (当日 消印 有効 ) で 締め 切ら せ て いた だ きま す . 


特別 会 員 : カ プラ 仕様 


通信 方式 
通信 速度 


外形 寸法 ( 高 さ , 幅 , 奥行 )79 X116 X285mm 
1.4kg 


バ ソ コツ ぃ ネッ トワ ー ク 


TeleStar 


жз 現在 の 状況 Тазы» Z 2:5 


TERME 7 ログ ラム JIS 第 1 水準 ТЕВМЕ- l: 
ANKX F J) て サポ ボ -| R FROM ізі 


L3MARK2 5 
РС-Ш mkll SR 
PC4001 
PC4001mkIl 
PC4001mkIISR 
PC6601 
PC6601SR 
PC4001mk II 
PC4001mkIISR 
PC4001 
PC9801 


Xitubo 
X1( そ の 他 ) 
MZ-1500 

MZ- 2000 2200 
MZ40B 
MZ-6500 5500 


z 
Е 


= の 表 は ,!O で 調べ た も の で す が , 実際 と 異な っ て いる 場合 が ある か も 
し れ ま せん . その 場合 は 「 相 テレ スタ ー」 まで お 知ら せく だ さい . 
注 1 : S1 に は , RS-232C 用 イン ター フェ イス は 内 蔵 さ れ て いる が , 
RS-232C と コネ クタ (MP-9732, ¥ 3, 000) は 別売 . 

注 2 : S1/10 以 外 の S1/20, 40 は 漢字 ROM 標 準 装備 . 

#3 : PC-8801 と PC-8801mk II /10 以 外 の 機種 は 漢字 ROM 標 準 装備 . 
注 4 : PC-6001mkII, PC-6601, PC-6601SR, PC-6001mkIISR は 当 
用 漢字 の ROM を 持ち , 中 で も PC-6001mkIISR, PC-6601SR は オ 
プシ ョ ン て 第 1 水準 漢字 ROM が ある . 

注 5 : PC-9801E と PC-9801 は 漢字 ROM が オプ ショ ン . その 他 は 標 
準 実装 . 

注 6 : 漢字 ター ミナ ル ・ ソ フト Y\f15.000 で て 発売 . 

#7: : JIS コ ー ド の み 

米 漢字 ター ミナ ル ・ プ ログ ラム を |I/O で サポ ー ト 


ー ミ ナル ・ ブ ログ ラム の 通信 販売 


ー ミ ナル ・ プ ログ ラム を 以下 の 表 の よう な メデ ィ ア て 通信 販売 
し ます . 品番 , 商品 名 を 明記 し て 現金 書留 で お 送り くだ さい . どう 
そこ 利用 くだ さい . 申し 込み は 下記 を ご 覧 くだ さい . 
ANK タ ー ミ ナル ・ ブ ログ ラム 価格 \5.000( 送 料 込 ) 
商品 番号 対応 機種 備 5 
WN-015K PC-8801 シ リー ズ , PC-9801/E 5 イン チ 2D 
ж WN-016K PC-9801F 5 イン チ 2DD 
WF-017K FM-7/NEW7 5 イン チ 2D 
WF-018K FM-77 3.5 イ ンチ 2D 
WH-019K S1 モ デル 10/20 5 イン チ 2D 
WH-020K S1/ モ デル 30/40 5 イン チ 2HD 
WS-021K X1turbo 5 イン チ 2D 
WF -022K FM-11 シ リー ズ (F-BASIC Ver.4.0) 5 イン チ 2D 
WS-027K PC-9801m シ リー ズ 5 イン チ 2HD 
*JIS コー ド の 漢字 に の み 対 応 , テ レス ター の シフ ト JIS に は 不適 . 
シフ ト JIS 漠 字 タ ー ミ ナル ・ ブ ログ ラム 価格 \ 9.800( 送 料 込 ) 
商品 番号 対応 機種 備 考 
WN-028K PC-9801 シ リー ズ 5 イン チ 2D 


WN-029K PC-9801 シ リー ズ 91 77200 
WN-030K PC-9801 シ リー ズ 5 イン ナ 2HD 


WS-031K X1turbo ロイ オイ ンチ クリ 


申し 込み 先 : B151 東京 都 渋谷 区 代々 木 1-37-1 ぜん らく ビル 

帳 コ ム パ バッ ク 「 エ キス パー ト ・ サ ービス 」 係 

(iz) マニ ュ ア ル な と 添付 され て いま せん の で , 1/0 記 事 掲載 号 
参考 に し て くだ さい . 


U NDF YU =a (2) 


[New Pro]: 新 製品 情報 ゲー ム ・ ソ フト 情報 や ば ジネス ・ プ ログ ラム 情報 ,. プリンタ, フロッピ ー デ ィ イス ク な どの 周辺 
Ж >, BMCAL の ユー ティ リティ な ど を 紹介 し て いま す . 

[S1 Tec.| : S1 技術 情報 : シス テム ・ コ ユー ル の 使い 方 や 、 プ レー ク ・ キ ー の マス タク 情報 な どの 技術 テク ニッ ク が 入っ て いま す 

[Inf] : イベ ント 情報 : S1 関連 の 書籍 な ど を 紹介 し て いま す 

[News |: NEWS : S1 ク ラブ の 案内 . マイ コン ショ ー な ど を 紹介 し て いま す 

[Question]: Q & A コー ナー 

[BBS] : フ プリー トー ク ・ エ リア 


S1 ク ラブ の 誕生 を 記念 し て , だ だ 今 S1 を 
お 求め の 方 は 無料 (参加 費 1 年 分 免除 ) で S 
IA FTCA ATSI. 

文 申し 込み 方 法 
「 お客様 登 録 カ ー ド 」 に 必要 事項 を 記入 

の うえ, 必ず 封書 に 入れ て お 送り くだ きる 

ұу, 

w ご 注意 | ハガキ の まま 投 画す る と 申し 込み 受 
KZ け 付 ける れ ま せん . 

文 期間 
昭和 60 年 4 月 1 日 一 6 月 30 日 (当日 消印 
有効 ) 

文 申し 込み 先 

B151 東京 都 渋 谷 区 代々 木 1-37-1 

ぜん らく ビル 5F 

(株 ) テ レス ター「S1 ク ラブ 」 係 


バ パソ コン ・ ネ ットワーク 


TeleStar 


ミニ サイ ズ ・ コ ー ナ ー 


英 は 壁 を すり 抜け る の で 大 変 


1 PC-B000 シ リー ズ 


Ш BASIC x ر‎ 
* ィ イー ティ ンク トッ ト 


ІШ 
ШІ 


見 て いて , これ ぐら いな ら ぼ く で も 作れ 
る の で は な いか と 思い , 作っ て みた プロ グ 
Fh TI 

これ は よく ある パッ クマ ン ・ タ イプ の ゲ 
ー ム に よく 似 て いま す が 。 3 つ 変 わっ た と 
ころ が あり ます . 1 つ は モン スタ ー が 壁 を 
通り 抜け られ る こと . 2 つつ 目 は モン スタ ー 
が 重なる と 地雷 (モン スタ ー 型 ) が で る こと 
(これ は バグ で す が , あっ た ほう が 面白 い 
の で 残し まし た ). 3 つ 目 は ドッ ト を 120 個 
取る と 面 ク リア に な る こと で す ( 面 倒 だ っ 


19 НІх500:С0М501Е0,16%,0,0:С15:060 
Т0540:РІ АҮ" =0т5000 " 
20 5С=0 :Р=3 
30 Вітс165:В2-165:С010Б1:С15:Т-0 
40 PRINT" оооооооооооооооооооооо" 
50 PRINT" ロ ・・・・・ se . = a 
68 PRINT" ロ ・ ロ ロロ ・ ロ ロロ ロロ ロロ ロロ ロ ・ ロ ロロ ・ ロ 
НІ -SCORE" 
70 PRINT" ロ ・・・・ 
“МІ 

80 PRINT "о · оооооооо· · ооооодцоо . о" 
90 РВІМТ "п: sas < sue Фф. an Пп 

SCORE" 
100 PRINT" ロロ ロロ ・・ ロ ロロ ロ ・・ ロ ロロ ロ ・・ оооо 

" SC 
110 PRINT" 
120 PRINT" ロロ ロロ ・・ ロ ロロ ロロ ロロ ロロ ロ ・・ ロ ロロ ロロ 

PACK" 
(180 PRINT" ロ ・・・・・・・・ 

" ІР 

140 PRINIT " ロ ・ ロ ロロ ロロ ・・ ロ ロロ ロ ・・ ロ ロロ ロロ ・ ロ 


0... g 


РЕІМТ Ü 


164 PRINT"O: 000- 000000- • 000. ·0 


170 РЕІМТ "о: 000» -000000 · ‘000۰۰0 


180 PRINT"D 


190 PRINT" ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ 


- EATING 


モー ド を 1, ペー ジ 数 を 2 に し , リ 
スト どおり に 入力 し て RUN. 


モン スタ ー が 璧 を すり 抜け て くる の 
は と て も いい . で も 全体 的 に いま い 
ち 平 凡 . も っ と 工夫 を . ノ 


遊び 方 

まず "HIT SPACE KEY” と 表示 され る 
DT, キー ボー ド で や る 場合 は | SPACE | 
キー を , ジョ イス ティ ッ ク で や る 場合 は ト 
| EATING DOT BASIC リ スト 


288 PX=10:PY=11:X1=10:Y1=5:X2=11 
:Ү2=5:Н=7 

210 ЕОВІ=1Тт01:Х=0 :Ү=0 :А=5ТІСК‹ 6) 
:IFA<>OTHENH=A 

22 IFH= 1THENIY ニ ー 1 

230 ІЕН-ЗТНЕМХ- 1 

240 IFH=5THENY= 1 

250 ІЕН=7ТНЕМХ=- 1 

250 _ОСАТЕРХ,РҮ:РВІМТ" " 

270 А=5СЕЕЕМ‹РХ+Х 。PY+Y) : I FA=32TH 
ENIPX=PX+X : PY=PY+Y : BOTO319 

280 1F ム = 1 る 65THENIFX= ニ PX+X : PY=PY+Y:S 
С=5С+ 10 :Т=Т+ 1: Р_АҮ" о4еЗ6с36" :GDT 
0388 

294 IFñA=128THEN4780 

399 COLOR1:LOCATE25,4:PRINTSC:IF 
T> 1 1?THENI58g 

310 COLOR3:LOCATEPX ,PY iPRINT"O" : 
NEXT 

320 ONZGOTO339 。399 

330 COLOR1:LOCATEX1,Y1:PRINTCHR$ 
СБІЗ:ІҒРУҮІСРҮТНЕМҮ 1=Y 1+ 1 : GUT037Zg 
340 1FY1>PYTHENY 1=Y 1-1 : бОТОЗ70 
350 IFX1 く PXTHENX 1=X 1+ 1: 60Т0370 
360 X1=X1-1 

370 B1=SCREEN〈X 1 。Y 1) : IFB 1= 132THE 
№470 | 

380 COLOR3 :LOCATEX 1 ,Ү1:РВІМТ" Ф" : 
2=2:60т0219 

390 COLOR І: ОСАТЕХ2 ,Ү2:РРІМТСНЕФ 
(B2) 


リガ ー を 押し て くだ る い . 後 は ひだ すら 6 ド 
> F を 食べ て くだ さい . PACK が モン スタ 
ー に 捕まる と PACK カ 1 減り , 0 に な る と ゲ 
ー ム ・ オ ォ オー パー で す 。 


Р.5. 


すばらし い ( マ ? う アオ 77 е (C PO H OS, 
KK 君 ど う も あり が と う ご ざ いま し だ 。 


400 IFX2 く PXTHE ト IX2=X2+ 1 : 6070440 
410 ІЕХ2УРХТНЕМХ2=х2- 1 : GODT0449 
420 IFY2<PYTHENY2=Y2+ 1 : 50Т0440 
480 Ү2=ү2- 1 

440 В2-5СВЕЕМ(Х2,Ү2> 

450 IFB2=132THEN478 

468 COLORƏ:LOCATEX2,Y2:PRINT"#4" : 
2-1:6070210 

470 COLOR1:LOCATEX1,Y1:PRINTCHR$ 
(B1)  (ОСАТЕХ2,Ү2:РРІМТСНРФ4В2) 
480 Р«Р-14(.ОСАаТЕ27,ФеРНБІМТР; " Yi 
Е1-165:В2-165 

490 (ОСАТЕРХ,РҮ:РРІМТ" "ЕұРГАҮ"О5 
lléed+dc+co4ba+" :FORI=1T0300 : МЕХ 
т 

500 ІҒКР-ӨТНЕМ520 


518 60702060 


520 ІҒ5С>НІТНЕМНІ-5С 

538 COLORS:LOCATES, 7:PRINT " GAME 
ОМЕР" 

540 (ОСАТЕ4,Ә:РБІМТ"НІТ SPACE КЕ 
ү" $ 

558 IFSTRIGC@)=1THENIG=9 :G0T020 
580 IFSTRIG( 1)=1THENG=1:G0T020 
570 GOTOSSA 

580 A=" 1 804bbo5cddco4baggab" : PL 
ЁАҮАФ : РЦАҮ"Б8. з 152404" 

590 РАТА : PLAY" а8. о 1694" : ҒОВІ= 1 
70800 :МЕХТ :Р=Р+ 1:6С-5С%500:60Т03 
ñ 
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〇 ⑦PC-6000 シ リー ズ 


BASIC 


ГЕ Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е wi и> 行 番号 マッ プ 


) REM 
| 初期 , 画面 
メイ ン 


ゲー ム ・ オ ー ン バー 
|| スペ シャ ル 


нак -АА са Окан REY жете eK 自分 の X, Y 座 標 
あな た は 。 エイ リア ン と 戦わ な けれ 人 Пиз» n: +. エイ リア ン の X, ҮШІН 
な ら な く な っ て し まい まし た 。 エイ リア シン 地雷 に 当たる と 死に , ポイ ント を 取る と | スコ ア 
は 地雷 を 仕掛 け 。 ポイ ント や スペ シャ ル ・ ポ x Z71075 xšSW Т, (スペ シャ N | ハイ ・ ス コア 
イン ト な ど を 置き な が ら 動 きま す . ル ・ ポ イン ト を 取る と エイ リア ン の 動き が 上 まり 地雷 な ど に 当たっ て 6 死に ませ ん . 
娘 ミ ニ PiO イ ン フ ォ メ ーション まだ , エイ リア ン に 当 だ れ ば 倒す こと も で 
モー ド を 1. ペー ジ 数 を 2 に し リ この スペ シャ ル ・ ポ イン ト は あき ら め る か きき ます. この きき め は 少し だ つた 消え る し , 
エイ リア ン が 自分 の 方 に 向かっ て き 
た り , 壁 な ど で 迷 路 の よう に する と . Р S. 
| も っ と 面白 く な る の で は ? 
は この ゲー ム は オー ル BASI6G で 。 べつ に 
遊び 方 - 難し い 命令 も 使っ て いな い の で , 改造 し て 
ыы; - オォ オリジ ナル な 物 に し て くだ さい . 
全 を カー ソル ・ キ ー で 操作 し て エイ リア 7 | - 
> “А Б ТАЛАР чы kS: 5 k SONI U 77 Hee. 0000 


きい . EA YT VDE о 721812, ИЩ پپپ ٽي‎ 


"ж” や ポイ ント ".”, スペ シャ ル ・ ポ イ 


: エ イリ アン ・ ク ラッ シュ BASIC!) А F ника 


IF STRIGCg)=9 THEN 379 
PLAY "“/?оадФ4г3З2е%4г32с32" 
IF S>HI THEN HI=S 
CLS:GOTO ¿B 
PLAY "t25%s°?m????acdeqgcde" 
© COCOR ,,2 
24 FOR Ісі ТО 29 
СОСАТЕ X,Y:PRINT — г" 
A T=STICKIA)  Х-Х%( Тш?) =(T=3) :Ү 
(Тш1і)-(Т-5) :Ү=ү-(Ү<2) +(Ү? 13) 
メニ メー( て 1) +0730) 
LOCATE Y PRINT "4" 
IF ※=TX AND Y=TY THEN 510 
й NEXT COLOR ,,1:060Т0 120 
PLAY" こ は Bq ロ B ほ 8 ロ 8 ロ 8 こ 8a8 ロ " 
СОСОК, 
6=5+10:7х=15:Тү=12:60Тт0 120 


РЕМ XX メメ メメ メメ メメ エメ メメ メメ メメ エメ 
КЕМ xx 14077 クラ ッシュ xx 


190 IF X=TX AND Y=TY THEN 38080 
200 IF Нт-Аа5С("."; THEN PLAY "с&4 
":6=5+ 1 3 

210 Ат-ІМТЕРМГО( 1} ЯЗ) :M=PND( 12 

220 B=INT(RND(1>X31 :IF M< .05 THE 

М E*$=",":GOTO 250 ` 

230 ІҒ М<.5 THEN: E$=m" х" 

240 IF М>.5. THEN Е%="." 

250 LOCATE TX,TY:PRINT E$ 

26й Tx=TxX+(A=1) -А=0) :TY=TY+(B=1 

9-(ВБ-й) ТХ-ТХ-(ТХ<12%(ТХ>380; 

278 ТҮ-ТҮ-(ТҮ<с<22%С(ТҮ21392 
LOCATE TX,TY:PRINT "&" 

298 LOCATE %,ЙІРРІМТ6:050Т0 120 
PLAY "%255":ҒОК ік! ТО 10 
COLOR, ,2:LOCATEX,Y:PLAY"T" sc" 
PRINT"x" LOCATEX , Ys PLAY" 59: 
MM LL OCA T EX : PLAY" Se 
PRINT -*X"+NEXT COLOR 93:1 
LOCATE19,8:PRINT" GAME OVER" 

340 ( ОСАТЕВ, 18 :РРІМТ "HIT SPACE 


SCREEN Ж, Жу .CONSOLE0 , 16,0, 9 
CLS:HI=0 

@ バニ 5 』:Y=5 : メニ 15 

70 TY=12:S=0 』PLAY "о0659т9999" 
FORI=ØT031:LOCATE I, 1:PRINT"# 
LOCATE I ,14sPRINT "#" $ NEXT 
FOR 1=2 TO 13:LOCATE 0,I:PRIN 

T WwW“ :5РСС30) ;"@#* :NEXT 

100 LOCATE 8,9:PRINT " SCORE";S: 

LOCATE1?,8:PRINT"HI-SCORE" ; НІ 

r20 COCATE X, YIFRINT 57 

130 T=STICK(B) :X=X+(T=7) -(T=3) :Y 

=Y4(T=1) -(T=5) :Ү=ү-(ү<2) +(ү? 13) 

140 Х=ҳ-{Х<1) + (X> 39۲ 

158 H=SCREEN(X, Y? 

188 LOCATE X,Y:PRINT "Фе" 

170 IF H=ASC(", "y THEN S=S+5: GOT 

0 412 

188 IF H=ASC("%*%"} THEN 399 


ll 
ІШ 
ІШІ 
ІІ 
ІІІ 
ІІІ 
ІІ 
ІІ 
ІІ 
ІШ 
ІІ 
ІІ 
E 


ы 車 3 台 を コン トロ ー ル する の は 至難 の 技 ! 
lll 


シリ ー ズ ы 


ІШ 


Кк 


Ш u 、 Ü ФЕР ЕН 修 9— || 


ЭәәШф-бзесбесетееесевевеевеевквеесеевосеяже 
普通 の スク ロー ル ・ ゲ ー ム を 3 つく っ つ スク ロー ル ・ ゲ ー ム で す が 。 この ゲー ム は 

け て みよ うと 思っ て 作っ た ゲー ム な の で す いっ ペ ん に 3 つの 車 を 拘ら な けれ ば な りき ま 

で な っ そ も ま いま も た 。 せん 。 両端 の 車 は ひだ すら 6 "ж" を よ け , 

x š SPIO Z 7 + X —> a м тамы. "+” を 取っ て くだ さい 。 1 

守る まで | モー ド を 1 ペー ジ 数 を 1 に し 。 リス に 気 が 集中 し じ し て いる と す で 死 ん で し すま | o 

а о | | と あり に 入力 し て RUN. い 3 回 落と し 穴 に 落ち る と ゲー ム ・ MRE 
。 aq, | アイ デア は 単純 で す が , な か な か 楽 オォ オー バー で +. — —< рыб 

し め ま す ね . 表 1 変数 表 画面 の 表示 


70~100 | 車 を 動か す 

110—115 | 車 が 落と し 穴 に 落ち た と き の 処理 
120—130] 宝 を 取っ た と き の 処理 
140—170| | ゲー ム ・ オ ー バ ー 


遊び 方 


カー ソル ・ キ ー の |+| と [っ | で 車 を 操り , 
室 を 取っ て 落と し 究 を よ け る と いう 普通 の 


ソノ シー ト の 活用 に つい て ,. 本誌 か 6 切り 取っ た だ ソノシート を カセ ッ ト に 録音 し て ゲー ム を 楽し む な ( あ だ り ま え で すね ). 次 に ソノ シー ト を 


ө ° - . 
SS レコ ュー ド の 形 ( 丸 く ) に 切り , あま っ た 部 分 で 立体 メガ ネ を 作り , それ で 遊ぶ ( 赤 と 青 の 2 枚 入り の 場合 の み ). 次 は ソノ シー ト て 英会話 の レッ 
スン を する (ヒア リン グ に 最適 で す ). 最後 は シン グル 盤 の ジャ ケッ ト に し まい 。, 大 切 に 保存 する . ( 初 投 稿 の タカ ちゃ ん マン ) 


piO 


プロ グラ ム 


10 CONSOLE0,15,0,1:CLUS:CLEAR:X=4 
:Ү=3:М=3 

28 (ОСАТЕХ%2й0,Ү:ЗРБІМТ" ^" 
88-СОСАТЕХТТІРКІМТ е” 

35 LOCATEX+10,Y:PRINT" ¥" 

48 A=SINTIRND< 1) XF) +1:LOCATEA, 14: 


РРІМТ" х" 

50 В=ІМТ‹ЕМО‹ 1) 9) +21 :1 ОСАТЕВ, 13 
:РКІМТ "х" 

88 C=INT ЕМО 1) 9) + 11:1 ОСАТЕС, 13 
PRINT" +" 

85 LOCATE, 14:PRINT" | 


難し すぎ る と いう 人 は 落と し 容 の 出る 回 
数 を 減ら す よ うに 改良 する か , ブロ グラ ム 
カー トリ オ BASIC リ スト ЕКЕ 


| Ке 
70 5-5ТІСКСЙ» : I FS=3THENX=X+ 1 
88 ІҒеЕ-?ТНЕМХ-Хх-1 
ra IF※X て 1THEN※= 1 
100 ІҒХ>ФТНЕМхХ-%9 
110 IFSCREENCX ,Y? =4 2THENLOCATEX , 


Ү:РЕІМТ "+" :60Тто 149 

115 IFSCEREENCX+ 2 ,Y>=42THENLOCAT 
EX+28,Y:PRINT"+":GOTO 140 

120 ІҒӘСВЕЕМ(СхХж18,Ү2-А4ЗТНЕМІ ті + 1 
ОВ:Р_АҮ "1 25а" :1 ОСАТЕХ+ 10 ,Ү:РЕІМТ 


" 


AEREE ССТ (778; 


の どこ か に 時 間 か せ ぎ の FOR 文 を 入れ て 


132 1-1%1:50Т0 20 
148 PLAY"b" :М=М- 1 : IFM=ATHEN 1 40 
158 LnCATE :PRINT"t¢ Zh" $L; 

155. ОСАТЕӨК 1: РКІМТТ МИЯЗМІ ZU F 
ОВІ-170880:МЕХТ:бОТО 20 

150 LOCATE19,7:PRINT"GAME OVER" 


170 LOCATE18,8:PRINT"SCORE=";L :Е 
ND 


BASIC 


この ゲー ム は , 反射 神経 を まっ た く 〈 使 わ 
な い , 記憶 力 と 多少 の 運 だ けが この ゲー ム を 
左右 し ます . この ゲー ム で , あな た の 記憶 
力 を きた えて くだ さい . 

大 ミニ PiO イ ン フ ォ メ ーション 
モー ド を 1, ペー ジ 数 を 1 にし, U 
スト どおり に 入力 し て RUN. 


表示 時 間 を 短く する の は 考え た わ ね. 
で も , 答え る 時 間 も つ いで に 考慮 し 
て ほし か っ た な . 


タイ トル 表示 中 に 好き な キー を 押す と 
ゲー ム ・ ス ター ト . まず 4 桁 の 数 字 が 表 
示さ る され ます .。 そこ で , この 数 字 を 10 カ ウン 
ト 終 わる 前 に 記憶 し て くだ さい . ЖАЖА 
NFS と 正解 が 表示 され , 当たっ て いれ ば 
スコ ア に 1] 点 加算 され , 次 の 問題 に 入り ま 
+. 最初 は 簡単 で す が , 桁 数 が 5.6,7… と 増 
えて いき ます . 最高 は 9 桁 ま で で , それ を 
8 桁 目 も 無事 クリ ア ! 


*** ХУ, 9-4 ++» 
SCORE: 4 HI-SCORE: 8 MISS: 1 


TIMER 0000000000 


8? 53 
mê 21171653 77%. 


1 CLS:SCREEN 1,1,1:COLOR 1:CONSO 
LE ?,é,0 ,0:H=0 
2 LOCATE ó, 2:PRINT"X%% афи 7" 


З LOCATE 4,7:РРІМТ"ТІМЕР" 

4 S=0:T=300:HM=0 

5 В=?ййй:С=1ййй:р=4 

る LOCATE 8,4:РБІМТ" SCORE:";9;" 
HI-SCORE:";H;" MISS:i";M;" " 

7 CLS:LOCATE 12,7:РБІМТ" 


З LOCATE 10,10:PRINT"HIT АМҮ KEY 
ГЕ” 

9 IF ІМКЕҮФ="" THEN 9 

18 CLS:A=INT(RND< 1) XB-1)+C:Á$=ST 


〇 ⑦PC-6000 シ リー ズ 


ォ ー ル BASIC で , あま り 難 し い 命 令 も 
使っ て いな い の て 神 機 種 へ の 移植 も 簡単 だ 
と 思い ます . カウ ント の スピ ー ド を も っ と 
速く し だ いと いう 人 は , ТОЙ 2 100 b 
200 な り に 変え て 楽し ん で くだ る さい . この 
ゲー ム に 強く 《 く なると, 車 の ナン バー や 電話 
番号 な と ど を 瞬時 に 記憶 する こと が で きる よ 
うに な る か も (?) し れ ま せん . 


ЖІ 行 番号 マッ プ 


変数 設定 , 画面 作り 
乱数 発生 (問題 作成 ) 
問題 表示 
カウ ント 


答え を 入力 

正解 表示 
| 当たっ た か , は ずれ た か を 判断 
ミス 処理 
| ゲー ム ・ オ ー バ ー, 再 ゲ ー ム 処理 
| 正解 処理 


乱数 
乱数 っ 文字 列 
キー 入力 

ルー プ 用 

時 間 待 ち ル ー プ 用 


RECA) 

11 PRINT" % "u"; FOR I=0 TO 
500:МЕХТ І:РБІМТ А 

12 LOCATE 12,7:ҒОВ I=0 TO 9:іР( АҮ 
"о&с&4" :РРІМТ "о" { 

13 FOR J=0 ТО Т:МЕХТ Ј:МЕХТ IPL 
АҮ" о7с4" CLS 

14 INPUT" стан {х 

15 PRINT" tudl ";:FOR Ісі Т 
О D:FOR J=0 TO 200:МЕХТ J 

16 PRINT MID ま $CAE 。 エ + 1 。1) $ iPLAY"o4 
еб4":МЕХТ ГЕРКІМТ" 773." 

17 IF АтХ THEN GOSUB 25:50Т0 é 
18 FLRY" ] 1óo3gfedc" :M=M+1:FOR J= 
© ТО 5004МЕХТ Ј:ІЕ М<73 THEN 4 


私 の P6 は 中 古 で , Ұ2ОКІЕРСІТСАН 
まし だ . パソ コン が 欲し く て も ,。 お 金 が な 
く て 買え な いと いう あな だ / 無理 あし な 


いで 中 古 に し まし ょ う 。 そし て 中 古 に する 
な ら , 安く て 性 能 が 良く (?), ソフ ト も 多 
い フ パピ コン を 扶 ゅ ましょ の 


START 


19 IF H<S THEN Н-5 

28 CLSYTLOCATE 0,ІМІРКІМТ" x RR 
AME + уы" сен Жы Ми си йы 
PRINT : PRINT" REPLAY (Y/N) ? 


I$=INKEY$:IF I$="y" THEN 4 
IF 1 ま ="n" THEN CONSOLE @,14&:С 


24 GOTO 22 

25 РГАҮ"1164о5сдеҒай" :S=S+1:B=BZ1 
@:C=CX10:D=D+ 1 

28 FOR J=0 ТО S00:NEXT J:IF D=10 
THEN Т-Т-%0:60Т0 5 

27 RETURN 


PC-8000 シ リー ス 


N-BASIC 


SALCE. 光 葉 孝一 (みつ た け こう 
いち ) で す . この プロ グラ ム は 桜庭 者 と 作 
っ た ゲー ム の N-BASIC 版 で 。 ザ ・ ケ イ バ 
mkII と いう 名 前 で す . これ は 4 人 ま て 遊 
べ る シミ ュ レ ーション ・ ゲ ー ム ( ? ) で す . 
廊 ミ ニ ロ OO イン フォ メー ショ ン 


| リスト どおり に 入力 し て RUN. 


| この 程度 の 長 さ なら も っ と 本 物 に 似 
せら れ た ん じゃ な いか な ? 


ЖОЛ 
人 数 (1 一 4 人 ), 名 前 を 入力 し たら , 1 人 


ずつ どの 馬 に 掛け る か 聞い て くる の で , ЖЕ 
率 や 確率 を 参考 に し て 馬 の 番 号 を 入力 し て 


19 WIDTH 40, 25: CONSOLE 09,25,0,1 
20 PRINT СНКФ (12) :COLOR 5,0,1 
50 LOCATE 7。6sPRINT " пи 
пш" 
40 LOCATE 7,7:РКІМТ " ШЫ в 4" 
50 LOCATE 7,8: РКІМТ "ШШШ ина А 
| ш" 
69 LOCATE 7,9:PRINT " M B 
| p" 
70 LOCATE 7,10:PRINT " 
АҒ м." 
B9 LOCATE 7,11:РБІМТ " S ғ 
” сы 
9@ COLORé, @, 1:1 ОСАТЕ26, 15: РКІМТ "mk 2" 
190 1 ОСАТЕ12, 12: РКІМТ "Ьу ミリ ウケ コウ イチ リ 
119 (ОСАТЕ12,18:РБІМТ "% 9250" ケン イチ " 
129 FOR В=1 ТО 20 
129 IF B=1@ THEN COLOR 2,9, 1:1_0САТЕ 20,2 
2:PRINT "by MITTAKE-SDFT" 
149 FOR D=Q TO 2 
150 FOR Ісі ТО 5: ВЕЕР 1:FOR 2-0 ТО 2:МЕХ 
Т JiBEEF の kNEXT I 
FOR 7-1 ТО 3@』NEXT Z 
NEXT D 
FOR Z=1 ТО SƏ:NEXT Z 
NEXT B 
FOR Y=1 TO 4:М(Ү) =1000: МЕХТ Y 
I=@:WIDTH Во, 25: COLOR 6,0,1 
ІМРИТ"2/Л792 N (1-4) "31. 
IF 1>4 ОК L<1 THEN 220 
FOR Y=1 TO L:COLOR 7,0,1: INPUT" МАМЕ 
"N$ (Y):NEXT Y 
25@ РКІМТ CHR$(12):COLOR フ 。 の 9。1:LUCATE 39 
ВіРКІМТ "95409; SPC (3) $ "カク リウ" 
250 АФ-"ІМҮЯШ-":ВФ-"579-;-К--":СФө-елЗУЭЖ 
І-2!ірөл"уулС ОАК А7" Еф" РО" е 4" ЕФ" 
ミヤ コノ ー ロ ー ト ~ " 
279 COLOR 5,9,1:LOCATE 22,10:РКІМТ "1 
A$;SPC(9);"1@Y 4 | 35 7" 
289 LOCATE 22,11:PRINT "2 ";B$;SPC(4);"1 
ЗМ-4 1 21 7" 
299 LOCATE 22,12:PRINT "3 ";С%;5РС(7);"1 
Жул 121 7" 
300 LOCATE 22,13:PRINT "4 ";0%;5РС (5) ; "1 
ҮЛ E 1 21 %" 
310 LOCATE 22,14:PRINT "5 ";E$;SPC(6)}; "3 
өк 1 Ey 
520 LOCATE 22,15:РКІМТ "6 ";F$;SPC(6);"3 
ONA К 5 
330 FOR Y=1 TO L 
540 IF M(Y)<= の 9 OR M(Y) >=5@0@ THEN 990 


ғи ж 


F e ғ ш 


の 方 を くだ さい . 


G 4 


くだ きる きい. する と | SPACE | キー で 馬 が 走 
り 始め ます . 


最初 は みん な 1.000 円 か ら か ら 始 まり , 1 
回 掛け る ご と に 100 円 ずつ 減っ て いき ます . 
な お , 掛け だ 馬 が 1 着 に な る と 100Xx 倍 率 の 
分 だ け お 金 が 増え ます . 

そし て 誰か が 0 円 まだ は 5,000 円 以上 に な 
る と , 残り 金額 が 表示 る れ て ゲー ム ・ オ ォ オー 


バー で す . 
プロ グラ ム 


何 回 も 改造 し た の で 読み や すく , リス ト 
を 見 れ ば ど うな っ て いる の か すぐ わか る と 
思い ます . 最後 に ある DATA 文 は , 意地 


550 COLOR 5,0,1:1ОСАТЕ 3, 2:PRINT N$(Y) 5" 
a E ЭЛЕ カケ マス お aa Ay AD AE Bai Sod 
360 INPUT R(Y):LOCATE 20,2: РКІМТ " 


370 IF R(Y)<10RR(Y) >:60RR( Y ) = の 9 THEN 350 
580 M(Y)=M(Y) 一 1 の 99 ' 
590 NEXT Y 
4@@ FRINT CHR$(12):COLOR 2,9,1 
419 T=INT (RND (1) ж22+1) : LOCATE 30, 12:PRIN 
T "スペ ヘー ス キー Э 1:779“ 94!" 
420 IF INKEY$=" " THEN 440 
459 GOTO 410 
440 PRINT CHR$(12):I=I+1 
450 COLOR 4,0,1:10САТЕ 1 さ 。1:FRINT "2" 4 " 
Is" 1-2" 
LOCATE17,17: РКІМТ "カチ スウ " 
LOCATE 1 1 。 19:PRINT" 1 "; АФ; " 
LOCATE1 1 。29sPRINT "2 "B$" ";К2; 
LOCATE 1 1 。21 』PRINT "る "C$; " "3K る 5 
(ОСАТЕ11,22:РБІМТ"4 ";D$;" "3K45; 
(ОСАТЕ11,22:РКІМТ"5 ";Е6;" "КӘ; 
LOCATE1 1 。24:PRINT"6 ";F$;" "; Кё; 
X 1 =1 1 : X フ =1 1 : X さ =1 1 』 X4=1 1 : X5=1 1 : X6=1 1 
FOR G=4 TO 14 
COLOR 2,0, 1:LOCATE 66。6sPRINT "1% 
NEXT G 
FOR H=4 TO 14 STEP 2:A=INT(H/2-.5) 
COLOR 1,@,1:LOCATE 7@,H:PRINT А; 
NEXT H 
FOR 0=4. TO 14 STEP 2:А-ІМТ(0/2-.5) 
LOCATE 7,Q:PRINT A;" "; А; "®"; 
NEXT O ` 
= の ! A=2 
5=5+1 
FOR R=8 ТО 71 
COLOR 7,0, 1:LOCATE К,А: РКІМТ "ш" 
NEXT R 
IF S=1 THEN A=15:GOTO 640 
COLOR 7,@,1:T=INT(RND(1)#22+1) 
FORV=1T02:BEEP1:FORJ=0@TO1:NEXTJ 
ВЕЕРФ:МЕХТУ _ 
IFT=20RT=BURT=160RT=21THEN7B の ひみ 
ІЕТ-5ОКТ-10ОКТ-140КТ-2ОТНЕМ790 
IFT=40URT=7URT=1 る DRT=19THENBO の 
IFT=60RT=90RT=1 1 DRT=17THEN19 
IFT=10RT=18DRT=22THENB ヨ 2 の 
GOTO 820 
ХітХ1%1:( ОСАТЕ Х1,4:РКІМТ " %iP";: GO 
TO 840 
790 X2=X2+1:LOCATE Х2,ө:РБІМТ " 7О0ғ””;:бО0 
TO 840 


[OE 


を その と き は 別 の 名 前 に する で し ょ う . 


こら , シン ボリ ルド ルフ , 頑張 れ ! 


悪 な こと に 使っ て いま す .。 な お , BEEPË 
の と ころ は マイ コン ゲー ム の 本 [1] を 参考 
に し まし だ (な か な か か わい い BEEP 音 だ 


と 思い み ま す ). 
P.S. 


この ゲー ム は 4 和信 ま で 遊ぶ こと が で きま 
+. な る で くだ くき ん の 人 と 一 緒 に 遊び ま 
0 0 

これ か ら も どん どん 投稿 し よう と 思う の 
T DORT の А2 2%, で が 


ザ ・ ケ イ バ mkII_ BASIC U А F ms 
800 X さ =X さ +1:LDCATE X さ 。BsPRINT " sp"; GO 


TQ в40 
Х4=Х4+1:1 ОСАТЕ Х4,10:РКІМТ " ДР"; : 5 
840 
X5=X5+1:LOCATE X5, 12:PRINT " Р"; : 6 
840 
X6=X6+1:LOCATE Х6,14:РБІМТ " МЫР";:6 
850 
ІЕХіІ-65ТНЕМАФ-А%:К1сК1%1:/0-1:65070910 
ІЕХ2=65ТНЕМАФ=В%: К2=К2+1:0=2: 5070910 
ІЕХЗ-ФЗТНЕМАФ-С%:К5-кК5%1:0-5: 6070910 
IFX4=63THENA$=D$: K4=K4+1: =4: 65070910 
IFXS=é63THENA$=E$:KS=KS+1: U=5: BUTO919 
IFXé6=63THENA$=F $: KO6=K 6+1: U=6: 565070910 
GOTO 690 
FOR Z=@ ТО 4@@:NEXT Z:COLOR 6,0,1:10 

CATE 5O, 20:FRINT А%;" / NF"; 

2 の IF U=1 THEN М-10 

930 IF U=2 ОК U=3 OR U=4 THEN M=15 

9409 IF U=5 ОК U=6 THEN М-30 

950 FOR 7-0 ТО 1400: МЕХТ Z 

969 FOR Y=1 TO L:IF R(Y)=U THEN M(Y)=M(Y 

)+199*M 

970 МЕХТ Y 

980 GOTO 250 

999 PRINT CHR ま (12) :COLOR 4,0, 1:1 ОСАТЕ 32 

„4: РКІМТ "G A M E ОУ E FF 

1000 J=1@:FOR Y=1 TO L 

1010 COLOR 7,0,1:1ОСАТЕ 50,02:РКІМТ N$(Y) 

кн Ж? OI T "A 

1020 J=J+2:NEXT Y 

1030 COLOR 2,0,1:10САТЕ 32, 20:PRINT "モウ ィ 

wp4 ТӘП? Y/N"; 

1040 IN$=INKEY$:IF ІМФ-"Ү" OR IN$="y" ТН 

EN RUN 

1950 IF IN$="N" ОК IN$="n" THEN WIDTH 40 

,20:7-8:60Т70 1070 

18609 GOTO 1040 

1070 READ A:IF A=0 THEN 1090 

1080 LOCATE Z.1@:PRINT CHR$(A);" ";:2=2+ 

1: GOTO 10970 

1090 FOR 2-1 ТО 2000: МЕХТ 2: КОМ 

1100 DATA 186,201, 32,185, 222,176, 209, 52, 

202,52,212,210,217 

1119 DATA 186, 19,182, 222,52, 195,222, 185 

.197,178,0 


p PiO'85 年 4 月 号 p102 “まし ん 語 勉 強 中 の PASOPIA 7 " さん へ . P.M.A と は フィ クタ クション で あり , 主 に パソ ピア 7 の 現状 打破 の た め に 会 
話 形 式 で ユー ザー に 呼び か ける 架空 の も の で す . し た が っ て P.MLA. に 入る の は 無理 で す . 今度 第 2 回 MEETING を や ろう と 思う の で , 意見 
いずれ 実際 の 会 を 作り た いと は 思い ます が, 
7 の ソフ ト は な く , 私 の 投稿 6 すべ て 没 ど っ た だ . 2 月 号 の PiO ス クエ ア で 場所 を 取り 過ぎ た の が いけ な か っ だ の だ ろう か .。 それ と も 調子 に の 


PS. 4 月 号 は ひど か っ だ .。 パパ ソン ピア 


БЮ 


О PC-6800 シ リー ズ (PC-9800 シ リー スズ) 


Nss -BASIC 


SKI бАМЕ 


どう せ ぼ く は スキ ー を 知り ませ ん が ( 白 
い 寺 の バカ ヤロー…ー), うま く や れ ば 本 当 に 
スキ ー を や っ て いる 気分 に な れる と 思い ま 
FCI 

な お , 14201701=1МР(0) £ I=INP(& 
HE0) に すれ ば PC-9801 で も 動き ます . 


#075 


› жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
1010 "ж 5КІ САМЕ ж 
1020 "ж 1985/3 by H.K ж 
1030 "ж PC8801/mk2, PC9800/E/F ж 
" жж ж жж жж ЖЖЖ Жж ЖЖ ЖЖ Жж ЖЖЖ Ж ЖЖЖ Жж жжжжжж 


ーーーーー 
ニニ ニニ デー 


INIT. ROUTINE 


WIDTH 80, 25: CONSOLE 0; 25,0,1 
SCREEN 0, 3:CLS 3: SCREEN 0, 0 
RANDOMIZE VAL (RIGHTS (TIMES, 2) ) : COLO 


1110 LOCATE 10,5:РБІМТ "жжжжж SKI GAME ! 
|! жжжжж"” 

PAINT <320, 1002,7 

DEFINT A-Y:T$=" 1Ф1 ":U$=" | 


1150 '== 
C=0:X=40:E=8:F=14:Q=40:G=10:LG=30 
GOSUB 1350 

F=14:LG=40:G=9:GOSUB 1320 
E=4:G=8:GOSUB 1320 
F=12:LG=50:G=6:GOSUB 1320 
E=3:LG=60:G=4:GOSUB 1320 


=== MAIN ROUTINE 


スキ ー ゲ ー ム 


リス ト ど お り に 入力 し て RUN. 


ちょ っ と 単純 すぎ まし た ね . 何人 か 
で レー ス で きる よう に し て みた りす 
る と よい の で は ? 


“М” “p” (ポール) の 間 を 通り 抜け る だ 
け で す . キー は |1 | 上 |3| で それ ぞ れ 左右 に 
動き ます . キー を 左右 の 手 で 動か せ ば , ス 
トッ ク の つも り に な る で し ょ 5. 
U SKI GAME BASIC! АР! 
1230 F=4:LG=60:G=5:GOSUB 1320 


1240 ° 
1250 LOCATE 9,5:PRINT “лау2” カイ スウ ハー ";С;" 
24>7л11!" 


LOCATE 10,7:РБІКТ ” (С) =CONT/ (E) =EN 


IF INKEY$="C" THEN 1160 
IF ІМКЕҮ%<>"Е" THEN 1270 

SCREEN 0.3:CLS 3: SCREEN 0, 0:COLOR 7 
END 


CYCLE 
PRINT "STAGE CHANGE” 

FOR Н=1 TO 700: BEEP 1: BEEP 0:NEXT H 
S$=" 7%5РАСЕ% (F-1)+"F ” 

FOR J=1 TO LG 


1380 Z=RND (1) : Q=Q+E* (= (Z<=. 5) ж (Q>3) + (Z 


>. 5) *(80>Q+F+3+E) ) 


1390 LOCATE ©, 25:PRINT 5%:ВЕЕР 1:ВЕЕР 
0 è 

1400 LOCATE X,21-G:PRINT U8 

1410 FOR К-і TO G 

1420 I=INP (0) : Х=Х- (1=253) ж (X>3) + (1=2 
47) ж (X<70) 

1430 LOCATE X, 22-С:РВІМТ U8:LOCATE X 


スー イ , スイ . ストック さば きも 軽やか に 


| 転ん だ 回 数 
ポー ル の 動き の 振れ 幅 
= | ボー ル の すき ま 
| 上 下 の ボ ー ル の 間隔 
| (ЛО) 
| 押し た キー の ボー ト 番 号 


| 1 ステ ー ジ の 長 さ 


+1, 23-6: COLOR 1 
1440 
INT:BEEP 1:BEEP 0 
1450 NEXT K 
1460 
1500 š 
1470 NEXT J 
1480 RETURN 
1490 ’ 

1500 ° ===== 
1510 ” 

1520 LOCATE 
3-G:COLOR 2 


MISS ROUTIN 


ポー ル の 位置 
ポー ル の 文字 列 
人 の 文字 列 

スキ ー 跡 の 文字 列 
人 の 座標 

ラン ダム 変数 


PRINT T$:COLOR 0:LOCATE Q,25:PR 


IF X<=Qー1 OR Х>=0+Е-1 THEN COSUB 


Х,22-С:РВІМТ 0#:1 ОСАТЕ X+1, 2 


1530 PRINT " X":COLOR 0: BEEP : C=C+ 1 : X=Q+F 


ノ 2 : RETURN 


Nss -BASIC(86) 


僕 が PC-9801 を 買っ た ころ , ゲー ム が な 
く て 友人 に この タイ プ の ゲー ム を 作っ て も 
ら っ た 覚え が あり ます …. と いう こと で 
僕 に と っ て は 忘れ られ な い ゲ ー ム で す . 
娘 ミ ニ PiO イ ン フ ォ メ ーション 


10 RANDOMIZE VQL(RIBHT ま (TIME ま 。2) ) : MIDTH 
40,25 

20 A=O:C=1:D=38:E=3:F=-1:6=1: CONSOLE 0,2 
5,0,1 

ЗО LOCATE 13,13: COLOR 7:РРІМТ"РЦӨН [S] K 
EY 1“eIF INKEY6<>"S" THEN 30 

40 CLS: CONSOLE ,1 

50 (ОСАТЕ,2:РКІМТ STRING$ (40," B") 

60 FOR 1= さ ТО 25:1 ОСАТЕ,І:РКІМТ"Ш":1 ОСАТ 
E 59.1: РКІМТ" Ш": МЕХТ 

70 LOCATE р,Е: COLOR 


2: РКІМТ "@": ВЕЕР О 


っ て 2 つも P.M.A. の お まけ を 送っ だ の が …・. 


P.S.2 没 が 多い 、. 


(ソソ PC- ヨ 800 シ リー ズ 


に 動か し ,。 ボー ル を 打っ て くだ さき さい. 


P=. 


РС-9801 を 持っ て いな が ら シ ョ ー ト ・ プ 
ログ ラム ば っ か り で は も っ だ いな い / と 悪 
友 BONTI に 言わ れ だ の で , 現在 グラ フィ 
ッ ク 画 面 を 使っ て 少し 長い プロ グラ ム を 作 
っ て いま す . お ぉ 楽し み に ツ 


E か べ う ち ビ ピン ボ ン BASIC д F mama 


80' LOCATE 3,1:COLOR 4:FRINT USING"SCORE 
#H###"; A 

90 IF К<А THEN К-А 

100 LOCATE 24,1:COLOR S:FRINT USING"HI-S 
CORE ####";К 


110 В-ІМР(224):С-С-(В-255) ж (C20) + (B= 247) 
ж (C+2< 57) 

120 LOCATE C,24:COLOR é6:PRINT" ШШШ " 

130 IF E=24 THEN LOCATE 15,11:COLOR 3:PR 
ІМТ"бАМЕ ОУЕК":ҒОК Ісі ТО 5ОО:ВЕЕР 1: ВЕЕ 
P 0: МЕХТ: БОТО 20 


受験 の 前 に 名 を 上 げた か っ だ の に . 


急 が な いと この ボー ル は 返せ な い ぞ 


スコ ア 
キー 入力 


ハイ ・ ス コア 


EN F=1 ELSE Ғ--і 
150 IF D<2 
THEN F=-1: BEEP 1 


160 IF Е<4 THEN б-1:ВЕЕР 1 


170 LOCATE р,Е: РКІМТ" 
180 GOTO 70 


(BLUE-AND-BLUE) 


ラケット の X 座 標 

ボー ル の X, Үйің 

ボー ル の X,Y 座標 の 移動 方 向 

ボー ル の X 座 標 の ラン ダム 移動 方 向 


140 IF. D£=C+3 AND D=>C+1 AND Е-22 THEN в 
EEF 1:А=4+10: 6=-1:Н=ІМТ (RND%2) : IF H=0 ТН 


THEN Ғ-1:ВЕЕР 1 ELSE IF р>57 


":D=D+F: E=E+G 


21 


車 の 移動 , 障害 物 の 左 ス クロ ー ル , 衝突 


u x u 判定 処理 の 3 つ を マシ ン 語 で 行なっ て いま 
MZ- 1 200 ӘОК/С 7. マシ ン 語 が 長い と 思わ れる か も し れ ま 
BASIC 十 (マシ ン 語 ) x せん が , ご く 簡 単 な マ シン 語 し か 使っ て い 
ませ ん . と 言う の も , Z80 の 数 ある レジ 
スタ の 中 で も A, Н, 上 の だ っ だ 3 つの レジ 
スタ し か 使っ て いな いか ら で す . マシ ン 語 
は $8FFF 以下 に ある の で , 8OK/C で も 
32K バ イト あれ ば 実行 で きま す . 


PiO 3 月 号 の PiOPiO と PiO ス クエ ア の 表示 板 の 左 の *? "が アル ファ ベッ ト に 変身 P.S. 
コー ナー に , ミニ PiO の ゲー ム は レベ ル が | する の で , それ と 同じ キー を 5 秒 以内 に 押 私 は マシ ン 語 を 使っ た り , 高速 の ゲー ム 
低い の で は ? と の 意見 が 載っ て いた の で , > な で で だ な さい ご うま や 祥 す こ に 9 の きる 上 を 作る こと が 必 し も ミニ PiO の レベ ル を 向 
反論 の 意味 を 込め て この ゲー ム を 作り まし 障害 物 が 取り 除 か れ て , 車 は 再び 走り 始め 上 る せる と は 思い ませ ん . ゲー ム は や は り 
た 。 ます . な お , 5 秒 以 内 に キー が 押せ な か っ 独創 性 の ある アイ デア が 一 番 求め ゆら れる の 
娘 ミ ニ PIiO イ ン フ ォ メ ーション гу, 5 回 衝突 する と ゲー ム ・ オ ー バ ー で で は な いで し ょ うか ? 


ж-е な お , 80K/C で は 画面 が 少し ちら つき 


短い プロ グラ ム な の に , これ だ け 楽 走行 距離 は 衝突 する た びに 表示 きれ ます . ます . これ は スク ロー ル の スピ ー ド を 低下 
し め る と は りっぱ な も の で す . ゲー ム の スピ ー ド を 落と る な い だ た め に , Z きせ な いよ うに 画面 の 垂直 グラ ン キ ング ・ 
әркім 学ん チェ ッ ク (Ср, А1, 0D) を 行なっ て いな 


[m] ダラ ラム い だ ため で す . 


表 1 変数 表 | R2 行 番号 マッ プ 


[A] | | の キー を 使っ て 画面 の 左 に ある 
車 を 操作 し て くだ るい. 道路 に は ニコ チャ 
ン の 障害 物 が た くる ん ある の で , 上 上手 に よ 
け て くだ さい 。 eS АҚЫ М 

ニコ チャ ン に 衝突 する と , 画面 上 に ある nrg BEE 

また ぶつ か っ て し まっ た . 今度 は C だ プレ イヤ ー の 走行 距離 
カウ ンタ ー 
障害 物 の 発生 確率 
アル ファ ベッ ト の ASCII コ ー ド 
内 蔵 タ イマ ー の セッ ト 
キー 入力 用 変数 
マシ ン 語 スタ ー ト (10 進 アド レス ) 
マシ ン 語 エン ド (10 進 アド レス ) 
書き 込み 中 の アド レス の 数 
書き 込み 中 の アド レス 変数 
マシ ン 語 16 進 デー タ マシ ン 語 デー タ の 読み 込み 
デー タ の 1 桁 目 の 1 0 進数 化 | マシ ン 語 デー タ 
デー タ の 2 桁 目 の 1 0 進数 化 
1 0 進数 化 さ れ た マシ ン 語 デー タ 


NIC ROAD BASIC !) д Кї 


i LIMIT $7FFF:PRINT"E":GOSUE 56:55=0 33 CURSOR 21, 1:PRINT " 
2 TEMPO 4:РЕІМТ"Е":М5=0:Н=0: 60508 30:60 || 34 CURSOR 21,2:РЕІМТ"ООООО!" 
SUB 33:SC=Q:GOSUB 22:GOSUB 29 35 CURSOR 21,3:PRINT"'—— —":RETURH 
3 USR($S030) : USR¢( $8448) : MUSIC"TCSTEZTCS 56 CURSOR 5, 5: РЕІМТ "EBES РАНІС FOAD 
“Е2"С37Ғ2765" š 
4 IF C=0 THEN (5К(%80Е82:60Т0 7 57 CURSOR 9,12:РКІМТ"?и/2 77-9 ヨミ コミ 
5 GOTO 7 #20" 
6 C=C+1:IF С>1 THEN С=й 58 Ріс52768:РН-16ж29:Р2-РіЗРН-1 
? ЕК-ІНТ(ЕМО(12ж50; 59 FOR RD=P1 TO P2:RERD D$ 
“^^ КК=0 THEN CURSOR 357, 15:РЕІНТ CHR ま を まく 48 E1=HSCECRTGHT ま (CD ま ,1) う ES2=HSCCLEFT ま (DD ま 
` 122 
Э USR( ま 8148) 41 IF KE1=>48 ぅ CE1=X5 ァ ) THEN 01=Е1-48 
18 USR($8180):IF РЕЕКСФ8Ғ20)=1 THEN 17 || 42 IF (Еі=>65)*‹Е1=‹78> THEN D1=E1-55 
11 5С-5С%1:60Т0 4 45 IF СЕ2->482ж%<Е2-<57) THEN С2=Е2-48 
12 R=INTCRNDC1)*24)+66:TI$="000000" 44 IF CE2=>65)*CE2= く 7) THEN D2=E2-55 
15 CURSOR 16.2:РКІНМТ CHR を CTR? 45 0=16+02+01:РОКЕ AD» D:PN=FN-1: CURSOR 
14 GET G$:IF б%=СНЕ%СЕ› THEN MUSIC"TD2" || 21, 16:PRINT РМ: " ":NEXT:RETLIRN 
: USR $6160) :G0SUE 50: RETURN 100 REM は ア トド レス リサイ サン 92” BE ロロ 2Fb 
15 T#=RIGHT$CTI$,2):CURSOR 18, 2:FRINT Т DATA 26: SF, 2E: 00, 7E, 2E, 02: 86 
$:IF UHL(T 和 まう =>5 THEN Н-1: БЕТПЕН DATA 2Е,05,.77,2Е.01,7Е.бр2.12 
16 GOTO 14 DATA 80: 3C, 2E: 04, 77, C3, 00, йй 
17 MLSIC"”B1F17B2":POKE $8F20, 0: М5=М5+1 DATA Z6: 8F» 2E , 8, 7Е, 2E , 日, 96 
: CURSOR 20%М5,2:РБКІМТ"Ө":С05МБ 5%, DATA 2Е,06, 77, 2Е,09, 7Е,02, 2Я 
18 IF М5=>5 THEN 60508 22:65070 2 РАТА 89, 3D, 2E, ØC, 77, C9: 0G, OA 
2E, 20:3 
6, 


2B- 56.00, 26, 36- 00, C3, 0A 
AA» 14: SF. 22,08, EF . 26: SF 
ZE» QA: 36, 28: CD: 18,80, 2A 
ОВ, ЗЕ. 36: 00, 26: SF, 2Е› GA 
Z6: 50, CD, 13: 80, ZA, 0B, SF 
ZB: 56. 00. 26, 36- OA, C9, O4 
КЕМ h2? э ウゴ NZ 88E38-S142#. 
DATA СО,1В.00,р6,41.С2.198,81 
DATA 28.109.8Ғ,70,ре,45.С2.ҒА 
DATA SA, C9: 22, AS: SF» 26: SF» 2E 
DATA ӨЯ. 36 28: CD. 13,386, ZA, 0B 
DATA SF. 22: 18, 8F , CD: SS. 8A, CD 
DATA 428, 34, C3, 00, 06: AÛ: aB, 00 
DATA CD: 18,00, Dé: SA: C2: 42, 31 
DATA ZA: 14: 8F. 70,06, さじ ビュ マロ 
DATA 21:09, 22: QQ, BF» 26: EF, 2E 
DATA 02,56. 23: CD «Ad, 86, 2А, 05 
DATA SEF: 22: 18: 8F ,CD, 58,808, CD 
DATA Са, 50. C3: 80. OA: оа, да, па 
КЕМ ыс») 520-10 8148-817ҒЫЬ 
DATA 26: D1: ZE: 68, 56, BB, 26, SF 
DATA ZE: 30, S6: 68: 2Û: 36, D1 A 
DATA 50.8Ғ,?Е.р6,СҒ,С2.69,81 
DATA 286-00, 00, 00, 36: CF» 235, 36 
DATA 00,23,22; 30, SF» гс. D6, Dê 
DATA C2» 57:81: 7D Dé: FE: CA: 57 
DATA 81.С9,00. 00. an, 28.00, aü 
FEM bb ヨウ トリ ロン テイ әз!) 818й-81СҒЫ 
DATA 26.8Ғ,2Е,й02,256.28,2Е,ӨН 
DATA さら 5: 23: 2A: 1d: SF Z22: OB: EF 
DATA 22.08.8Ғ,25.7Е.бО6,СҒьС2 
DATA Н1.81.26.8Ғ.2Е,20,56,01 
CATA C3: CD, 00, 80, 2A, 03, SF: FE 
DATA Cé. CF. C2. BO: 81: CS: 3A: 81 
DATA СО, 18,89, 2A, 0B» 3F 7E, Dé 
DATA CF: CA, ЭЯ, 81: C3: 2A: 10, SF 
DATA 23: 36: 00, 2A: 03, Р, 36, Ba 
DATA ZA: BB SF» 36: OB, C3, 06, 00 
ik ea 
REMI "FANIC ROAD" ҒОЕ РІО 1 
> КЕМІ EY SP-5030+M МЯК, SS | 
REMI М2-1200.80К/СС52К6),51 | 
КЕМ! FIRST, THERE 15 AN IDEH! | 
3 FEM 


GOSUE 12:IF H=1 THEN GOSUE 2216 GOTO 2 REM haat? Л 8030-8957 
DATA 26, SF , 2E, 20,36,90, 2С, 36 
GOTO 11 DATA gg, 2С, 36,09, 2C: 56,00, 2С 
CURSOR 0, З: PRINT "МОШЕ: ": SC: RETURN DATA 56.09, 2C 36 00, C9, 00, йй 
IF SC=>SS THEN SS=SC DATA 26: 8F , 2E, 10, 36, E3, 2C, 36 
CURSOR Ø, 1:FRINT"EEST: "$ 55: RETURN DATA D1, CD» 58,80, C9, 00, AB, 08 
2 CURSOR 15. 101 PRINT "GAME END ! ! "; MUS REM bab? 3 カク 8058-80Е 7% 
š 5С2-835-С2-Е5К?Е?" 28, 10» SF , 0G, 0O, 00, 36, 7B ` 
25 CURSOR 15。14:PRINT"PLHV 7 (Y¥/ND":MU 2B, 36; 4A» 2B» 36, 3B, 2A, 10 
SIC"C2R2CS" 8F,22,08,8F,26,8F,2E, OA 
„2 GET G$:IF 6%-"М" THEN CURSOR 0,20:ЕМ 36» 28, CD, 18, 80, 2A» OB, SF 
28,36.Ғ8,28,56,Ғ8,28,10 
27 IF G$="V" THEN 2 8Ғ,22,00,8Ғ,26,8Ғ,2Е,02 


28 GOTO 26 36, 28: CD: 88,808, ŻA» 03, SF 
29 FOR [=й TO 39:CURSOR І.біРКІНТ"Н: CU 2B, 36, F2, 2B, 36; F2, C9, 00 


RSOR І, 18:РЕІНТ "BH": NEXT: RETURN ZA,» 10, 8F: 22, 00, SF > 26, SF 
50 CURSOR 15, 1: РКІМТ" ~" 2Е,02, 36, 28, CD, 00, 80, 2R 


31 CURSOR 15, 2: РЕІНТ" 1218881" 035, EF , 356,090, 26, EF , 2E, AŽ 
32 CURSOR 15.3: PRINT Ct" RETURN 36- SA, CD, 48, 80, 2A, 03, 3F 


p 先日 Pi03 月 号 を 買い に 本 屋 へ 行っ た . それ は も う 9 日 を 過ぎ て いた だ た と 思う . “ы, まだ こん な に あっ た だ た" と 内 心 ほ っ と し , ҒОфО1ҢҢ 
を わし づか み に る っ を そく 〈 家 に 戻っ つた. そし て OO の 発売 日 は 毎月 8 日 で あっ た こと を 知っ な だ なの は わし づか み に し て 持ち 帰っ た 4 月 号 か ら で あ 
らら (PC-1501 の 所 有 者 ざこ と ZUN) 


2419, 


It Е いい … 


шік, 


Кт う А 


sott KEROYON GAME жж 66 


Ом2-ггоо/гооо/вов қ 


BASIC ケロ クン š цикл 
ШІ МІТТТТ” 
FEDRA る 闘魂 а r й! 


9 %4 4 9 9 9% 
T TEL IRITE, TE TH TH T 


AA s s ki © ет ç е % 
шіІНІШІІШІІШІІШІІШІІШІ IBI ІШ! 


© 9 %4 9 ç? ¢ 
ІШ 1 ISi LEL ISi ISi Т 


y ¢ 
h 18118! 


ГЕ 
III 
ІІ 
ІШ 
ІШ 
ІШ 
ІІ 
Ш 
ІШ 
ШІ 
ІІ 
|ІШ 
Ш 
ІІ 


池 の そ ば に 住ん で いる 君 は , mm 5 る ё Ж た 。 移動 中 は KEROKUN に 


RE 8 TIME 0:12 


当たる 確 
く 鳴 く か える の KEROKUN を や や っ つけ よう 率 が 低く な っ て いま す . それから 1 分 間 プロ グラ ム 
と , 機関 銃 を 持っ て 立ち 上 が っ た の で あっ 耐え る と 面 ク リア で す . 
だ: 昔 作 っ だ た も の に ちょ っ と 手 を 加え だ だ け 
* ミ ニ PiO イ ン フ ォ メ ーション 変数 標 な の で , わけ が わか り ま せん . 変数 表 だ け 
Ше 載せ て お きま す . 


| リス ト ど お り に 入力 し て RUN. 


な か な か アイ デア は いい けれ ど , ゲ 


自分 の キャ ラク タ 
KEROKUN の キャ ラク タ 
自分 を 消す 
KEROKUN を 消す 
自分 の X, Y 座 標 

| スコ ア 

| ハイ ・ ス コア 

| | ラウ ンド 
KEROKUN の X 座 標 
移動 中 の 確率 の 変数 
自分 の 移動 前 の Y 座 標 


P.S. 


KEROKUN が か える に 見 える 人 は まず 
いな いで し ょ う . MZ-2000 を 買っ て ずい 
ぶん だ ち ま す が , こん な デ ロ グ ラム し か 作 
れ な い 自 分 が 情け な い . 

藤波 辰巳 の ドラ ゴン ・ ス ー プ レッ クス は 
カッ コイ オ で 一 。 

3 参考 文献 
MIKAKO: ` 


| 一 ム が ちょ っ と 単調 .、 も う 一 工夫 ほ 
(| し いと ころ で す . 


遊び 万 


[Z| [1 で 上 下 に 移動 し ます . жая» 
ませ ん か わが, 常に 発射 し て いま す ( も っ と も 
弾 が 見 える わけ な いよ な ーー). それ で も っ 
て KEROKUN が 一 番 左 に くる と ゲー ム ・ 


"PiO シ パー ツン",。 РіО, 84 年 6 月 号 


ー ШЕШШ KEROKUN BASIC!) スト wang 


10 CONSOLEC40, 50, 24, М: DIMXK (20) 
20 НФ-"әзіІН->әоы-П( )" 

50 НСФ-" ц ゃ = ゃ = っ = ы 

40 КФл"Фзе0іШіІзесП- 

ЭО КСФ" や ちせ “=== 

60 X=1: Y=2: W=O: SC=O: KY=1:R=.5 
70 ҒОКІ-2Т0205ТЕРЗ3:ХК(1) =37: NEXT 

ВО РКІМТСНК6(6)::ТЕМРО7:ТІФ-"ОООООО" 

90 СОК5ОКФ6,О:РКІМТ" ХЖХКЖК КЕКОКЦИМ GAME % 
Жжжж" 

100 СОКБОК2, 24: РКІМТ "СОКЕ"; SC; 

110 СОКЅОК 14, 24: РКІМТ "НІ -5СОКЕ"; НІ; 

120 ТФ=МІрФ(ТІФ, 4,1) +": "+КІБНТФ(ТІФ, 2) : 
CURSORZ9, 24: РКІМТ"ТІМЕ "T$; 

150 ІҒУА_ ‹ТІФ) =1 ООТНЕМБОБОЕ 520 

140 СОКЗОКХ, У: ЕКІМТНФ; 
150 ҒОКІ-2Т0205ТЕРЗ 
160 IFXK (1) < 4АТНЕМ 400 
170 СОКБОКХК (I), І: РКІМТКФ 


180 МЕХТІ 
190 РОКЕ%952.0: ВЕТАФ: РОКЕФ952, 166 
200 ІРҒАФ= "7 "ТНЕМИ=Ү: Ү=Ү-3: БОТО 240 
210 ІҒАФ-"1"ТНЕМЫ-Ү: Ү=ү+3: БОТО 240 
220 GOSUE 500 

250 БОТО 280 

240 ІҒҮ>2ОТНЕМҮ-2 

250 IFY<2 ТНЕМҮ-20 

о CURSORX,W:PRINTHC*$; 


350 MUSIC"EZDCDE6FZGFEF666ZDEF+CEAGB+CS5 
ӨЗЕСӘК9" 

560 ҒОКІ-2Т0О205ТЕР2:ХК(І)-57:МЕХТ 

570 TI$=" 000000": SC=SC+500: R=R+. 1 

ЗВО IFR>1.1THENR=.5 

290 PRINTCHR$ (6) ; :CURSOR6, O: PRINT" KKK XX 
КЕКОКЦМ GAME ЖЖЖЖЖ " : КЕТОКМ 
400 CONSOLER :MUSIC"-G9FRZI": 
410 IFSC>HITHENHI=SC 

420 CURSOR10,15: PRINT"TRY AGAIN ГҮ/М1" 
430 СбЕТАФ:ІҒАФ-"Ү"ТНЕМ 60 
440 ІҒАФ-"М"ТНЕМРКІМТСНК%(6):: END 
450 GOTO 430 


CONSOLEN 
: CURSORX, Y: FRINT 


270 IFRND<1)>RGOSUB 300 

280 GD=INT(RIID( 1 ) %7) +1 

290 XE(BD* ス ー1)=XE(GD* さ ー1 ) -5: GOTO 100 
ЗОО ІҒХК(Ү)<37ТНЕММОВІС"«бО": SC=SC+5: B= 
Е-і:СОКСОКХЕСҮ)».Ү:РКІМТКСФ: X に K(Y) =ХК(Ү) +3 
210 RETURN 

520 FRINTCHR ま (6)* 

530 СОК6ОК12.12:РКІМТКҮ;" х2 
540 ERY=EY+1 


FIF 


ІШ 


英 車 が だ ん だ ん 大 きく な る の が š モノ 


MM 
(мі 
ІШ 
ІШ 


=Z ç © 0 


て くだ きい 1 キャ ラウ タ で も 接触 すれ ば , 


どう で し た か 7? 先月 の 「Tank」 は . で 


今月 の Micro man の 作品 は 予定 どおり 3D カ 即 ゲ ー ム ・ オ ォ オーバ バー。 得点 は 1 歩 ? ? Im Ç ます . 
ー レ ー ス ・ ゲ ー ム 「Race」 で す . ググ ッ TE 私 は 兵庫 県 の 高校 生 で 中 川 義行 と 言い ま 
と せま る … ? 英 の 車 を ハン ドル さば きも 鮮 あら か じ め お 断わり し て お きま す が , この 4. これ だ け 書 け ば わか っ て も ら え る で し 


や か に か わし て くだ さい . ゲー ム は 短 る の 追求 , 省 メ モリ が 第 一 目標 2. 


ミニ PiIO イ ン フ ォ メ ーション な の で , 力学 的 に 不可 能 な 画面 で ある こと 最後 に , 恒例 の 来 月 了 予告 ク ちょ っ と 古 
ーー は よく 〈 知 っ て お な おり ます し , 敵 の 車 が 1 台 いけ れ ど も 。 スク ラン ブル も どき の チョ ッ 


| リス ト どおり に 入力 し て RUN. 


| 車 の 移動 が 3 次 元 的 で と て も カッ コ 


| イイ で すね . よく 考え られ て いる と 
| 思い ます . 


ЯС 
お な じみ の RUN| CR | で いき な り 敵 の 車 
が 接近 し て きま す . うま く |1||3| で か わし 


つ し か 来 な い 非 論理 性 も 充分 承知 の 上 な の 
С, そう いっ た 点 で の 指摘 は 一 切 受 けつ け 
ませ ん . あし か ら ず . 


エト セト ラフ ・ エ ト セ トラ 


どう も , 友人 に 名 前 を 公開 し ろ と 人 迫 ら れ 
まし た の で , 今回 に 限り 好き な こと を 書き 


プリ フタ ー あ え ぇ え 「Heli」 を お 届け いた し ま 
Ж. 


23 


10 CONSDLESO, 24. C40, N: ТЕМРО7:ҒОКС-ОТ017 
:6%-5ТКІМС%("%",18-С):РКІМТСО%; " /"§ SFACE を 
(Сж2) 5 "\"; G$:NEXT:DIMC$ (3) ,D$( 3) :FORC=0T 
05:КЕАрС%(С).р%(С):МЕХТ:Ү-17:М-17 


20 DATA" " А " $ " š " "Ü" А "ЗЕ LU „ LU や ちゃ " А " = 
Каада; "I", m Par": 


FOKE$952, О: GETH: РОКЕФ952, 166: CURSORM, 15: 
РКІМТСФ (5) : Ү=ү+2+(ү=17) ж18 

30 M=M-(H=1) ¥ (M> 4) +(H=3) Ж(М<20):М--(Ү>2 
)-(Ү>4)-(Ү>8):Р-Р%2: CURSORM, 15: РКІМТОФ (3 
) :СЫКБОК2, 20: FRINT"Point :";Р;"т":Е=М-Х: 
ІЕМ-ОТНЕМХ-19:К-(ЕМр(1)%5/2-1) X2 


RACE BASIC! А К ы, | 


40 СИКБОКХ, У: РКІМТОФ (М) : ІҒ(УҮ<>15) +(ABS( 
ІМТ (Е+1) ) > 3) ТНЕМРОКЕФЕҒ 17, 12: РОКЕФРІА, ( (1 
В-Ү) ж10+85) : USR ($F14) : РОКЕФҒ 17, 48: РОКЕФҒ 


1A, 95: CURSORX, Y: РКІМТСФ (М) : Х=Х+Е.: БОТО20 


び X1 シ リー ズ 


Hu- BASIC 


「 お い 」 
「 な ん で すか , 先生 」 
「 お まえ 今 か ら ス ポー ツ ・ セ ンタ ー に 行っ 
て 使わ せ て も ら え る か 管理 人 に 聞い て こ 
い 」 
そし て 君 は スポ ー ツ ・ セ ンタ ー に 着い た 
( 君 は 陸上 の 選手 で ある ). バタ ン ./( ド ア 
を 開け る 音 ) 
「 管 理 人 さ ー ん ノ … あ れ っ 部 屋 間 違え た 」 
それ が 運 の つき . そこ は プロ レス ラー 専 
用 の トレ ー ニ ング ・ ル ー ム だ っ た の だ . 
* š —PIO4 Z 7Z*T* х-и а> 


リス ト ど お り に 入力 し て RUN. 


| ボー ナス ・ ラ ウン ド が 難し すぎ る け 
| ど , 全体 的 に よく で き て いま す よ . 


遊び 方 
асаа 


5 “Фейффже 97! 7/97 list の チコ モウ 000202 

10 WIDTH 4@:CLR:CLS:DEFINT A-Z:HI=100: CL 
ICK ОҒҒ:КЕРЕАТ OFF:GOSUB 560 

20 SC=Q:kK=3: МЕМ=0: DS=Q 

50 MEN=MEN+ 1 : 60508420: CLS4: GOSUE410: MUSI 

C"F1EFEFEGZ":PR=RND*1: IF PR= の THEN Р=2 E 

LSE IF FR=1 THEN Р-27 

40 COLOR 7: Х=20: Y=19: Y2=20: TR=36: TL=2: TF 

ш2:бХ-0:У-0 , 

50 A$=INKEY$ (0) : СБЕМ 1 

60 IF АФ-"4" THEN SX=-1 

79 IF A$="6" THEN SX= 1 

80 IF А%-" " AND Х>4 AND Х<24 THEN 120 

90 IF Х+5Х<2 THEN SX=Q: X=2 

100 IF X+5X>37 THEN 5Х-0:Х-27 

110 LOCATEX,Y:PRINT" ";LOCATEX,Y2:PRINT" 
"sX=X+SX:GOSUB120:GOTO170 

120 LOCATEX,19:PRINT"#":LOCATEX,20:PRINT 
"$": RETURN 

150 IF SX=-1 THEN M$="%&%&": JX=—3: GOTO160 

140 IF SX=1 THEN M$="' (":JX=3:GOT0160 
150 65070170 

160 V=V+2:LOCATEX,2Ø:FRINT" ":10САТЕХ,19 

іРКІМТ" ":X=X+JX:LOCATEX,18:PRINT M$: MUS 
ІС"%СО":РАМБЕ Z:LOCATEX,18:PRINT " Fg 

6050В120:РА05Е1:065070170 

170 К-КМОж4:0М К 6070180,190,200,210,220 

180 51 -М:065051/вВ270:6070220 

190 5К=-М№: 560508290: 6070220 

200 5Ғ-1:06050ВвВ510:6070220 

210 бі -М:5К--М: GOSUR270: 60508290 

220 LOCATETR , 19:PRINT TC$:LOCATETL 。 19』 PR 

INT ТС% 

250 CGEN:LOCATE25,@:PRINTUSING"SCORE#### 

#";5С:1 ОСАТЕЗ,@: РКІМТ К: СБЕМ1 

240 IF СНАКАСТЕКФ (Х,У) =", " THEN 350 

250 IF Х=Р THEN DS= (18-ТЕ) «МЕМ-У:650Т70240 


260 GOTOSQ 
265 ‘Assos 25! 


アキ ラメ ルナ Фжефебефебеефефееее 


5 172: 


| 
|І 
Ш 


ッ タ プリ ンタ あ カ 


| SPACE | で ブロ ッ ク を ジャ ンプ し て くだ 


きい . 左右 の 動き は , 1 度 キ ー を 押す と 再 
び 逆 方 向 の キー を 押す か , 壁 に ぶつ か る 
まで 同じ 方 向 に 進み ます . 面 は 13 面 あっ 
て 3 画 ご と に レベ ル ア ッ ジグ し 。 13 面 で 元 に 
戻り ます 。7 面 は ボー ナス ・ ラ ウン ド で て 

| RETURN | を 押す と 左 か ら 電 源 が 右 に 向 か 


さあ , 右左 どっ ち が 本 物 ? 


し まま まま まま まま ミミ まま ミミ スミ スネ ま オ すきま きま オオ さす ます 


LOCATETL 。 19sPRINT ССФ: TL し =TL+SL: IF TL 
THEN TL=2 
RETURN 
LOCATETR 。 19: PRINT CC$:TR=TR+SR: IF TR 
THEN TR= さ 6 
RETURN 
LINE (2 。TF) -( さ 7。TF) 。" "sTF=TF+SF: LINE 
(2,TF)—-(37,TF) 。"ー" 
520 IF Y=TF THEN 350 
550 RETURN 
540 MUSIC"A2"s SC=SC+DS: LOCATE 15 。 15: CGEN: 
FRINT"ー ト フウ テッ: "DS』"ー" ェ PAUSE 1 の 9』 GBDTD さ の 
550 ド に = ドー1 : MUSIC"C1"s ITF に = の THEN 370 . 
260 CLS4: 50508410: GOTO40 
370 CGEN:LOCATES,@: PRINTK: LOCATE 15 。 15』 PR 
INT "GAME OVER": IF SC>HI THEN HI=SC: COLOR 
2 
580 LOCATE12,18:PRINT"HI-SCORE";HI:LOCAT 
E17,21:COLOR 7:PRINT" (Y/N) " 
Z9@ IF ІМКЕҮФ-"Ү" THEN 20 
400 IF INKEY$="N" THEN REPEAT ON: CLS4: EN 
D ELSE 290 
410 CGEN1:LINE (0,1)-(1,23) ,"*" , BF: LINE (З 
8,1)-(39,23) ,"*" ‚ВЕ: LINE (2,21) - (57,25), " 
+" , BF: LINE (2,2) 一 ( さ 7。2) 。"ー" ョ LUCATE 1 。 2 の 』 РК 
INT") ":LDCATE さ 8 。 29: PRINT") ": RETURN 
420 MEN> の THEN М=1:ТС$=",":СС%=" " 
4 さ の MEN> さ THEN N=2 
MEN=7 THEN 490 
MEN>7 THEN М-1:7С%-",,":ССФ-"” " 
MEN>1 の THEN N=2 
MEN>1 さ THEN MEN= の 


CGEN1:MUSIC"C2-G1DGE":CLS4:K=K+2: X=3 
の : Ү=19:Ү2=20: GUSUB12 の iLINE( の 。21) 一 (39.2 マ ) 
"ж" BF: LINE (0,6) -(59,6) ,"+":LOCATEX,6:F 
RINT" " 
500 IF ІМКЕҮ%<>СНК% (15) THEN 500 
510 MUSIC"G1"sFUR Ізі ТО 39:1 ОСАТЕ1І,5:РК 
INT" )"sIF ІМКЕҮФ=" " THEN MUSIC"+C":GOT 


っ て 移動 する の で , 自分 の 上 に 来 た と き 
キー で ブロ ッ ク を 投げ て くだ さ 
い . み ご と 当 だ る と ボー ナス 700 点 が も ら を , 
チャ レン ジ 回 数 が 2 回 増え ます . 

面 ク リア の 方 法 は , 両端 に ある 電源 ( 赤 
いや つ ) の どちら か の 前 に 行け ば いい の で 
す ( ど ちら か ヵ か 一 方 は に せ 物 ). 

27/2, ブロ ッ グ に 当たる か ヵ か 天井 が 主人 公 
の 頭 の 高き まで くる と , チャ レン ジ 回 数 が 
1 回 減り ます . チャ レン ジ 回 数 が 0 に な る と 
ゲー ム ・ オ ーー( 主 人 公 が 骨折 し だ た だ から) 
で す ( チ ャ レン ジ 回 数 は 画面 左上 に 表示 ). 


Р. S. 


РіО を 読ん で いる と , ぼく と 同じ 今年 
中 学校 を 卒業 する 人 が 多い よう な 気 が し ま 
す ( だ だ いま 15 才 ). お 互い 頑張 の う ゼ ぜ / 
(突然 な に を 言い だ すん が だ)。. 

デリ ンタ が な いと 。 自分 の 作っ だ ただ ゲーム 
の リス ト が じっくり 見 れ な い の で つら いよ 
ー. そ れ じ ゃ まな た 今度 7 


が ん ば れ ./ 陸 上 選手 BASIC リ А F ене 


0550 

520 FOR I0=1 TO 40:МЕХТ:МЕХТ 

550 FOR ІІ-Ү-1 TO Š STEP-1 : ОСАТЕХ,11:Р 
RINT","sLOCATEX,II+1sPRINT" "sNEXTsIF X= 
I+1 THEN 550 

540 FAUSE 3:650Т70550 

550 MUSIC"+F の " : DS=7 の の :FAUSE 5: БОТОЗ40 
555 “Фефефе モウ ホホ トット" ЯУ” лот! egee 
560 FOR QW=1 ТО 12:КЕАП Q$,W$,E$,R$:DEFC 
НКФ (VAL (Q$) ) =HEXCHR$ (W$+E$+R$) : NEXT:RETU 
RN 

570 DATA 22,0000000000000000,000000000200 
の の の の の 。 の の の の の の の の の の の の の の の の 

580 DATA 25,00000024000056ҒҒ,000024185С1 
ВЗС7Е,2С7Е7ЕЗАЗС18З5АВ1 

590 DATA 26,ҒҒ7?ЕЗСЗ5СЗС6600Е7,СЗСЗВрВр5С6 
566500, <СВрВ1Вр5С6666Е7 

00 DATA さ フ 7。 の 9 の 9 の 98 の 8B181C1C1 。 ワ の の さ の の の の 4DZ 
F さ Q の 1 , の の の さ の の 9B の CDFFFBC 1 

610 DATA ミロ 。 の の の の 98B の の C7E7FEBC , の の 9 の D26CFFF 
BS6EC 。 1E3FD76EFBDCCBB の 

620 DATA 39, 00001 000E 3E7 7F 3D , 9 の の の 4B さ 6FFD 
F6 ヒ SD , 7BFCEB フ 61F さ BE1 さ の 1 

650 DATA 4 の 。 の の の の 9 の 9 の 9 の 1818183B ミ , の の じ の の の の の B2F 
Е5СВ0,00С00001ВЗЭҒҒОҒӨЗ 

640 рата 41,0000000060ҒОҒҒҒО,7С4010107ЕҒ 
ҒООҒҒ,7Е7Е18180000Ғ 800 

650 DATA 42,С<ЗЕ7рВ5АФЫрВрВЕ7,00000000180 
020000 ,0024181824181824 

550 DATA 4Z,0@00018ZC3C180000,42FF6642426 
6FF 42 ,@000001818000000 

670 DATA 44 。 の の さら 6 の 6 の 4 の の の の 90 の 0 , 20582020400 
の の 9 の の , 7EFFFFFFFDFDD る 7E 

680 DATA 45,Е71800185С7ЕЗС18,Е77ЕЗС00181 
81800,000000183С7ЕЗС18 


ぁ 僕 は 昨日 まで , 入力 中 の 雷 な ど に よる 停電 の 被害 に あっ た こと が あり ませ ん で し た . 今日 は 入試 一 週間 前 、 気分 転換 に と 愛 機 PP を いじ っ 
そし て 40 行 ほど の 自作 ミニ プロ を 打ち 込み まし た .「 う わぁ 」 す ご く 沢 山 の BUG が 出 ま し た . 

m хз を 直し て 後 少し で ほぼ 完成 と な り ま し た .「 ば ちん /」 部 屋 は 真っ 暗 . そし て 再び 電気 を つけ た だ とき, 愛 機 は RAM 上 の 記憶 を すべ て な くし , 
еса Е 僕 に ペー ジ 数 を 問い か ける の み で し た .。 そう で す . 我が家 で は あま り 電 気 を 使い すぎ る と 「 プ レー カー」 が 落ち る の で し た .。 バカ ヤロー, Е 


し か し BASIC な の で , 出 だ た 端 か ら 


近ごろ miniPiO を さわ が せ て いる 50 ог 
100m 走 シリ ー ズ ーー. X1 を 駆っ て , 究極 
の 姿 を 今 , 君 の 目 の 前 に 現 わ す . ノ 
* TERI о айдай ай Ad 


5 まで | リス ト どおり に 入力 し て RUN. 


な か な か 勝て な いけ れ ど , 勝っ た と 
き の 処理 が と て も いい で すね . 


RUN す る と 走者 が 2 人 表示 る れ ま す が , 
奥 側 が コン ピュ ー タ で , 手前 側が あな だ に 
な り ま す . 

* 位 置 に つい て ・ ヨ ー イ ・ バ パン ノ /" САЯ 


ー ト で す . [VI キー と , 右 | SHIFT | キー の 
隣 に ある [| キー を 交互 に た た いて くだ る 
АЛҒЫ 25,458 と ちな か 近く ダー ルー オア セ 
た 方 の タイ ム が ベス ト ・ タ イム より 小さ け 


ШЕШ TAKEMARU S OLIGINAL GAME No.7 


"SOM 79. 2624 Bytes 


for X1 


by TAKEMARU 560.5.17 (B) 


100 6070410 
1 の 5 ' ҒЫШ :7-7-// 2: ШЕШ 
110 К%=ІМКЕҮ$Ф (0): Х1=0:С= (С=1) +1 
120 IF (К%="У") AND (に = の ) THEN Хі=1і:К=1 з GO 
T0140 
150 IF (K$="_")AND(K=1) THEN Хіті:к-0 
140 IF X+X1=39 THEN ЈТ=ТІМЕ: КС=1: 6070240 
150 LOCATE Х,21:РКІМТ" ": Х=Х+Х1 
LOCATE Х,21:РКІМТСНФ (С) 
' жыларын ШШШ. 
X2=INT(RND*2) 
IF RX+X2=39 THEN RT=TIME:KC=2: GOTO24 


LOCATE КХ,20:РКІМТ" "sRX=RX+X2 
LOCATE КХ,20:РКІМТСН%(С) 

GOTO110 

′ ШЫНЫН カチ マ ケ ヒョウ ケ " -/ ШИНИ 

IF KC=1 THEN LOCATE КХ,20:РКІМТ"(" E 
(ОСАТЕХ,21:РКІМТ"(" 

C=@:FOR 1= の TO 40:С-«Сжі:ІҒ C=6 THEN 


IF KC=1 ТНЕМ LOCATE 
›: BT=JT 
270 IF КС-2 THEN LOCATE КХ, 20: РКІМТКСФ (С 
) : BT=RT : 6070298 

PALETZ,Z:PALET4,2:PALET1,6 

SOUND7 , 7: SOUNDS , 15: SOUND? 。 15: SOUND 1 の 


Х,21: РКІМТКСФ (С 


PALETZ,6:PALET1 ,2:PALET4,6 
NEXT 
SOUND7 , 255 


習 志 市 CAO 2 


паг ауз 
"TAKE" に な り 


れ ば 名 前 入力 と な り ま す . 
ー タ の 名 前 は 自動 的 に 
+; 

再 ゲ ー Re で す . 


ФЕ 


メイ ン ・ ル ー チ ン を 先頭 に , 初期 設定 を 
最後 に も っ て いっ て いま す が , この 方 が 多 


少な が な り と も スピ ー ド が 上 が り ま す 。 それ に 
私 に と っ て は こち ら の 方 が 作り や すい の で 
Ta 


1 の 特徴 で ある “グラ フォ ッ ク グ 
“PSG "РСС” を フル (で も な いか ) に 合 
っ て アニ メー ショ ン ぼ ぽく 作り まし だ た だ. 走者 
の 細い , な に げ な いし で さや, きわ め つ け 

# PiO な 50m 走 BASIC リ スト ИН 


510 БЕН УУ! ショ リリ l l 

515 IF ВТ>Т2 650Т03580 

520 IF ІМКЕҮ%<>"" 60Т0220 

525 CGENØ:LOCATE28,6: IF KC=1 THEN INPUT" 
NAME: ",NE$ ELSE МЕФ= "ТАКЕ" 

ささ の IF BT<T1 THEN Т2-Т1:М2%-М1%:ТізВТ:М 
1%-<МЕ%: 5070550 

540 IF ВТ<-Т2 THEN Т2-ВТ:М2%-МЕ% 

550 і ОСАТЕ17,5:РКІМТ USING"###"3 T1; :PRIN 
т"% "Мн" LU 


560 і ОСАТЕ17,7:РКІМТ USING" ###";T2;:PRIN 


т"» " ; N2$; " "K 

570 LINE (268,6) – (39,6) ," " 

580 IF ІМКЕҮФ< >"Ѕ" GOTO380 

590 бОТО57@ 

400 ' ШЫНЫН マエ ミ パ ュー ヒ " 1 ШШ 

410 SCREENO 。 の 。 の : MIDTH4 の : CGENQ: БЕҒІМТА-7: 

DIMCH$ (1) ,KC (1) 。CGX (50) :PLAY700: CL ICKON 

412 ПЕҒСНК% (&H2Ø) =HEXCHR 和 を ("の の の の の の の の の の の の の 

の の の の の の の の の 9 の の の の 9 の の の の の の の の の の の の の の の 9 の の 9 の の 0 の" ) 

414 DEFCHR 生 (&H2 1 ) =HEXCHR 和 も ("の の の の の さ 1F さ ヒビ フ ビブ 

аға の 9 の 9 の さ 1F さ じ 7C7nFA の の 9999 さ 1F さ C7C7RFA" ) 

416 DEFCHR 生 (&H2 さ ) =HEXCHR$ も ("の の の の の の 1F 1F さ じ さ 
の の の の の の 1F 1F さ C さ FnA の の の の の の 1F 1F SCSAFA") 
DEFCHR$(&H24 ) =HEXCHR 和 を ("の 6 の 61 じ 26 の D766 
の 6 の 61C269D766696 の 6 の 61 じ 269D7666 の 6" ) 
DEFCHR ま も (&H25 ) «НЕХСНКФ("1814125С581С7 
1814125С581С7666 1814125С581С7666") 
ПЕЕСНК% (ҰН26) =HEXCHR$ ("30534ВСЕ@ЗВ4С2 
З0@054ВСЕ@5В4С205@ 50548Сғ0584Сс2060") 
DEFCHR$(&H27 ) «НЕХСНК%("ӘС2СЗрОҒ1С520 
の C2C さ DO の F 1 じ さ 2 の 4 の 6 の @C2C さ DF 1 じ さ 2 の 4 の 6" ) 
DEFCHR$ (&H28) =HEXCHR$ ( "00185С5С5С181 
の 9 1 8 さじ さじ さじ C181 昌 さじ 9 の 918 さじ さじ さじ 1818 さ じ ") 
LINE (0,120) -(319,143) 。PSET , BF , HEXCHR 

%("1С001С さ E の の SE 221С5Е 22082А @81С14 QQ 

ЗЕ@В 225508 22411C") 

440 PALET7。4 

450 (.ІМЕ(0,144)-(519,160) 。PSET , BF 。HEXCHR 

$ ("AAAAAA 555555") 


-ii ені 
岩倉 市 大 塚 竜一 


まだ 20m 以 上 も ある . 勝て る か も ? 


ライ バル の XX 座標 
ライ バル の X 座 標 増 分 
キャ ラク タ 切 り 換え フラ グ 
キー 入力 用 フラ グ 
勝者 の フラ グ 
ベス ト 1, 2 の タイ ム 
勝っ た 人 の タイ ム 
自 分 , ライ バル の タイ ム 
走っ て いる と き の キ ャ ラク タ 
勝っ た と き の キ ャ ラク タ 
ХА КІ, 2 の 名 前 
名 前 の 入力 用 
キー 入力 用 
FOR--NEXT 用 


460 LINE( の 。16 の ) – (519,199) 。PSET 。BF 。HEXCHR 

まま ("の の 55 の の の の QA の" ) 

472 FOR Ізі TO SiREADX1 。Y1 。X2。Y2sLINE(X1 

Ү1)-(Х2,Ү2) 。PSET 。5』 NEXT 

480 COLOR1 : LINE (0,9) – (59,14), "Ш" ВЕ: COLO 

Ré: CREV1 

485 і ОСАТЕ22, 10: РКІМТ" ИШ" : ОСАТЕ22, 

11: PRINT "И" 

488 LOCATEB 。 1 さ : РКІМТ" Ш" : CREV の 』 COLOR 

7 

492 LOCATE14 。 さ :CSIZE2:PRINT#O"SAMY2" : CS 

IZEQ 
LOCATE14,1 :PRINT"PIOf スポ"ー リ リリ 

(ОСАТЕ12,5 :РКІМТ"Мо. 1 4% ТАКЕ" 

_ОСАТЕ 12,7 :РКІМТ"Мо.2 6% ТАКЕ" 

COLOR7: LODCATE6 。 19: С512Е2: PRINT 六 の "PTIO 


СОГ Оғ7:1. ОСАТЕ26,19:РКІМТ% "І /0": С512 
FOR Ізі ТО 4: ОСАТЕ1ж%7,23:РКІМТ І: МЕ 


Т1=4: Т2=6: № = "ТАКЕ" : М2%= "ТАКЕ" 

CH も (の ) = "Ф": CHS (1) = "9": КСФ (0) = "6": КСФ 
(1) =" 6": КСФ (2) =" "КСФ (5) =" "КСФ (4) =" " 
:КСФ (5) ="'" 
570 DATA 4,164,515, 164,2,170,517,170,0,1 
80,519,180,4,164,0,180,515,164,519,180 
580 ' ШЫНЫ フエ ミニ パ ュ ー ヒ " 2 ШШ 
590 X=1;RX=1l:C=@:LINE(Q@,20@)-(39,21)," 
ВЕ: PALET3,6: PALET1 ,2:PALET4 , 2: CGEN1 
620 FOR І-20 ТО 21:1 ОСАТЕ1,І: РКІМТ"!": МЕ 
ХТ: PAUSE さ の ; 
650 PLAY"V150561#G66F0" 
640 FOR I=2@ ТО 21:LOCATE1,I:PRINT"#" МЕ 
XT: PAUSEZØ 
650 SOUND7 , SS: SOUNDé , 25: SOUND8 , 16: SOUND1 
1,0:500М012,7:500М015,0:500М06,15 
660 ТІМЕ-0:6070110 


Pe- |245 жә а. 


(4 
4 


四街道 市 カモ メ と よ ば れる 男 


こ 直 し た か な ん て 覚え て ね ー や い / お かげ で 入試 まで は い ビ る 気力 失せ だ た だ. 


は た し て 良かっ だ の か 悪かっ た の か … 
( 快 人 さん 良かっ た ね ./ TAF Na4 フ の 伊藤 光博 で す よ ) 


29 


この ゲー ム は , あの 有名 な ラリ ーX を 見 
て いて 考え つい た も の で す . な お , この プ 
ログ ラム は 昨年 の 1 月 に は で き て いま し た . 
娘 ミ ニ PIO イ ン フ ォ メ ーション 


リス ト ど お り に 入力 し て RUN. 


| キャ ラク タ は うま く 作 っ て ある けれ 
E | ど , アイ デア が あま り パ ッ と し た も 
| の じゃ な い . よく 考え て ね / 


ШОУ 


カー ソル ・ キ ー を 使っ て , だ だ 金塊 を 取 
れ ば いい だ け で す . し か し , 自分 が 通っ だ 


<<= k 922522 


b ッ ixIYUTAKA 


100 SCREEN 1,,0 :КЕҮ OFF:CLS 

110 WIDTH 32 :COLOR 15,4,7 :GOSUB S90 : 
НІ-й 

120 SC=0 
=10 :R=39 
130 УРОКЕхН20й00%12,11%16%4 

140 УРОКЕкН2000%15,6%16%4 

150 MPOKE&H2999+ 10, 。15X% 1 る 6+4 

1 る 9 UPUKE&H2999+ 15,13X 1 る +4 

170 УРОКЕКН2000%13,15%16%4 

180 АФ=" "%5ТКІМ0бО%(30,"%") 

190 B$=" Ф" + ЅРАСЕФ‹ 28) +" Ф" 

PRINT ñ$ 

FOR Ісі ТО 22:РБІМТ ВФ :МЕХТ 

220 PRINT A$; 

230 FOR T=0 TO R :х7-ІМТ<ЕМОС 1) X28)+2 
Z=INT(RND< 1) Х21) +2 

249 LOCATE Х7,Ү7 :PRINT"p" ; :NEXT Т 


:MA=3 :TIME=9 ;X=3 :Y=3 :M=1 


Y=INTXRNDC 1)※21)+2 
268 LOCATE XX。YYkPRINT" a"  МЕХТ Т 
270 LOCATE X,Y:PRINT "h"; 
2808 I=STICK(0) : リ メニ 9 :VY=0 


258 FOR T=1 TO Q :XX=INT(RND(1)X28)+2 : 


ТҰ 


後に は 壁 が 出 き て , 通れ な く な っ て し まい 
ます . 面 に よっ て は , うま く 動 か な いと 人 生 
部 取れ ませ ん . この と き , |@| キ ー を 押し 
て く 《 く だるい.。 スコ ア が 0 に 戻り 9。 MAN も 1 
人 死に ます 。 

ボー ル に ぶつ か る と MAN が 1 人 死に , 3 
人 死ぬ と ゲー ム ・ オ ー バ バー, 面 内 に ある 人 金 
塊 を 全部 取る と 1 面 ク リア で す . な お , V 
プレ イ は | 5 | キー で す . 


ブ プログラム 


SCKEEN1 で 複数 の カラ ー を 出す の は 意 
BOMB BASIC リ スト 


Чха 1=7) -(1=3) 
VY=(1=1) -(1=5) 
LOCATE X,Y:PRINT "е"; 
IF X+UX<Z OR X+UX>22 THEN х=й 
IF Y+UY<1 OR Y+VY>22 THEN ЧҮ=й 
X=X+VX :Y=Y+UY 
C=VPEEK(6144+(YX32+X) › 
IF C=ASC( "@") THEN X=X-UX :Y=Y-VY 
IF C=ASC("a") THEN SC=SC+100 :LOCATE 
1, @ :PRINT" SCORE" ;5С; : PLAY "T25508AA" :0-0 
-1:1Е Q=9 THEN Q=Q+29 :GOTO 539 
388 IF С-А5С("р") THEN MA=MA-1 :LOCATE19 
79 :PRINT"MAN ";MA;"("M;:GOSUB 430 :IF MA 
=9 THEN 450 : 
390 W$=INKEY$ 
400 IF W$="G" 
"7" THEN SC=0 
450 ELSE 189 
LOCATE X,Y:PRINT"h"; 
GOTO 280 
° SOUND 
PLAY"L804S 14M20 0A4" 
“ OUT 
IF SC>HI THEN HI=SC 
PLAY" 04L る 4BAGFEDC* 
LOCATE 19。19:PRINT"GAME OVER" 
LOCATE 8,12 っ PRKINT"PUSH (5) KEY*- ` 
LOCATE 12,8:РБІМТ"НІ SCORE";HI 
S$=INKEY$ :ІҒ 5%="5" ОБ S$="s" 
="k" OR S$="¢" THEN CLS:GOTO 120 
520 GOTO 510 


OR ИФ=" о" OR 内 も =" テ " OR И%= 
:CLS:MA=MA-1 :IF MA=9 THEN 


: RETURN 


OR S$ 


こん な こと で は 全部 取れ な い ! 


外 と 簡単 で す . キャ ラク タ の 出し 方 は ちょ 
っ と 面白 い 方 法 を 使っ て いま す . 参考 に し 
484-358 

衝突 判断 は VPEEK 文 を 使っ て いま す . 


P.S. 


の び の び 文 庫 を よろ し く . меж, ят 
いる か い ? な お , 音楽 は MAKOTO 君 が 
作っ て くれ まし た だ た. 


зз. 

540 Р АҮ" 59М5000Т 18004112" 

550 PLAY"0O0&T255GRGRCGRGRDEFGFGFEFEFDCFGF 

GEDFCDAGFEBFGDEG . GREDCA" 

560 M=M+1:SC=SC+INT(RNDC 1) X500) +1:R=R+25 
:IF R>300 THEN Р=50 


11Р М>7 THEN MA=MA+ 


CLS :GOTO 180 
END 
FOR Ісі 70 5 
READ СНФ :CHR=ASC(CH$) 
FOR J=0 TO ?7 
READ D%$:D=AL ( "&H"+D$) 
МРОКЕ ВАЅЕ‹ 7) +СНЕХВ+Ј, 0 
NEXT -J 
МЕХТ І 
RETURN 
DATA a 
DATA 81,42,28,1С,30,ЗЕ,?Ғ,ЕҒ 
DATA p 
DATA 3C。ZE 。FF ,FF ,FD 。FD 。Za 。3C 
DATA x 
DATA 08,44,48,30,28,24,22,00 
DATA h 
DATA@38,38,38,D4,38,10,d8,C7 
DATA Ф 
DATA Е»),ЕЕ,ЕЕ,00,0й0,ҒЕ,ҒЕ,ҒЕ 


BASIC-G 


女の子 が あま り に も 弱い . も っ と 強 


| くす る 方 法 も ある の だ か ら , 
|| 考え て ノ 


BUD 


(1|2|3|0%-сеаға>-, チョ 


AORO 
жу 


ч 


も っ と 


ше; 


“Р 
` D _ 


キ , パー で す . あな た だ の 着 て いる 服 は 最初 
5 枚 で , 0 に な れ ば ゲー ム ・ オ ー バ バー です. 


フロ グラ ム 


一 年 程 前 に 作っ た プロ グラ ム で , 何一つ 
資料 が 残っ て いま せん . お 許し くだ さる さい. 
で も , 短い し ォ オー ル BASIC な の で 解析 は 
簡単 だ ど と 思い ます 。. 


058 4 


メモ リ は 余っ て る の で , 音楽 を 入れ る と 


ちょ き に 負け た …. 今度 は 何だ ろう ? 


せ で \ サ ワリ ツリ リリ リサ ツリ ザヤ ザ ツリ ササ 

М GIRL % 
ж. 

SUIT 4 

り ツ "の ザ リ ザ ツリ サザ サパ ザ リ サ 

あな た の まけ 1 まい ゆい て "ね 。 


(Vy 
は * を 


OUR 


%Ф 
Фф 
за 
ka 
Ф 
% 


いい と 思い ます 。 


ぁ 僕 は PC-1245 の USER で し た が 先日 友人 か ら PC-6001 を 買っ て し まい まし た . 同じ PC だ か ら 互 換 性 が ある と 思っ て … と いう の は 冗談 で す 
2, 本 当 に 6001 と ポケ コン を つなぐ で イン ター フェ ー ス が 発売 され た そう で すね . LDL, と うと う 「 ば っ ぴい 」(6001 の 俗称 ) の USER に な っ 


(ば っ ぴぃ 1 号 ) 


Guau や さ ゅ ゆう けん BASIC リ スト 


10 Print "ШЕҢ" :Jiniti3oto 600 
28 data 225.105.224,100, 229,10 
9,254.97,237,93.258.90,237.87. 
256,82,229.67.,226.632.217,58,21 
4: 53 
3A data 211.59.208,61,203.62.1 
99.64,195,68,192,73,191,79.191 
,83.186,91,187.,95,191.1й01.194. 
105.195.1й5.199.10й : 
40 data 200. 96,209, 37,204. 26,7 
12,84,216.80,216.85.214,89.212 
,92:216.90,219,85.220,83,222,8 
222.89,221,91 
SB data 2225.95.227.90.226.94,2 
КОИТО? ы ML OREN 108, 
116:223,1295,224:15 
‚239, 144,251.14%9 
2:155,252.16йд0,251.16 
(216.168,19й,168.186. 
9,177.166,174,169.1?7 
1.165, 170,167,165.167 
780-162,173,161,175,16 
т: 160,164. 161.160, 
147,165, 145.154: 13 
71843467 58% 65 
1.165,6йЙ,162,5 
|64,52,165, й.165.-4.1 
,215.167,-18; 1695-23 
-20%9 167 с б Б 
:165,-27» 162 
:-16,157,- 
‚194,19, 45424 ,1 
47, 47,147,.59, 


2 
ыр: 
ل‎ йш ل‎ トー 
kA 
e 
t-J 
2 


м. iA a 


“ғә 
бз» an“ 


e زم‎ @ で زم حم‎ ш いと と まう ш لن‎ н 


-4 4 


ba 


м ca + + “‏ چچ 


حا Шш‏ ها Cj‏ حم (и‏ “وزم حم (ш‏ + 


حم テテ‏ زل 


іл 
SE Із о 


оз 本 а 
Іт 
оза уо Op 


CH + 
го < ҮЛ 


ә 4 go 
€ = 
ч 


т, ч T 
+ 
7T 
ng 
ЕР 
ta 


ЛИНИЯ i a = Fa re CN QF, eah, 
Le) 


© 
= p. で 
(А -- O é CO 


+ рм 
ноби 


i ~ 
Een: 


> К] > 


Á 


F ` 
+ 


uD トー +< 
He“ Jr 


— حم 4 
حم p‏ . 
— + ]` عم + 
(Q +‏ - 


A ~} (Л‏ عر حم 


- 


ft うう “で фо 9 
+ ә erh 


~j psa هم‎ pa ч Jr 
+ — 
оз - 


+£ ғ 
н تت‎ чо モー コー ¿n < 


Л + [# ~ 


кА عم‎ кє (и ар” Кїз لن‎ 
Ti pa ч 


KN v ч 


hl مء‎ 


E عم‎ ка ка إل عم‎ р 


ОД ++ と عمج‎ で 

а а пур ка hy = 

`. wD で 

K) t> = G 所 v cd з 
соч 

к حن‎ ¿R エナ + ín っ 

ч テモ ビー (дз 
ト ュ O J SD J r+ D F 
©» а” 

J Шалы 

+ Cn تب‎ рзд م‎ кез 
ња Кә КЭ GO т кюк s mm 
COS 

э айз CO айз к» a» o ы 


5% 


in jÅ. “u 
` 


бою sn 


ps ә рә ` 


N か うり н. 
= сәз ҰЛ 
з м 
で p <š юк 
т РУР لت‎ 
шоч D ~ 
>+ p D ке 
wD v E 


сә док Cn 
Ф + 
e e زم زغ‎ 


m 


о 


{ү к= з‏ م 


б ت‎ (бос + 


+ бэ 2 x 


On S حم‎ bà ш 
ta CH = {и 


es YA E. 
k 


Š 
1 
2 
1 
1 
с 
4 
r 


= O 


-f 


= زم 
CA‏ .“ 


жал 


= =. 
Таға 


х Ф 


га. 
n = 
Pk ct үн 
= 
+ > ка 
هم‎ 
e 
гош 
-. CL 


= © 
H. и] 


= 
қ 


ә 


Хо % = — ар 


о “0 トー Фен — ш (к 一 』 < ш IT 


return 

data 7й0.145.88. a ДЫН 
8,142.64,142,155.129,152.151 
ІЗ әзіз ті 
32.16й,187.152.190.160,191 


1 ira 195,163;195,;162;191;1 
" ,16й.198.160,198.159.1952 
,154,198.159,20й0,159,199,157,2 
81.156.194.150.185,152.175.14й 
200 data 168.133,175,125.181.1 
18,183,111 

210 X1=61:V1=148: restore 189: + 


ч 


4 ih iF ¿n X5 бш 
a CL 


— бә CO аа 
` 


бө к» f ü Фф 


in 1 
Doy 
---- ЫЖ 
о 
к.ж. бз 22% а 


кеш гог ға” 
D 
së 


ea k ч 
D O t+ Саз 


&asidrau 149,128. 


15.97. 167:P aint 
Э:Раїпї ЕЙ. 


153: ٣ با3‎ 
120; 92 
529 return i 
data 212.199.208.1108,2й6.1 
,204,112.200,111,196,1й07,195 
3192.117»;,208,112,202.120,2 
k s ій 
ñ (aa sat dau ata ыы 


9” 


І 

68 draw 186,152. 
291. 156,222, 160: бган 
92.165:дған 202.1 з 
їйї 200,120: £ 
81 

Ж for 

au Ж1.У1»: 
ЕЗІ 
288 draw 177,145.167. 
211.154.2153.159:46ғамы 
15,165:бғаю 2135.165, 2 
о! š89:paint 2089, 96:Р: 
57 


Ж zt ù 14 +. (4 


а 3 pa 


- 


ТЭЙ return 


зай 


(9 ғә 


1-- ч 
к» ¿H КЭ 0 
=ч © + 
Юю e ¿4 حم‎ 


D e ух] 
ғ 


Ho a а шо 


о“ КЭ 


حم م 


data 118.176.12 

Laas 125, 159% 191,124, 3 

а 
:Уісші26ігкәстоге 400: 


` p~ 
кы із — 


ш iA NO t-J) ++ 
Г 


É 
` 
p 
4% 
ә 


[к D 

+. х 

О 59 + 

9.69 И 
п 


е А 


440 Paint 184.127: #с01 KOP 

st 2B8,96:Paint 216,160 
450 {сої O@tdraw 189;185;195;11 
draw 195, горка 112: ағам 29 
117:4ғаш 2803, 117,287 


Тт 122,149, 1 
124. 155.128.155.1 7:143 
қ 101=1435:кезтоғе 460: 


(А 


W h % + も すす ルー جر‎ tA 
.. һә” 


ma عم‎ CL. QD ЕЛ + 


se J إل‎ o キー % < 


+ — زم‎ — た も OG н 


(Gi a ~aj e 
хоо Ое + 
з Ш + + 

#> Ç 


4 
ж 
pa 


in 


Ісй о dirgad 2。 リ 2 ミ d レ 
х2. ч2: хі = м2: 01 = 02: тех 


draw 146,142.,146,144:-а%уғ 


FE data Әйй 09201005040 224.0220 
уасалаййаййа,йаайаййай ісеййй, 
эараайайодапйиаай,айайайаайаййа 
100 ,920795065005850000 

510 data 000 й000д1с221270.6йй0 
эәгпайаалавайа,ййайдйайайййай1й1,. 
віасазаоаааайаваа,йдайййййддйейі 
әзе.4азйаайаайойййдай 


(ух к 5“ ИР. z іш ¿n + 


CD Jj à Яо зар О Л:‏ تي 


qosub 20:9озиЬ 2640:9050 2 
аотыһ 530:4%ом8 158 
еӘӨЙБІРкіпЙІ сығток(1. 


ел C S D に ы + 


ue me CP r< Oe s FJ Ti tj O XX 7° 


BPFIRT#H1 curso 
"с: 


cursor 1. 3) i "OOYY 


"f 
2 


ӘЙРБІРгітз 41 соиғкжоғк (535, 
ЗІНІ" сиғеоғ(35,7 
50172973 
790 14 inkeutg) =9 then 日 和 ま =" リ “デラ 
oto 740 
7ið if іпкеуійҙтій then R$=" £4 
%":4о0%0 7480 
728 ІҒ іпкәеу(Йуті11 then 
"goto 740 
FSU goto 70а 
740 feol 2OFiB$smidfiC$S r ndl) 
*Z+1, 35 3Pprint#1 cursor (3, 9): B$ 
;rCursorvi12x5s $s 
750 if 日 ま =B ま then Srint#1 с.і 
人 jj 
oto 793 : 
T760 1+ Q0$=":“5" and В% "2345" 
Joto 818 
if 4%:"545" апа B5" 5" 
3 こも の 8:28 ) 
if 8%= "13° 6" and RES SS" 
FOOTED I 


НУ ЕКС 


к 
: 3 


- 
a 
a 


сиғзоғ(2,11»: "жана 
Oibar. 152. 
5.239,111:%ағ 0.112.229.175:9 


Print#i 
1 まい ゆき "ます 。 "i £ col 


tr 


гә ій 


шМ-1:Ргіп(Йі Cursor a? 
E LEAT” a "1 cursor К 


ә я} бә о: 


py: 


Мед тһеп Joto 980 


ч г 
< 
о 


850 osub 710: gosub 23й:4отуБ 
130:4о0:0 700 
540 9 ロ Sub 510:4омиҺ 498: 4осо0Б 
189:4о:у5 920:3oto 700 . 
252 4оыз dád6B:idgosub 40й:4о500 
180:4со1 Aidraw 1465,145,1465.14 
419010 700 

958 Iosubh 4614005 510: 903b 
180: Joto 7ӨЙ 

3780 Iosub SlB:3osub 5S68:343osub 
120 
3230 #со1 &BF:Print#%#1 cursort2, 
ELISE 35 109 ене? угу 
399 i+ іпкечќй> =22 then run 
900 1+ inkeyc0)=33 then Print 
"ШИ": end 
910 Ioto 39а 
920 data ЙйЙЙЙЙЙЙЙЙйй1й1й1.01й1!1 
1 ロロ 1 ロロ 1 ロロ 1 ロロ ロロ ロロ ロロ SSTtA, 
ら ロ に ロロ に ロロ に ロロ ロロ ロロ ロロ 
330 data ロロ ロイ ロロ ロロ ロロ bb ロロ ロロ ロロ ロロ ロロ 
ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ, 
ййЙйййййййййөййайй | 
dn restore 3920: For 
езд КҰІ 5 
77 
358 scod 


I=0 to Т? 
t こ hr KE to TOOTS Й: пех 


scod 4.%9й:<с01 
STO Оо TOS 
84, 184:rəturn 


や っ と 隣 に 飛び 移 れ る ぞ 


入試 も 終わ り , FP を いじ くっ て た ら , 
一 年 前 に 作っ た プロ グラ ム が 出 て きま し た . っ て くだ さい . 
それ が これ で す . RUN す る と デモ が 始ま り ま す . P.S 
大 ミニ PiO イ ン フ ォ メ ーション [SPACE | キー で スタ ー ト で す . 


|4 |[@| キ ー で 人 を 上 に 当たっ た り , FE FP の FONT 定義 は 便利 で すね . 次 回 は 
キー 入力 の と ころ , 何と か な ら な か 落ち だ た り し な いよ うに 操作 し て くだ さい . マシ ン 語 の プロ グラ ム を 発表 し た いと 思い 
っ た の か な ? 他 は よく まとまっ て 右端 まで 行く て と ボー ナス が 入り , タイ ム が ます . 


いた の に . 


増え ます . タイ ム が な く な る 前 に 右端 へ 行 
m G ss UP UP BASIC U Z F > 


жеж vat セッ テイ ・ キ ャ ラフ タダ УЛФ" жж 410 GOTO 580 Y+1 
CLEAR:DEFINT A-Z:RANDOMIZE 420 “ ж キー 709 ж“ 800 О-РОІМТ(Х,Ү) 
DEFCHR$ (224) =" さ BBB9OFE1 17D4484" 450 I$=INKEY$:IF I$="" THEN RETURN 810 IF O THEN Ғ-1і:Ү-Ү-1 
DEFCHR$ (225) ="7EFFD7AFDFBFFF7E" 440 IF 1%-"6" THEN IF Х>57 THEN GOSUB 820 RETURN 
DEFCHR$ (226) -"2290452А44592Е18" || 700:RETURN ELSE Х-ХФ%1:5-5%10 BIO ' жы FE жж 
DEFCHR$ (227) «"84447011ҒЕ9ОВӨЗЕ" 450 IF 1%="4" THEN IF Х<1 THEN RETURN 840 QUAD(16。16) – (504,184) 。2 
DEFCHR$ (256) =" 11227D1 1ҒЕЗОВВЗВ" ELSE Х-Х-1:5-5-5 850 РАІМТ(О,О),2 
DEFCHR$ (257) ="FE1O1O01C1C1C1EOO" RETURN 860 COLOR 5 
DEFCHR$ (228) ="O404041C1C1C1COO" ° HH ZIL AF7 не 870 FRINTCSR (7,5) ; "Ш 
DEFCHR$ (239) -"ҒЕА2А2АЕАЕАЕВЕОО" COLOR 5: РКІМТСБК (Хх, 24) ; "2; шь." 
ПЕҒСНК% (240) -"ҒЕВ2027ЕОЕВЕҒЕОО" FOR 2-0 TO 20 880 PRINTCSR(7,4); "Ш 
DEFCHR$ (241) -"ҒЕВ2О2ҒЕЕОЕ2ҒЕОО" O FOR 1=0 ТО 20:МЕХТ ú m 
DEFCHR$ (242) -"ҒЕВ2О2ОЕОЕВЕҒЕОО" 2 SCREEN 2,3 890 РКІМТС5К(7,5);"Ш 
DEFCHR$ (243) ="FEBEBEBEB2B2FEOO" FOR I=0 TO 20 :МЕХТ пш" 
DEFCHR$ (244) -"7Е4242ҒЕВЕВЕВЕОО" SCREEN 2,7 900 PRINTCSR (7,6) ; "Ш 
DEFCHR$ (245) ="B2B282FEBEBEBEOO" ВЕЕРОҒҒ:ВЕЕРОМ | Mu 
DEFCHR$ (246) -"ҒЕВ2О2ЕЕВЕВЕҒЕОО" 2 NEXT 910 FRINTCSR (7,7) ; " W чи” 
WIDTH 40: SCREEN 2:СОЦОК ,,,3:С15:6 GOTO 670 ш" 
DSUB 840 ° +++ DIZ 7797 ог ダイム 4-17 – жж 920 COLOR é6:PRINTCSR (12,11) ; "mm PAB 
190 COLOR ,,,1:СІ 5 COLOR 2 x"; HS 
200 Х=0:Ү=16:Т=500:5=0 FOR J=0 TO 10 950 COLOR 2:PRINTCSR(4,14); "= RIGHT WA 
210 ІМІТ(4,4),8,8 FOR K=1 TO 7 Li, TOUCH = ・・・・・・ タイ の" 
220 РКІМТС5К(0,24); "Е"; 2 SCREEN 2,К 940 COLOR 3:PRINTCSR(4,16); "= RIGHT MA 
230 “ жжж JA ルー チー же 4 ВЕЕРОҒЕҒ:ВЕЕРОМ ІК or JUMP ・・・・・ 10" 
240 WHILE T>O FRINTCSR(X 。24) ; "4"; 950 COLOR 1:PRINTCSR(4,18);"= LEFT WA 
250 COLOR7: PRINTCSR(1,0) 5 "оик" Ts" 3 PRINTCSR(X, 24) ; "®"; LK or JUMP ・・・・・ ещ" 
PAR"; S; NEXT К 960 COLOR 4:PRINTCSR( 12 。21 ) ; КЕМ; "HIT 5 
260 RO=RND( 1 ) +15 NEXT J PACE КЕҮ" ; NORM 
270 Кі=КМр (1) +19 IF S>HS ТНЕМ HS=S 970 SCREEN 2,7 
280 R2=RND (1) #20+19 GOTO 180 980 1%-ІМКЕҮ% 
290 C=RND (1) *4+ さ ° HH ЕТУ 947 ише 990 IF 1%=" " THEN RETURN 
ЗОО PRINTCSR(X,Y);" "j С=0: X=0: S=S+T#10+INT (RND (1) +20) #50 1000 IF I$="N" THEN COLOR 7,,,0:CLS:END 
510 COLOR C:PRINTCSR (RO, 24); " Е" : T=T+200 1010 FOR С-і TO 7 
320 COLOR C:PRINTCSR(R1,24);" t"; 710 WHILE C<76:C=C+1 1020 FOR I=O TO 200:МЕХТ І 
330 COLOR C:PRINTCSR(R2,24);" t"; 720 SCREEN 2,C MOD 7+1 1030 COLOR ,,,С:МЕХТ С 
540 GOSUB780 730 FOR І=0 ТО 50:МЕХТ 1040 SCREEN 2,3 
350 IF Y>23 THEN 480 740 ВЕЕР ОҒҒ:ВЕЕР ОМ 1050 FOR 1=0 ТО 200:МЕХТ:60Т0 970 
360 IF Ү<0 THEN 580 750 WEND 
570 IF F THEN: GUDSUB4 さ OF=O 760 RETURN 
580 COLOR 2:PRINTCSR(X 。Y) 』 "="; 770 “ жж у92 NIN УЮЛ жж 
590 Т-Т-1 780 Р-РОІМТ(Х,Ү) 
400 IF P ТНЕМ F=1:Y=Y-1:RETURN ELSE Y= 


EBE 


ニャー フリ er Т” т 


же... АЙ E 
グラ フィ ッ ク リ ルー チン Р É". 


この ルー チン は ゲー ム 用 に 作っ だ た も の で , | レス 下位 を D30CH, 上 位 を D30A に 表示 す | DO000H を コー ル し て くだ さい 
最大 255 メ 192 ド ッ ト の キャ ラク タ が 書け ま 5 ХИ Z D306H, Y 座 標 を D306H に 入れ ., 
す ( 遅 い ) この リス ト で は 8X8 に な っ て グラ フィ ッ ク ・ ル ー テ チン WE 
27, 


FPEMEXXXKXXXXXXXXXXXXXXXXXXNXXKX cb,3b,cb,3b,1?,11,00 


@1004T2O022 % Z 2 と, 横 の 大 きる が 変 わ RENX MAX 255x192 DOT GRAPH Ж e2,19,22,08,d3,22,0a 

а š REMX Vor ЗО МЕС 93, 2а,йс,93 ,4е, 2а ,да 

り ま すす (データ メメ 4 ドッ ト ). REMX 8x8 DOT VERSION. + d3 。Z 1 9 る 6。29 。2a ,9a。d3 

Рем ак Ба Ау А ВЕМХАВЕЅНІ SOFT. BY SAWADA.X 23,05,22,0a,d3,c2,38 

100 行 の 09 と 210 行 の 09 を 変え る と 縦 の 大 REMXXXXXXXXXXXXXXXXXXXXXXXXX dð ,2а,0с,93,23,22,0с 

きき が か が 変わり ж”. г УКЖ + 1). CLS:FOR 1=kHD999 TO ыН0049 Я3,21,02,43,45,05,70 

READ A$:POKE I,VAL("kH"'+A$) c2,2b,d0,96,09,21,02 

OZ > 2 4 >Z : >— Z l¿3 x > 2 Z OZ NEXT : END ; 43,7@,2а,@8,43,28,22 

上 か ら 下 へ 1 バ つ メ モリ に 100 бата 06,02,0е,09,21,00,43 ба,43,22,08,643,21,00 

+ Ё е амы Ж. 118 DATA 70,21,02,d3,71,ed,Sb 65,46,685,70 ;с2,25,40 

だ る さい 。 120 DATA 04,543,16,00,2а,06,сіЗ с9,00,00,00,02,00,00 

Ө ү БЇ, キャ ラク タ ・ デ ー タ 先頭 アド 130 DATA 25,00,29,29,29,29,29 

©) ©) ps この 前 (3 月 7 日 ) の 夕刊 を 読ん で びっ くり し て し まっ た の で す よ . 読売 新聞 の 「Do コ ン ポ 」 と いう と こ な ん で すけ ど , 「 彼 女 に ゲ プレゼント 
Ол Ол を 送っ た ら 戻 っ て きた 。 どー た ら こ 一 た ら 」 と あり まし て 。「 カ ワイ ン ウ な や つも いる も ん だ 」 と ペン ネー ム を 見 る と 「 パ ンプ キン パイ 」20 
才 大 学生 ど を そう で す . も ちろ ん 僕 じ や ありません. プレ ゼン ト あ げ る よう な 人 な ん て どこ に も いま せん . あー あ .「 パ ンプ キン パイ と シナ モ 
28 (9 ンティー』」 に も お どろ いた けど ビ 。 こっ ち は も っ と お どろ いた な 一 . ホン ト . (類似 品 に 御 注意 私 は ば ん ぶ き ん ぱい ) 


же 


明 あん ど 愛 人 二 十 面 相 & パ ニッ ク IN ДЙ 


ある 日 , 貧乏 な 〇 X 君 は , 黄金 ヶ 森 へ 金 
目 の 物 を 探し に 行き まし た . 予想 どおり ダ 
イア が あり まし た が , 森 に は 番 人 が いる の 
で 時 間 が 限ら れ て いま す . し か も , ЖИЛЕ 
な 管理 人 が 地 電 を た くさ ん 仕掛 け て いま す . 
あな た は この 恐怖 の 森 を 征服 で きる で し ょ 
うか ? 

* š —=PIOfí Z 7 жх = a > 
リス ト ど お り に 入力 し て RUN. 
タイ ム ・ メ ー タ ー は な か な か いい け 


с, 面 変化 が あま り 感 じ ら れ ませ ん . 
その 点 に 気 を 付け て ./ 


遊び 方 


10 “кекке ЗЕ ЗРЗЕ ЗЕ ЗЕ ЗЕ ык жы 


20 Ta <7%+ アル キ GAME > ж 
50 "+ By Akira Мітекама ж 
40 ` AND ж 
50,7 PA" урохуу- ~ 
bO ж & * 
79 "ж № 297 ІМ 2294774 ж 
во "ж DATE 560.02.26-05.15 ж 


90 ° HHH HH HH KE HHH HH E ЗЕ ¥ ЗЕ 3 ¥ ЗЕ 
100 ° 

119 CLEAR 。&H6FFF 
120 DEFINT А-7 

159 DEFSNG 5 

140 RESTORE 

159 DIM А5(0),НТ (0) 
169 READ А5 (9) „HT (0) 
179 DATA -8192 

180 DATA -5376 

199 PLAY "V12" 

2009 WIDTH 40,25 

210 SCREEN 7,7 

220 FOR 1=0 TO 7 
230 COLOR= (1,1) 

240 NEXT І 

250 FOKE %*HFD38, о 
260 Но 

270 = の 

280 CLS 


290 SYMBOL (32,31), "アル キ アル キ бАМЕ",6,5,1М 


T(RND (1) #7) +1 


500 SYMBOL (39。 さ の 9) 。" ア ルキ ТАҒ GAME", 6,5, IN 


T(RND( 1 ) #7) +1 

310 LOCATE 12,10:РКІМТ "HIT ANY KEY!" 
320 LOCATE 15,11:РКІМТ "TO GAME START" 
330 LOCATE 24,18:PRINT "By" 

540 LOCATE 19,19:РКІМТ "Akira-Minekawa" 
550 LOCATE 25, 20:PRINT "AND" 

360 LOCATE 20,21:РКІМТ "?Ау”у2олуу-" 
370 LOCATE 25,22:РКІМТ "&" 


386 LOCATE 18,253:РКІМТ "л° 297 ІМ 217377 


4 
590 1І%-ІМКЕҮ% 

400 IF 1%<>"" THEN 470 

410 R=INT (RND (1) #96) +1 

20 PLAY "L32N=R; " 

450 COLOR INT (RND (1) +7) +1 

440 POKE &HFD38, INT (RND (1) #8) 


450 COLOR= (INT (RND (1) #7) +1, INT (RND (1) #7) 


+1) 

4609 GOTO 510 

479 IF ІФ=СНКФ (15) THEN 1340 
480 CEL=1 

490 CLS 


ら 99 IF (CEL MOD 5)-Ө THEN GOSUB 1419:С15 


510 РОКЕ %*HFD38, 9 

520 FOR 1=0 TO 7 

559 COLOR= (I, 1) 

540 NEXT 1 

550 LINE (0,0) – (58,24), "#",4, В 
560 FOR 1=1 ТО 30 

579 COLOR I MOD 7 

580 LOCATE 16。19:PRINT "START !"; 
599 COLOR 0 

6090 LOCATE 16,10:РКІМТ "START !"; 
610 PLAY "Т2551 6408С" 

620 NEXT І 


p 11: 1iOx3:(&). |8|2)|4|6|%- 
で 上 下 左右 に 操作 し て ダイ アモ ンド ($) を 


15 個 すべ て 取っ て くだ さき さい. そして,。 7 色 
タイ ム が な く な ら な いう ち に GO ! 


4444%%4%9%%%59%9%89%9%%%9%9%%4%%%9%9%%%%% 
ve % 


4 
$ 
4 


+ 
4 
š 

+ 

М 
+ 
$ 

% 
$ 

% 

$ 
* 

$ 

$ 
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Ж 

$ 
4 

4 
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+ 
+ 
š 


ТТТТІЕТТІТТІЗЛГІЗІЗІТІТІІ ІІ 2 222222272222. 


өзе COLOR 3 

640 A=INT(CEL*1@+RND (1) ж20) 

659 IF А>50 THEN A=INT (SO+RND (1) #20) 

669 FOR І--і ТО а 

6709 LOCATE INT (RND (1) #36) +1, INT (RND (1) #2 
3) +1 

680 PRINT "ә"; 

699 NEXT I 

7009 COLOR ё 

7109 FOR Ісі ТО 15 

720 B=INT (RND (1) #36) +1 

750 A=INT (RND (1) #22) +1 

740 IF (B=1 AND А=1) OR (В-57 AND A=23) 
THEN 729 

750 IF SCREEN (В,А)-А5С("Ф") THEN 720 
769 LOCATE B,A 

770 PRINT "Ф"; 

780 NEXT I 

7909 DS=15 

800 X=1 

810 Y=1 

829 COLOR 1 

850 LOCATE Х,Ү:РБІМТ "ж"; 

840 рк=1 

850 COLOR Dk 

860 LOCATE 57,253:РКІМТ "O"; 

870 =2999 

880 LINE (659-16,0)-(659,199),Р5ЕТ,2,ВҒ 
890 (Ү--і 

900 ` 

919 І%-ІМКЕҮ% 

920 УХ-Х:УҮтҰ 

930 IF І%-"4" THEN Х-Х-1:60Т0 980 

940 IF 1%="4" THEN X=X+1:GOTO 980 

950 IF I$="8" THEN Ү-Ү-1:060Т0 980 

960 IF 1%-"2" THEN Y=Y+1:GOTO 980 

970 GOTO 1090 

980 P=SCREEN ( X 。 Y) 

999 FLAY "T255L6408C" 

1000 PUTE(VX, VY) – (МХ, VY), AS,2 

1919 IF P=ASC ("Ф") THEN PLAY "T255L6406C 
DECDECDEAB" : S=S+L#10: DS=DS-1 

1020 IF P=ASC("0") AND DS=0 THEN 10940 
1030 GOTO 10950 

1040 LOCATE 19,9:РКІМТ "жж":ІСЕ "Ху CLEA 
R !! ##";:PLAY "T18O0L8O6CDEF DEF GEF GAF GAB 
", "T13@L805BAGFAGFEGFEDFEDC" 。 "Ti80L804CD 
EFBAGFDEFGAGFE":FOR 1=1 ТО 2750: МЕХТ I:L 
ОСАТЕ 12,11:PRINT "BONUS";šTš"PTS”":;S=S+T 
: CEL=CEL+1:FOR 1=1 TO 5800:МЕХТ I:GOTO 4 
оо 

19509 IF P=ASC ("O") AND DS<>@ THEN X=INT( 
RND (1) #36) +1: Y=INT(RND (1) #22) +1:PLAY "Т2 
SSL 3208CDEF DEF GEF GAF GAR" 。 "T255L3207BAGFA 
GFEFEDC", "Т2551 3206CDEF BAGF DEF GAGFE " 
1950 IF P=ASC ("®") OR P=ASC ("#") OR P=AS 
С("=") THEN 1190 

1970 5=5+1 

1080 PUTG ほ (X。Y) 一 (X。Y) 。HT。 1 

109909 DK=DK+1 

1100 IF DK=8 THEN рк=1 

1119 COLOR DE 

1120 LOCATE 37,23 

1150 PRINT "о"; 

1140 Т=Т-1:ІҒ T<59 THEN PLAY "Т2551 5206В 
С":ҒОК I=@ ТО 7: СОЦОК= (І, 9) : МЕХТ 1:ҒОК I 


に フラ ッシュ し て いる 出口 ( 〇 ) へ 突 込 ん で 


くだ さい. 


画 ク サ デ ヂ に な り ま すじ か し 。 


15 個 全部 取っ て いな い の に 出口 へ 突っ こむ と , 
ラン ダム に ワー し ます 。. 気 を 付け て くだ 


ос, きら に , BER) ә (ІШ), 


自分 の 


足跡 に ぶつ か る と 死に ます . また 制限 時 間 
が あり , タイ ム ・ オ ー バ ー に な っ て も 死ん 
で し まう の で , 右 の タイ ム ・ メ ー タ ー と よ 
相談 し て 作戦 を た て て くだ さい . 
ダイ ア を 取る と 100 点 , 面 を クリ ア す る 


と ボー ナス と し て 残り の タイ ム が その まま 
得点 に が な り ま す . また だ , 5 の 倍数 面 は ボー 


ナス ・ ス テー ジ に な り ま す . 


ここ で は 人 は 


無敵 に な り ま す . し か も 制限 時 間 も ぉ ありま 
せん . だ だ し , 地雷 が 見 え を なくなり ます 。. 


P.S. 


この ゲー ム は 初め て 作っ た 作品 に し て は 


と て も で き が よく 〈 く ,。T/O の デ ロ グ ラム ・ テ 
スト に 応募 し て も 絶対 に 参加 賞 は 取れ る と 
思い ます . 


アル キ ・ ア ルキ GAME BASIC リ スト uuu 


= の TO 7:СОІОК-(1,1):МЕХТ I 


1150 


IF (Т MOD 10)=0 THEN LY=LY+1:LINE ( 


639-16,LY)-(639,LY),PSET, の 
IF T=9 THEN 1190 
GOTO 919 


1160 
1179 
1180 
1190 
1200 
1210 
12209 
1250 
1240 


LOCATE 11,8:РКІМТ "жж GAME OVER жж" 

LOCATE X,Y:COLOR 2:РКІМТ "x"; 

ゆい = の 

PLAY "T1 の 9L ヨ BU2CDEDEF ロ 3BE " 

LOCATE 11,8:РКІМТ "жж GAME OVER ##" 
LOCATE 12。19sPRINT USING "YOUR SCOR 


E ##### PTS”""; S; 


1250 


IF SW=1 ОК Н<5 THEN SW=1:LOCATE 153, 


12:РКІМТ "YOUR НІ-5СОКЕ!!" 


1260 
1270 
1280 
1290 
1500 
1510 
1520 
1550 
1540 
1550 
15609 
1570 


1%-ІМКЕҮ% 

IF 1%=" " THEN 270 

IF 1%=СНКФ (15) THEN 1340 
R=INT (RND (1) #96) +1 


PLAY "L32N=R; " 


COLOR INT(RND(1)*7)+1 
GOTO 1250 


WIDTH 89,25:CLS:COLOR 7 

POKE &HFD38, © 

PRINT "THE-END! " 

FLAY "T159L 1607GQBUBCD6ECD6ECD6ECD6 


ECDDDDD" 


1580 
1590 
1400 
1410 
1420 
1450 
1440 
1450 


14609 
1470 
1480 


1490 
1500 
1510 


DELETE 100- 
END 


COLOR7 
CLS 

COLOR 4 

LOCATE 0,9 

PRINT "ーー 


% 
FOR I=1 TO 25 
LOCATE 0,1 
РИШАТ. "3 
1"; 
МЕХТ І 
LOCATE 9,24 


АТА, ЫР sss 


——ac s s g 
š 


1520 
1550 
1540 
КЕЛ? 
1550 
1560 
1579 
1580 
1590 
1600 
1610 
1629 
1630 
1640 
1650 


FOR Ісі ТО 28 
COLOR I MOD 7 i 
LOCATE 10,109:РКІМТ "BONUS STAGE STA 


PLAY "T255L6408C" 
NEXT I 
LOCATE 5, 1@:PRINT " 


DIM BUSX (12) 。BUSY(12) 

COLOR 6 

FOR I=1 TO 15 

X=INT (RND ( 1 ) #36) +1 
Y=INT (RND (1) #22) +1 

P=SCREEN( X 。 Y) 

IF P=ASC ("Ф") THEN 1610 

IF (Х=1 AND Y=1) ОК (X=37 AND Y=23) 


THEN 1610 


1669 
1679 
1680 
1690 


LOCATE Х,Ү:РКІМТ "е"; 
NEXT I 

FOR I=@ ТО 12 

COLOR š 


29 


219 


アル キ ・ ア ルキ GAME BASIC!) A F 


1790 X=INT (RND (1) #36) +1 
17109 Y=INT (RND (1) #22) +1 
1720 Р=5СКЕЕМ (X, Y) 
1730 IF P=ASC ("Ф") 
1749 IF F=ASC("#") THEN 1700 

1750 IF (X=1 AND Y=1) ОК (X=37 AND Ү-22 
THEN 1700 

1760 LOCATE X, Үз PRINT 7% 

1779 BUSX (1) =X 

17809 BUSY (І) =Y 

1799 NEXT І 

1800 FOR Ісі ТО 1759 

1810 МЕХТ І 

1829 FOR І=@ ТО 12. 

1850 LOCATE BLSX(I),BUSY(I):PRINT СНКФ (% 

HFF); 

1840 NEXT I 

1850 X=1:Y=1 

1860 LOCATE Х,Ү:СО( ОК 5: РКІМТ "аб; 

1879 COL =1 

1886 COLOR COL 

1890 LOCATE 57,23:РКІМТ "о"; 

19090 DXR=15 

1910, 

1920 I$=INKEY$ 

1950 
1940 
1959 


ТНЕМ 1700 


1%-"8" THEN Ү-Ү-1:60Т0 2050 
I$="2" THEN Y=Y+1:GOTO 2050 
19650 1%="4" THEN Х-Х-1:60Т0 2050 
1970 1%-"6" THEN X=X+1:GOTO 2050 
1989 COL=COL+1 

1990 IF COL=8 THEN COL=1 


よく ある ブロ ッ ク く ず し で す が , 
遊ん で みて くだ さい . 
* š —PIO4 XZ 7 жх —> а> 


リス ト ど お り に 入力 し て RUN. 


プ ブロッ ク を "寝かせる" と は 考え ま 
し た ね . で も キー は [3 と [9 に し た 方 
が よかっ た の で は ? 


199 WIDTH 40, 25: CONSOLE 9,25,0,0:ПЕҒІМТ 

A-Z: RANDOMIZE TIME/3 

110 M=1:HI1=10000 

129 ° 

130 SC=0: BA=2: 6=0: CLS 

149 LOCATE 12,10:COLOR 5: INPUT "LEVEL (3/ 

2/1)="sLE 

159 IF LE= さ THEN (Есі ELSE IF LE=2 THEN 

LE=25 ELSE (Е-50 i 

150 LOCATE 13,12:COLOR é6: INPUT "GAME (А/В 
="; GA$ 

179 IF бАФ-"А" THEN MM=0:NN=0:00=0:CLS E 

LSE MM=1:NN=2: 00=3:CLS 

180 ` 

199 COLOR 7:LOCATE Ф, 1:РКІМТ "4" STRINGS 
(37, "@"); "7" 

299 COLOR 7:LOCATE @,24:PRINT "W"; STRING 

%‹(57,"Ш"')›;"ь"; 

219 FOR I= 2 ТО 23:LOCATE Ф,І:РКІМТ "m"; 
:NEXT 

229 LOCATE 1,@:COLOR 7:PRINT "НІ-ЅСОКЕ" ; 

HI 

230 LOCATE 17,@:PRINT "SCORE": LOCATE 33, 

Ө:РЕ1МТ "BALL"; BA 

240 ° 

250 FOR Ісі ТО 22:LOCATE 6+6, 1+1:COLOR 1 
sk PRINT "00": МЕХТ 

259 FOR Ісі TO 22:LOCATE 8+MM+G, 1+1: COLO 

R 2:PRINT "пп":МЁХТ 

279 FOR 1=1 TO 22:LOCATE 1 の 9+NN+G。 1+1: COL 

OR 3:PRINT "па":МЕХТ 

280 FOR I=1 TO 22:LOCATE 12+00+G, 1+1: COL 

OR 6:PRINT "пп":МЕХТ 

290 ° 


リー や ゃ , 


ウル ティ マ な ど と 同じ 種 ら し い の で す . 
ん な の を 買う ん だ っ だ たら Pi0O を 買っ た ほう か が いい ?). 


24000 COLOR COL 

2019 LOCATE 37,23:PRINT "о"; 
2020 R=INT (RND (1) +96) +1 

2030 PLAY "LIZN=R;" 

2040 GOTO 19290 

2050 F=SCREEN(X, Y) 

2060 IF F=&HFF ОК P=ASC(" 1") 
") ОК P=ASC(" г") OR F=ASC ("¬") 
на") OR Р«А8С("-4") THEN 2140 
29709 IF Р-А5С("%ж") THEN DXR=DXR-1 

2084 IF P=ASC ("о") AND DXRS ジ GO THEN X=INT 
(КМО (1) #36) +1: Y=INT (КМО (1) #21) +1:PLAY "T 
255081 «АСПЕСПЕСПЕАВ" 

2090 IF F=ASC ("о") AND DXR=0 THEN 2250 
2100 LOCATE: УХ,УҮ:РКІМТ " "$ 

21109 COLOR Š 

2120 LOCATE Х,Ү:РКІМТ "ж"; 

2150 GOTO 1980 

2140 LOCATE УХ,УҮ:РКІМТ " "; 

2150 COLOR 2:1 ОСАТЕ Х,Ү:РКІМТ "ж; 

2150 PLAY "T18@L402EDCEDCO1BA","T189L 405 
EDCEDCEDCOSEA" 

2179 FOR Ігі TO 28 


ОК Р-А5С("-- 
ОК F=ñSC ( 


2184 COLOR I MOD 7 
2199 LOCATE 15,19:РКІМТ "МО BONUS!" 


2200 МЕХТ І 

22109 FOR Ізі TO 1500 
2220 МЕХТ І 

2250 ERASE BUSX,BUSY 
22409 RETURN 

2250 FOR I=1 TO 42 


Ф 小野 塚 斑 一 


RUN し て レベ ル と ゲー ム を 入力 し て 《 く だ 
5, レベ ル は 大 きい 方 が 難し く な っ て い 
ます . ラケット は |@||3| で 上 下 に 動き ます . 


Р.5. 


ぃ いろ ん な メー カー か ら 新 機種 が 出 て きま 
し た が 。 富士 通さ ん は 出る な いん で し ょ 2 う 
か ? で も 77 ユ ー ザ ー は L4 が 出 て ショ ッ ク 
な の に また 新しい の が 出 だ ら 6 大変 で すね . 


200 ВХ-37:2Х-ш-і:і-13:ВҮ-КМр(1)ж21%2:2Ү-іІ 
NT (RND (1) #2) ж2-1 
510 ” 
529 COLOR S:GOSUB 640 
330 ^ 
540 ІФ-ІМКЕҮ% 
3560 COLOR 5 
56Ө IF 1%-"5" AND 1<25 THEN RY=+1: GOSUE 
640 
579 IF 1%-"6" AND 1.>4 THEN RY=-1:GOSUB 6 
40 
580 COLOR 7:P=SCREEN(BX+ZX,BY+ZY) 
5909 Р=5СКЕЕМ(ВХ+2Х, EY+ZY) 
Р=0 OR P=32 THEN P=32: GOTO 479 
Р>227 AND Р<525 THEN 2Х--2Х:2Ү--2 
510 
Р-142 THEN 2Х--2Х:60Т0 510 
Р-155 THEN ZY=-ZY: GOTO 510 
P=219 THEN BEEF 1:GOSUB 690 
SC=8000#M THEN M=M+1: G=6G+3: CLS: GO 
ELSE GOTO 510 
460 FOR I=@ ТО LE:NEXT 
479 BX=BX+ZX:BY=BY+ZY:LOCATE BX,BY:PRINT 
"K" ө" Н 


,480 LOCATE ВХ-2Х,ВҮ-2Ү:РКІМТ " " 


499 IF Р>1535 THEN P=32 

S00 IF ВХ>57 THEN S39 

519 GOTO 540 

S2@ `” 

550 BA=BA-1 

540 IF ВА--1 THEN 590 ELSE LOCATE 37,0:F 
RINT BA 

550 FOR I=@ TO 3000:NEXT:LOCATE BX, BY:PR 
1 NT " " 


P.S. は っ きり 言っ て 。 


2269 COLOR I MOD 7 

2270 LOCATE 9,11:РКІМТ “SUPER BONUS 2000 
ӘЗРТЕТІК» 

2280 МЕХТ І 

2299 COLOR INT(RND(1)*7)+1 

2200 LOCATE 9,11:РКІМТ "SUPER BONUS 2000 
ӨРТЕУ 

23109 FOR エニ 2 の ウ 999 ТО Ө STEF -100 

2320 FLAY "T2SSL&408C" 

2330 A$=STR$ (І) 

2540 A$=RIGHT$ (A$, ЕМ(АФ) 一 1 ) 

23550 IF ЕМ‹АФ) <5 THEN A$=STRING$ (S-LEN ( 
АФ), "0") +АФ 

2560 LOCATE 21,11:РКІМТ A$; 

2570 5=5+100 

2580 LOCATE 11,15:РКІМТ USING "SCORE:### 
# РТ5”";6: 

2599 МЕХТ І 

2400 FOR Ісі ТО 1270 

2419 NEXT I 

2420 ERASE BUSX, BUSY 

2430 RETURN 

24409 *ХЖ%%Ж%%%%%%%%%%%%%%%5% 

2450 "Z PROGRAM END. % 

2460 7% DATE 5060.05.15 7 

2470 %УХ5ХХХУХХХЕХХХУХЖҰУ 


も う ダメ, 間に合わ な いよ 


2 参考 文献 
FM-NEW7 プ ブロ グラ ミン グ 入 門 ?, 
2 +k 


ナツ 


プ ブロック くず L し BASIC リス ミト maw 


550 FOR I=Q TO 2:10САТЕ 38,L-I:PRINT " " 
: NEXT 

570 L=L+RY: GOTO 500 

500:7 

5909 IF HI<SC THEN HI=SC: LOCATE 10,0:PRIN 

Т USING "#####'" HI 

600 SYMBOL (90,80), "+++ GAME OVER !! 

45,5,4 

610 LOCATE 9, 14:СООК 7sPRINT "C SPACE K 

EY ТО START 1" 

620 B$=INPUT$(1): IF B$=" " THEN M=1: GOTO 
130 ELSE 620 

630 °? 

6549 FOR 1= の 9 ТО 2:LOCATE 358,1-І:ІРКІМТ " " 

s NEXT 

650 し =L+RY 

669 FOR I=© ТО 2:1ОСАТЕ 28,1-І:РБІМТ "B" 

s NEXT ' 


жж" 


RETURN 


LOCATE BX+ZX, ІМТ ((BY+ZY) /2) #2: РКІМТ 
LOCATE ВХ+2Х, ІМТ ‹ (BY+ZY) /2) ж2+1:РКІМ 


SC=SC+100: LOCATE 235,0:РКІМТ USING "# 
Нян": SC 
20 2Х=-2Х: ВЕЕР © 
7509 RETURN 


DS ГХЕШОНЫМФС) と いう 本 に 挑戦 し て いま す . 読ん で いる ん じゃ な く 〈 く て, 挑戦 し て いる ん で す . 実は に この 本 , アド ベン チャ ー ゲ ー ム 
デック と 呼ば れる 物 で , 読者 が 主人 公 の 性 格 を 決定 し 謎 を 解い て いく も の で す . 特に この 本 は アメ リカ の を 日 本 語 訳し た も の で , ウィ ザー ド 
ロー ルプ レイ ング ゲー ム フ ァ ン は 1 度 見 て は どう で し ょ うか 。 現代 教養 x 文 庫 で 480 円 で す ( そ 
これ を 始め て も う 3 日 目 で す . や みつ き に な っ て し まい まし 


この ゲー ム で キー を 強く 押し すぎ て , t 
っ か く 〈 く の S 1 を 壊さ な いよ うに し まし ょ う . 
廊 ミ ニ P ロ IO イン フォ メー ショ ン 


で | リス ト ど お り に 入力 し て RUN. 


単純 移植 じ も や な いし , キャ ラク タ も 
| かわ いい の で マル ノノ 


рс の ム 


この ゲー ム は PiO'85 年 4 月 号 の PC-9801 


10 ’” く お お お お お お お お お お お お お お お け 
20-4 ガ 
5078 1-SMIMMING 8 
40 78 ガ 


の 100m 走 の プロ グラ ム を 水泳 に し た 


Ж, 
O7 
[4]: [6| を 交互 に 押し て 泳い で くだ さい . 
コン ビ ピュー タダ は ラン ダム に 泳ぎ ます . 


m, 5. 


私 は PiO'84 年 10 月 号 の プロ グラ ム が 載 


550 SYMBOL(180, 150), "PUSH CSPACE]", 3,3,5 
: SYMBOL (90, 180), "PROGRAMMED BY MAKOTO NI 
SHIMOTO. ", 2,2,3 

540 PUKE&HFFEO, 128:IF PEEK(&HFFE0)=128 Т 


мо 


スタ ー ト て 大 幅 に 出遅れ た の が イタ イ 


<<< ТІНЕ % >>> 


っ た だ 他 , ほとん ど が 他 機 種 の 移植 , 改良 な 
の で す . 僕 に は 才能 が な い の か も し れ ま せ 
А, で も 移植 は ゲロ な み で す (? ) 

3 参考 文献 
1 ) HAL : 
年 4 月 号 


“РС-9801 100m Ж”, PiO'85 


S1-SWIMMING BASIC ! д Fusus 


)*C(F (1) THEN MX=MX-1:F=1:PLRY"L6407G" 
580 IF RND+*2)1 THEN CX=CX-1 

590 COLOR ,,1:LOCRTECX+2, 11:PRINT"; 
CRTEMX+2, 14:PRINT"; " 


"LDO 


50 '#By Макото ニシ モト 。 ガ 
60 ガ 

70 5.50.35.22 ガ 

80 “4 

90 728ВББВ5БББББЫББББЗ 

100 1G$(2 さ 6)=" さ C7EFFDFFFFF7E さ C" "ООдОЕОр 
ОҒВ1СТЕЗС", "о" 


НЕМ 560 ELSE 540 

560 MIDTH40』CLS :CX= さ 6 』 MX= さ 6 

570 PAINT (O, О), CHR$ САНАА) +СНЯФ ( &HOO) +CHR 
$ ¢(&HAA) , 2 

580 LINECO, 80)-(639, ВО), PSET, 2 

590 LINE(O,104)-(639,104),PSET, 2 

500 LINE (O, 1002-(629, 100), PSET, 2 


700 COLOR, , i s LOCATECX, 11: РКІМТ" 3" 

710 (ОСАТЕМХ, 14』PRINT "Ak" 

720 IF MX=O THEN LUCRTE14. 昌 sPRINT "アナ 9 / 
カチ ドス! " :G60T0750 

730 IF CX=O THEN LOCHRTE1 1 , 日 :PRINT "COMPUT 
ER / ЛТХ! ":СОТО750 

740 ҒОНІ-1Т7020:МЕХТ:65070650 


101 10%(257)-"ООдОЕОВОҒВЕС?ЕЗС", "OO40EOD || 510 LINECO。 124)-(639。 124) | PSET, 2 750 COLOR, , O:A$=STRS$ (VAL (RIGHTS (TIMES, 2) 
ОҒВ1С7ЕЗС", "SC3E1FOFO7O30000" | 620 '----- МАІМ ----- ) ) SYMBOL (190,120), "TIMEN"+A$+" 5" 3, 3,4 
102 10%(229)-"ООООООООООООЕОЕС", "0000000 || 630 ТІМЕФ="00:00:00" ,РБЕТ:ҒОЯІ-ОТ05000:МЕХТ 

00O0OEOFC" "о" 840 SYMBOL (180, 20), "S1-SWIMMING", 3, 3,3, || 770 COLOR RND*6+1:LOCATE13, 11: РВІМТ"НІТ 
103 10%(593- "0200144010842009", "0200144 || PSET [SJ KEY !" 


010842009", "0200144010842009" 

500 COLOR ,,O:CLS:FORI=OTO8 

510 7-(1 MOD 7)+1 

520 SYMBOL(100-1*4&,10+I)," Si ~ SWIMMING 
" 4, 3, J, PSET:NEXT 


650 POKE&HFFEO, 128 

660 COLOR 7:LOCRTE12,6:PRINTUSING"((( ТІ 
МЕ ## ))) "{ МА СКІСНТФСТІМЕФ, 22) 

670 С=РЕЕК С &НҒҒЕО) :IF (С=185) жЕ) 0) THEN 
МХ=МХ-і:Р=0: Р АҮ"_64076" ELSE IF (C=190 


780 IF РЕЕКСЕНҒЕҒЕО)-186 THEN 560 ELSE 77 
‘0 


@ し で ん あき ら 


まま も 
1 上 上 まし ト | 1 | | 
EEL も EEE まま に に も また し 


ГЕГІТТІТТТІ 
27 БЕНБЕШЕ 
ТЕРЕТ 
ECT 


E 
елзезикасооаляшы 


だ . と ころ で 本 と いえ ば , や は り 「 ウ ルフ ガイ 」 シ リー ズ で すね .「 ゾ ゲン ビー ハン ター」 シ リー ズ も 好き で す 。 


(今日 は 1 日 中 ディ スプ レイ に 目 を 向け て いた りん で ん ) 
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の 電気 館 に ある マイ コン ショ б 2 
す . ここ は な か な か ゆっ だ り し て いる の で , 
1 一 2 時 間 ぐ で らい 眺め ゆら れ ま す . 

£ U Cak. ジワ ォ ッ チマ ン に 行っ て も 
ізі Уау УТ ДҮ 
КІЗГІСІЗ, 2” 032 mz 
関す る 本 が 豊富 に ある の で , 本 は ここ で て 選 
ぶ と よい と 思い ます 。 

次 は , 第 2 アメ 横 と 第 1 アメ横 に 行き ます . 
し か し 。 どちら も よく 〈 く 似 て いる の で 。 ЕЪ 
ら か 1 つ に し ぼっ て も よい と 思い ます 。 


ч を し て 次 に 。 中 京 マ イコ ユ コシ に 行く の も よ 
⑧ 浜田 典彦 ыы 


いで で しょう. ここ は ソフ ト が 安い と いう と 


僕 が マイ コン ショ ッ プ へ 行 りえ が あり ます . 

く と き の ル ー ト を 紹介 し ます . まだ , マイ コン テッ ク は カト ーー 無線 と 似 
僕 の 場合 は , 名 鉄 金山 駅 を て いま す が , ちょ っ と 置い し て ある 本 の 数 が 
降り て , 地下 鉄 に 乗っ て 行き 少な いよ 527, 29ВЕ, E D аш 
š+. そし て 地下 鉄 の 矢場 町 多い で す . 

で 降り , 西 の 階段 を 上 っ て い そし て 最後 に コモ ドー ル , Bitt-in に 行っ 
きま す . する と カト ーー 無線 の て みる と いい と 思い ます . 帰り は 地下 鉄 の 
本 店 が ある の で , そこ の 5 階 ト 上前津 駅 で 乗っ て 帰る と いい で しょ 5. 


な お 。 道順 は 図 に 書い て お きま す 。 


@ 中 村 と 一 緒 に 行っ た 大 阪 の 商 買 人 


エー ト , 2/27- 3/ 1 まで 大 阪 城 ホ ー ル 
で FM フェ ステ ィ バ ル を や っ て いた だ の で レレ 
Жеке т; 

まず 入っ だ 所 に カタ ログ ・ コ ユー ナー が あ 
り 。 スカ イラ ジ + кл" (一 部 200 円 
の 本) の No. 1 一 No. 9 (No4 欠 ) を も らい まし 
だ 。 の りり pt t 5" 

ゲー ム ・ ホ ビー コー ナー で は ,。 EGGY 
(ボー ステ ッ ク ) の FM-7 版 を いじ っ て い 
だ た ところ, еле ЖӘН тас (DE, 
で き は 良かっ た )。 腹 を た て て いる と , Ж 
ー ス テッ ク の お 上 兄さん が 。 「 あ ー そ れ 未 完 
成品 な ん で す 」 と 言っ た . 

EUC RS S EEG EPM の オス 
が あり , 座る の を だ た だ ためらっ て し まっ だ た だ 。 別 ムッ パッ ク の ブー ス の 写真 を 載せ て お き КЕЗЕ FERREE 
に よい し ょ する わけ で は あり ませ ん が , コ も 


去る 3 Z31— 4 Z 3, 日 比 谷 国際 ビル 2 
F に お いて , 小学 生 高 学年 と 中 学生 を 対象 
と し た , 春休み パソ コン 講座 「C&C フ パッソ 
コン ワー ルド 」 が 開催 きれ まし だ ただ. 

取材 当日 (4/ 2 ) は 中 学生 の 部 の 第 1 日 
目 ( 小 学生 の 部 は 3 /31 一 4/1) と いう こと 
С, 参加 し て いた だ 約 40 人 の 生徒 る ん だ た ちゃ も 
ぃ いく ぶん 緊張 ぎみ の よう … 

ま だ , 今回 の 参加 者 の 半数 以上 が 初め て 
マイ コン を 使う と あっ て ,。 イン スト ラク タ 
の 説明 を 聞き な が ら , 真剣 な まな ざし で マ 
イコ ン を 相手 に 健闘 し て いま し た . [P] 
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JUFC 星 に 支配 され つつ ある PiO 
星 . 以前 か ら の 支配 者 で ある JPC 星 
で は , PiO 星 を 完全 に 自分 た ちの 物 に 
取り 戻す べく , JUFC 星 へ の 起 死 回 


COR 
885888 98185 


ф-------- ا‎ 


z> ОЕМОЛ 


© MZ-1500 


HR ZRO, 地上 の 敵 基地 や 空中 
か ら 襲 いく る 敵 機 の 攻撃 を 巧み に か 
わし な が ら つ き 進 む , も っ と も 基本 
的 な スクロール 型 シュ ー テ ィング ・ 

ӘМЕНТ-ӘОМВ OKE 


HIGH-ECORE 
の の の の の | S800 


% 
ш Бі 
"ЭШЕ 7.7.7.5 2 u. BY OR 
o v hk 


-% PUZ JL 
ЁБ pasoPia7 


—pas aaa a o a a or 


a DE лынан EEE EEE ET EE SOE E AEA Wow ATERI AE ES у. 


> en WU WAY Army 1 
シリーズ 
いま 君 が や ら ず し て 誰が や る ん だ 」 
を ん な 無責任 な 上 司 の 一 言 か ら , む 
りや り 地 球 の 平和 を 守る た め に 戦う 


こも 本 拓 つね だ あなた: 
し か し , 敵 は 膨大 な 数 . は た し て 
本 当 に 地球 を 守り と お せる の か ? 


生 の 攻撃 を 開始 し た の だ っ た . 

を の JPC 星 攻撃 部 隊 の 先陣 を 命ぜ 
られ だ あな た は , 敵 の 巨大 マザー シ | 
ッ プ を みごと 破壊 で きる だ ろう か ? | 


LEFT AREA 
88 82 


2? певот Area 
wd PC-5000 シ リー ズ 
愛す る 彼女 し の つか の 間 の 時 間 も , 
いま で は 遠い 昔 の こと の よう . あな 
だ に は , 平和 に 安 ら で こと は 許さ れ 
な い . 

「 合 度 も 戻っ て くる わ よ ね 」 し と 言っ 
| た 彼女 の 問い か け に , 何 も 言え を な か 
| た あな た . は た し て … 


5158 АМ АЗ Ai 


— AY mI a 


アー ム で す トーーー 一 


壮絶 な 敵 の 攻撃 の 中 を 進 W の は 至 | 。 W ә 
ЖОЖ USERS, 自 減 覚悟 | & Л ドー ナッ ツウ < 74 9879) 
әт | € MZ-700 
宝 を 拾 お うと , と ある 工場 へ 忍び чйр» 
込ん だ あな た . だ が , うっ か り し て үй. 
持っ て いた だ ドー ナッ ツ を 池 の 中 に 落 wR 
と し て し まい まし た . 証拠 を 残し て 
ЖИЫН | は 一 大 事 . と こ で 宝 を 拾い な が ら 
=, 池 の 中 の ドー ナッ ツ を 取る こと に し 


| See | 
oe まし だ た が, な ん と 池 の 中 に は 人 喰 魚 が 
“е 
| 


2 


нн-е 

の の の の の 1 егер 
(OUR -ECFE 
а | 


FREA 01 


うようよ と 泳い で い だ の で す . 


15у м“ № 
ҰЛУ) 


1% (М \ A 
& РС-8001тК I 
PC-8001mk II 専用 の スロ ッ ト ・ 
マシ ン の 登場 で す . 
| 。 勘 を は た ら か せ て , 億 万 長者 め ゆ ざ 
敵 で ある 球 は , 初め は 大 球 . これ | し , 頑張 っ て く 《 だ さい . 
に 弾 を 当て る と ちょ っ と 小さ め の 中 | 
球 2 個 に 分 像 し ます . そし て この 中 
球 に また 弾 を 当て る と も っ と 小さ い 
小 球 2 個 に 分 裂 し ます . 最後 に も 5 
1 回 当て る と … や っ と 消え て くれ る 
の で す . 

自分 の 弾 は 4 連発 . し か も る ある ポ 
イン ト を 通過 する と … 和 驚異 の 8 連発 


а 


—— s T 
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^^ 2) 


MZ に ひき びき 
ОРА ТУЕ 
ッ タ ー の 動作 は , 
で 感動 も の . 

だ っ ぷり 


ЖЖ З 
ッ ナ マー 


と ЗО 


か 
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2 954 279 
W М7-700/1200:80К/С 


25%, КО 
(14, ЛА ШО | š 


の 投球 や バ 
ТЕН "ТС 


5720 


ШЕР ЗЕ 


ШӘДІ 
ずり 5 込 


РА, ОТК СОН 


| СРО 


SI ТОМ До уз) [S 


ij ( Ел ENT ORE 
202027. 


{Ж x の ті, 


2, そう 。 この 戦い もい つか は き 


うす れ ば 彼女 に 


GA 2? 2 
с 164 ж-е 


し め る 日 が . 


て ーーー 
Н SCORE 
S じ URI 


ある ソフ ト ・ ハ ウス の フ 
ЕЛ ТАМАМ 5252 
プロ グラ ム 中 に 大 き な バ グ を 作っ 


し まっ だ あな た だ た が 見 た 爵 と は … ? 

あな た だ た に 朋 い か か る フロ 
Š >, 
ЧЕТИ Ф. 
と も スト ルス が な た まっ て も まう 


etC. 日頃 の うっ 


-a Bacteria емо! 


PC-8000 シ リー ズ 


EOD A C O) CE 
カ かない バク テリ ア が 住み つい て お 


ЛРС ОТР о?г, 


і 
е ГЦОЙАІКОНЕ 


1 019 1ИГЕСТОЯ 


を その と きか ら 私 は 変わ っ 


=) 


НО > 
o an 


е. 


хо 2 
D€ 人 


JJ 


b, 


で ーー ペー ャ ーー 


ы 


| 


k —, aÀəÀ-- 


ТЕРЕ. 


~- 
وہ‎ 
< 
"ст 


А 


` SMC-777 


ЛЕ 2 m b 300), 車 は ば くし ん 


この 車 は ちょ っ と や そっ と 岩 
に ぶつ か っ た で らい で は クラ ッシュ 
し な い ゼ ぜ . 

た だ た だ 岩 の 間 を ЕТ 
ОВУ з кы 
し い ゲ ー ム が 横行 する 中 , た ま に 
こん な ゲー ム も いい の で は ? 


S は あな た が 住 も 
н. と ころ が , седі 


て も 平和 な 
に 狂 禁 な 


ンス ター の 大 群 が 住 みつ sa と きま 
き 村 へ と お り て き て 乱 困 を 働く の て 
Жж 


そこ で 村人 だ た ち は あ な た 
ー を 与え て モン スタ ー 退 治 わ を きせ る 
ШОСТ 


ЖШ зк ы. 


ane aaa a 


: ー ラ 人 破壊 


掛け る ライ ン が 横 3 つ プ ラス 斜め 


2 つの 計 5 つ の スロ ッ ト ・ マ シン で 
す . を その た だ ため, 多少 失敗 し て も す で ぐ 
に 取り 戻せ る の で す . 

27, ギラ ム の 回 転 ズ ピー ド は ぜ 
ーー / 放 ラ プル な キャ ラグ タダ がち き 
この ゲー ム を 楽し て る ぜ せ て いま す . 

wamak — mart) 


ры 
MZ-2200/2000 


ШОО ОД AFA. ay F n 
に 成功 じ だ あな た 、 だ が 5: 
S E сы, 
っ た だ レー ザー 砲 が 乱射 を 始め て し ま 


12. 
を そこ で 。 あ な だ は レー ザー 砲 の 雨 


の 中 を , 小型 飛行 艇 ホエー ル で 脱出 
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Жол 64 


ме, あな た だ は 何 手 で ご も 


並べ る 


"の カラ フル な 15 枚 の パ 


笠 な つか し い 15 バ パズル の コシ ゼ ュ 
и 


ғ 


ҸӘ FM- フ € ® MZ-2200/200 
оу SN RS Z УЯ ОИ, А, 952-718 ЕїтУ уои p E P 
ー を 捕まえ たり と 大 忙し . СЫ, の キノ ュ コ や 突然 顔 出 す タケ ノコ な ど .』 (н, 
そう し な いと 家 の 中 に 入れ て も ら え ぇ ちょ っ と パズル っ ぽい か わい い ゲ ー ў: 

な い の で す . л あな だ た は 愛車 の ハン ドル を 握り し 


女の子 の 行く 手 を は ば む の は , = 


6 月 に 公開 され る 予定 の "レイ ザー バッ 
ク 」 は , オー スト ラリ ア の 原野 を 舞台 に , 人 
間 と 伝説 の 巨獣 と の 戦い を 描い 作品 で す . 

オー スト ラリ ア の 荒野 に 住む と 伝え られ 
て いる 伝説 の 巨獣 レイ ザー/ パ ハッ ク は , 極め 
て どう 猛 で , 自分 に 近づく も の は 何 に で も 
龍 い か が か る と 言わ れ て いま す . その 体 は , 
体長 120cm, 体重 250kg 以 上 に も お よび , R 
име, 針 の よう に 突き 立つ だ 体毛 , そし て , 
名 前 の ゆえ ん と な つか だ , 高く 張り 出し だ 痛 
骨 ( レ イザ ー バ ッ ク は カミ ソリ の 育 中 の 意 
味 ). 

この 巨獣 に , 孫 を 殺さ れ だ 老 カ ン ガ ル 


Тен, 


ー・ ハ ンタ ー と 妻 を 殺さ れ だ アメ リカ 青年 
が , オー スト ラリ ア の 原野 で , ある い は , 
層 殺 場 で 対決 する , と いう の が ご この 映画 の 
ЖЕН; 

ご の 映画 の 監督 は アメ リカ の MTV の 
ビデ オ ・ ク リッ プ の 製作 で 名 を 挙げ だ を ラッツ 
セル ・ マ ルケ イイ です. 

視 訂 ロー リン シグ スドー ジス ご 自 ツ ウド | 
5,5. 4% амы 


スバ ルン デバ レー ビリー ペ ジ ああ Ж 
ルド トン ・ ジ ョ ン な どの ビデ オ ・ ク リツ ブ を 


手がけ , 様々 な 技法 を あみ だ し て きま し だ . 


その マル ケイ が , アメ リカ で の 映画 の 依 
頼 を 断 わ つ て , デビ ユー 作 と し て 選ん だ の 


ゴブ ゴール の な い レ ー ス が 始ま っ 


め , 次 々 と 前 を 走る 車 を 追い 越す の 


дё Tank Defender 
Ð PC-8000 シ リー ズ 


ルコ ラウ ツー カ ュ ジラ シル い 和 ルル ャ ーッ ラル 


ОО INDEX 


7% Car Race Game 


194 ЕСЕР, КАУ ЧИКО 
ШШЕ Ze ЛОТ, ¿K k IRL 
i 


Ф: САЗ ТОМИР | š 
連れ , この 状況 を 打破 すず べく, Ж 


と 連合 軍 に 立ち 向っ て 行っ た . 


ТУС рг ЛУ ШОУСУ, 

各所 に 故郷 オー スト ラリ ア の , すさ まじ 
い 自 然 を 背景 に 織り 込み , ビジ ユア ル と サ 
ウン ド を 合体 きせ だ 新しい タダ タイプ の 映画 を 
彼 は 生み だ し まし だ . 

「 マ ッ ド ・ マ ックス 」 以後 , 世界 の 映画 シ 
ー ン で 大 活躍 を 続け る オー スト ラリ ア 映 画 


界 か ら , まだ 新しい スー パー スタ ー が 誕生 
し だ と 言え ます . 
な お , ご の 映画 
映画 の 配給 で 全国 ロー ド シ ョ 
Е 


lk, 6 月 に 日 本 ハラ ルド 
一 公開 の 予定 
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Hi, PiO readers ! 


С, VIMEO, この "LOVE SP” Z 私 こ 


と JUN の サン フラ ン シ ス コ 訪 問 記 で す (SF は サン フラ ン シ ス 


ОСТ). 


3 月 29 日 か ら 4 月 3 日 まで の 一 週間 , 私 は 取材 で SF まで 行 
っ て きた の で す が , 何 を 隠 そう , 私 は , つい 最近 まで サン フラ 
ンジ シ スコ の 郊外 に 住ん で いた の で す . で すか ら , 今回 の 取材 は 
完全 に ルン ルン 気分 で 行っ て きま し た . 

この ルン ルン 気分 の 残り と , SF の 街 , つい で に 見 て きた 
(2) WCCF (West Coast Computer Faire) の 様子 を , みな 


さん に お 伝え し ます . 


SF と いう 街 は , どん な 街 だ と 思わ れ ま 
すか . 古く は , 坂 と 霧 の 街 と し て , 最近 で 
は , ゲイ と AIDS の 中 心地 と し て 有名 な 街 
Тт; 

ま だ, 観光 な どの 名 所 も , ゴー ルデン ・ 
ゲー ト ・ プ リッジ (金門 橋 ) を 筆頭 に 数 限 
りな く あ り ま す 。 これ ら の 名 所 は , ТУ, 映 
画 な ど を 通し て 世界 中 の 人 に 知ら れ て いま 
+. 

С, あ た だり 前 の 訪問 記 で は , そこ ら 辺 の 
ガイ ド ・ プ ブッ ク と 変わ ら な い の で 。 ここ は 


ひと つ ( 私 の 個人 的 趣味 で ), SF を 中 心 に し 
だ 映画 と 名 所 を 一 緒 に 挙げ , 映画 と 訪れ る 
GR ガイ ド を 補っ ら て みる こと に し まし た . 

まず は ,「 ダ ーー ティー・ ハ リー2」( も っ と 
ГГ Ал” Жык УФА 
公 は サン フラ ン シ ス コ 市 警 の 刑事 な の で , 
シリ ー ズ の 舞台 は すべ て SE で す が ) ТЭП 
人 だ ち が 市 長 を 人 質 に だ てこ もり ,「 エ レク 
トリ ッ ク ・ ド リー ム 」 で は 、 主人 公 と ガー 
ルフ レン ド が デー ト を し て いた 島 が 。 アル 
カト ラズ 鳥 で す 。 この 鳥 は , SF か ら 目 と 
鼻 の 先 の 所 に 浮か ん で いる に も か か わら ず , 
脱獄 不可 能 と いわ れ た 監獄 島 で , ア ル ・ ヵ カポ 
系 を 収監 きれ で いた さと で 有名 で す ,。 そう 
いえ ば ,「 ア ルカ トラ ズ か ら の 脱出 」 と いう 
映画 も あり まし だ ね. 

SF 市 内 で は ,「 サ ン フ ラン シス コ 物 語 」 


な ど に 出 て くる ケー ブル ・ カ ー は 有名 で す 
Dî, や は り , 忘れ られ な い の は , 今 は な き , 
ステ ィ ー プ ・ マ ッ ク イ ー ン が 主演 し だ 「 プ 
リッ ツ 」 の シー ン で す . SE 特有 の 坂道 を , 
バカ で か い ア メ 車 で , 駆け の ぼり , 駆け 降 
9, ИҰУРУТ5, あの カー・ チ ェ イ イス は , 
実に 印象 的 で し た だ . 

ォ ー プ ニン グ ・ シ ー ン で , SEF の ダウ 
ン ・ タ ウン 上 空 を ヘリ ュ プ ター が 和 飛ぶ, 
美しい シー ン が 印象 的 どっ だ の が ,。 フ パ ニッ 
ク 映 画 「 タ ワー リン グ ・ イ ン フ ェ ル ノ 」 
で す 。 あ の タワ ー・ ビ ルディ ング で 。 ステ 
ィ ー ブ ・ マ ッ ク イ ー ン が 。, 必死 の 思い で 部 
下 を る きえ て 助け る シー ン で 出 て きた 美 し 
い ガ ラス 張り の エレ ベー タ も , SF 市 内 に あ 
る ハイ アッ ト ・ リ ー ジ ェ ン シー・ ホ テル で 
撮影 きれ だ も の で す . 

いき る さか 古い 映画 に な り ま す が ,「 卒 業 」 
С, ダス ティ ・ ホ フ マ ン が , 古い スポ ー 
ツ ・ カ ー で 渡る 大 き な 橋 が , SF と 対岸 の オ 
ー ク ラン ド を 結ぶ が ベイ ・ プ リッ ジ で す 。 N 
イ ・ ブ リッ ジ は , 上 下 2 層 の 構造 に な っ て 
いて , 上 が SF に 入る 方 向 , 下 が SE を 出 
る 方 向 と 決ま っ て いる の で す が , この 映画 
の 中 で は , な ぜ か SF 市 内 に 向う 方 向 に 車 
で 進ん で , いつ の ま に か 主人 公 は , オー ク 
a E а tas) 4386 C U 5 bus 
5, 珍 現 象 が 起き て いま し だ た だ. 

最近 で は , エディ イ ・ マ ー フ イィ が 主演 し た だ 


「48 時 間 」 の 中 で , 彼 が ニセ ャ 刑事 に な っ て 
犯人 を 追撃 し た 所 が , 全米 で 最も 進ん で い 
る 公共 輸送 機関 し いわ れ , SE と その 郊外 
を 結ぶ 地下 鉄 BART の 駅 で びす. あと , こ 
の 映画 の クラ イマ ックス ・ シ ー ン は , 中 
国 ・ 香 港 を の ぞい て 世界 で 一 番 大 きい と 言 
われ る SEF の チャ イナ ・ タ ウン で し だ た だ. 
まだ まだ , 色々 な 映画 が 頭 の 中 に 浮か ん 
で きま す が 。 あ と は みな る ん に お まかせ し 
4%, 

Т%;: “ЕН, БАА ЕК ШУО Т чу 
に な る 街 で す . 


脱獄 不可 能 と 言わ れ た アル カト ラス 島 
も , 今 は 観光 の 名 所 


ゴー ルデン ・ ゲ ー ト ・ ブ リッ ジ と SF 


CELE > 
BRATE ы.) 
WITH COMPLE "EES; > 


会 場 入 り 口 . 第 10 回 と , 満点 (10) を 引っ か けた 
サイ ン が 書い て ある . 


WCCE は, 今年 で 10 年 目 を 迎え ん だ, 西 
海岸 の パン コン ・ ユ ー ザ ー の お ち お 祭り で す . 
今年 は 。10 周 年 を 記念 し て 、 3 月 30H か ら 
4 日 間 SEF の ダウ ン ・ タ ウン に ある モス コ 
ー ン ・ セ ンタ ー で 開催 され まし た に . 

同じ ショ ー で も , NCCPCOMDEX iz 
一 味 も 二 味 も 異なり, 本 当 の ユー ザー 同志 
が 集まっ て ,。 わい わい と 騒ぎ まく る の が , 
この WCCF の 正しい 姿 (?) な の で す 。. 

初日 に 。 オー プ ニ ン グ ・ セ レモ ニー が あ 
る と いう の で , 開場 前 か ら 6 駆け つけ て みれ 
ば "HERO-1 と いう, BAr y- 
を 少し 大 きく し た よう な ロボ ポ ボット が ТГ 
ナイ フン を つか み 。 コン ビュ ー タ 大 の ケー キ 
を カッ ト す る (たい う よ り 、 ナ イン を 入れ 
た だ け ) と いう も の で し た 、 HEED 
方 に 慣れ て , も っ と 大 げき る な 物 を 想像 し て 
いた だ 私 は , 正直 言っ て 折 子 抜け し まし た が , 
よく 考え て みれ ば 。 い か に も ユー ザー た ち 
の 手作り の お 祭り 。 と いう 感じ が し て , か 
えっ て 役 突 まし て 思え まし た 、 

会 場 に 入っ て みる と まず 目 に 入っ て 
る の が Apple と AT&T の ブー ス で す . Ж 
近 で は , この WCCF も 規模 が 大 きく な り , 
メー カー や 大 手 の ソ フト ハウ ス が 積極 的 に 
参加 する よう に な っ た と の こと で 、 他 に も 
IBM, NEC, EPSON, RCA な どの ブー 
スカ が , か な り の スペ ー ス を 占め て いま し た . 
だ た だ, 残念 だ っ だ の は ATARI が 参加 し て 


— 対岸 の バー クレ ー 側 か ら SF を 見 る 


バー クレ ー に ある シャ ザー 
ー ル デン ・ ゲ ー ト ・ ブ リッ ジ 


いな か っ だ の で 、 あ の ジャ ッ キ ント ッシュ 
が 見 られ な か っ た こと で て す 、 

し か L, 266 あ る ブー ス の 大 半 は , ユー ザ 
ー グ ルー と, 中 小 の ソフ ト ハ ウス で , 7 
ー ス と いっ て も , 机 を 4 つ ほ と 並べ て , Ж 
と を シー ツ で 仕切 り 。 マシ ン な ど は 一 切 置 
か ず に 自分 た ちの 活動 状況 を 報告 し だ b , 
自主 出版 の 雑誌 を 売っ て いた り と , まる で 
学園 付 の よう で し た 。 と し て 、 そ の ユー ザー 
グル ー プ の 中 て は . ГВ), + ¿> с 
IBM の PC シソ リー ズ の ユー ザー グル ー ズ が 
目立ち まし た . 

て すか ら 、 ソ ント ハウ ラス や パー ツン と ョ ッ 
プ な ども , 展示 で は な く , 自社 製品 な どの 
大 即売 会 で 。、 ま る て 私 葉 原 の ょ う て し た . 

会 場 に 米 て いじ る ユー ザー た ち も 。、 それ と 
知っ て いて (知ら な か っ だ の は , 私 で らい 
な も の で ), 掘 り 出 し 物 を 見 つけ て は , 買い 
まく っ て いま し た 。 ユー ザー ダグ バー ズン の 
中 に は , 自分 た ちの プー ス を 空 に し て , 
他 の プー ス で 買い 物 を し て いる ユー ザー も 
目 に つき まし た 、 

し か し , あん な に 生き 生き と し た ュー ザ 
ー た ちの 次 を 見 て いる し と, 日 本 で も こん 人 だ な 
イベ ント が あれ ば 、 ょ と つこ (づつ ( 上 見 う ВТ 


し た. 


これ が , オー プ ニ ン グ 
・ セ レモ ニー の すべ て 
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が あり ます. 


し か も 楽し い だ け で な く 。 
て きち ゃ う の で 


る あて 4; 


今回 紹介 する 中 に は , あの “ファミコン 


" の ROM カ ー ト リッ ジ 


人 気 が 高 い だ け あっ て 楽し い ゲ ー ム で すね . 遊ん で い 
る うち に 何もかも 忘れ て し まい ます 。, 

ポ ボタン の 組み 合わ せ で 複雑 な 動き も 
MEIKLE C f ff Bš. 
ЖОЛСА ДЭ, 他 の ソフ ト ・ ハ ウス の 皆さん も 見 習っ て ほし いと こ 


これ も 人 気 が 高 い 秘 密 の 1 つ 


194831 
ハイ ・ ス ピー ド な 
将棋 ゲ ー ム が 登場 / 


人 対人 。 人 対 コ ンピュータ の 対戦 が 楽し 
め る 将棋 ゲー ム で す . 


と の が っ ム の 戦い 方 に は 特徴 が あり ます . 


ます 。 の 周辺 の : TO PERCU 
いま す . そし て 攻め る 系 口 が 見 つか っ だ ら 
自分 の 有利 な 方 へ と ( 金 将 や 銀 将 を 失っ て 
ゎ も 気 に し な いよ う で す ) 持っ て いき , 勝て 
る と 感じ だ ら 6 一気 に 攻 め て きま す . 


юь MAD “а” の 交換 を し て きま し た . 
いう 戦法 も 採れ る ん で すね . 


PENJAMIN 


JPILI1 Ls 
コン スト ラフ クション ゲー ムツ 


この ゲー ム の 特徴 は , 何と いっ て も ゲー 
ム を し な が ら 画 面 作り が 楽し め る こと で し 
ょ う . 初め は 何 $ も ない (当然 大 本 的 な も の 
は あり ます が ) と ころ か ら 床 を 作っ た b, 
は し ご を か け だ り し な が ら ゲ ー ム が 進行 す 
る の で す . 

この 画面 作り も だ だ 単に “画面 が 作れ 
И Жер Да TA ЧЫДА Оуу о а C4 


タイ トル 画面 。 かわいい“PENJAMIN" 君 が こ の ゲー 
ム の 主人 公 で す . ` 


VING 
FM- 7 /NEW 7 /77 
カセ ッ ト ¥4,800/ ディ スク \5.800 
思考 型 
き の 攻 撃 は な か な か する まじ いも の で す . 
し か も コマ 落ち が 何 種 類 ぉ も ある の で , か 
な り の レベ ル の 人 で も 楽し め る で し ょ う 
将棋 に ちょ っ と 自信 の ある 方 は 一 度 挑戦 し 
て みて は いか > が 『? 
ぐ 問 い 合わ せ 先 ラビ ング ソフ ト 
Я>019-21 秋田 県 仙北 郡 西 仙 北町 刈 和 野 大 
道東 2-2 ® (0187) 75-2376 


早く も 大 駒 “Аа” を 取ら れ て し まっ た 私 …. 
いら れ そ う です. 


/=—С.Р. 
5МС-777 

¥ 5,000 
リア クシ ョ ン 


ディ スク (3.5 イ ンチ ) 


ルー ル が 決め られ て いる の で す (チェ ッ ク 
ポイ ント ・ ブ ロッ ク を 通過 し な いと 上 に 上 
が れ な い , 各階 に 付け られ る は し ご が 限ら 
UTC VY т TR ре さそ を саса 
E kala СА S OC しょ) う 。 

くく 問い 合わ せ 先 (株 ) ソ ニー・ ク リエ イ 
ティ ププ ロダ クッ 


どん どん 上 に 登っ て , 黄金 色 に 輝 や く “カギ " を 拾わ 
な けれ ば 


苦戦 を 強 


“жи” “ЕЖ” と 人 金 " に よる ぶ 厚 い 壁 . MD 
дссс» уот TEs 


x таты іі Б 


壁 を よう や くく 突破 で きた 飛車 . し か し その 前 に は 瑞 の 
し つよ うな 王手 の 連続 が . ノ 


そこ いら 中 を 歩き 回 つっ た あげ く 〈 く 見 つけ た “カギ "と エ 
スキ モー の 家 . GO. 


9102 東京 都 千代 田 区 紀尾井 町 3-6 
7%(03)237-5519 
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走れ /SK YLINE 


PC-8001/mkII /SR 


PC-8801/mkII /SR (N モ ー ド ) カ セッ ト ¥3,800 


PiO'84 年 10 月 号 に 登場 し だ "走れ / ス カ 
イラ イン "( 元 は PC-8000 シ リー ズ 用 ) が , 
装い も 新た に MZ-1500 用 に 移植 る きれ まし 
た . きめ の 細い グラ フィ ッ ク や PSG を 駆 
使 し だ た サウ ンド に より 実際 に 車 を 運転 し て 
(4 раи а зае И аА К 


Җә А pad ao Saku теа ыы 


美しい 曲線 に そっ て 街中 を 走る スカ イラ イン . 


QD ぎ \5,800 
リア クシ ョ ン 
いっ た 感じ で す . 

な お 。 パレ ビレット ま で 克 え られ る ユー ス ・ 
エディ イタ も 付い て いる の で , 心ゆく まで ド 
ライ ビン グ を お 楽し みく だ さい 。 

ぐ 問 い 合 わせ 先 > (株 ) コ ム パ ッ ク 
$151 東京 都 渋谷 区 代々 木 1-37-1 
ЖА о < “м5 Е 22 (03) 375-3401 


時 は 流れ , や が て 街 は し だ い に 暗 く な っ て いく . 


ぐる っ へ ペ 


アデ アクション ・ ゲ ー ム に 。 ラ パズル 的 要素 を ミ 
ッ ク ネ し ただ, 迷路 ゲー ム で す . 
“555 を 操っ て , 穴 に 落ち た “ばす 
た だ 君 " を 助け る の で す が , 回 転 ド アデ が くる 
くる 回 っ て , 迷路 が どん どん 変わ っ て し ま 
НГ, Торе ӨЗ Jë ЖЫН ТД >> 
х" と まっ だ く 同 じ 動 き を する の で , 2% 
小手 調べ の 第 1 面 . ま ず は “4297-Ж” を 助け だ し て 


MZ-2200/2000, X 1 /C/turbo 
カセ ッ ト  \3,800/ デ ィ ス ク Ұ5,800 
リア クシ ョ ン 
考え て 誘導 し な いと な か な か 迷路 か ら 脱 出 
азаға, СТТЕТЕЖФЕРБЕРІ 
Ж” を 捕え て いる “仕事 人 " たち に や られ 
+ SOT ЕЖЕСИ ҒЫ; 
ぐ 問 い 合わ せ 先 (株 ) マイ コン ハウ スエ 
スピ ー エ ス 
960 福島 県 福島 市 太平 寺 字 町 の 内 5-3 


な ん と 300 面 まで ある ./ で も この 面 は 割 と 簡単 そう ? 


HYDLIDE 


最近 流行 の , リア ル タ イ ム 型 ロー ルプ " レ 
А О. 

美しい 王国 "フェアリー ランド" の 平和 
を 保っ て い だ 3 つの 宝石 。 これ が 盗ま れれ だ 
お ぉ おかげ で 王国 は 減 び , 今や 美しい 王国 の お 
も か げ を 残す の み と な っ て し まっ た だ …. 

を そこ で あな た だ が 登場 し ます . 目的 は 王国 


さそ り の いる 砂 漠 を 通り 抜け て きた ジム 君 . 何やら 目 
の 前 に 入り 口 が …. 


PC-6001mkII/6601/SR, X1 /C/turbo 


カセ ッ ト Ұ4,800 
PC-6601/SR, 


FM- 7 /NEW 7 /77, X 1 /C/turbo 

ディ スク (3.5 イ ンチ , 5 イン チ ) Ұ6,800 

ロー ルプ レイ ング 

の 再建 ; ちょ っ と 目的 が 大 きい か も し れ ま 
せん が , 逆 に は りあ い が 出 る と いう も の . 
ファ ンタ ジッ ク な グラ フィ ックス , 木陰 に 
隠れ だ り , 水中 に 潜っ た り と リア ル な 動き 

ЗЕ, 見 どこ ろ い っ ぱい の ゲー ム で す . 


て 問い 合わ せ 先 み (株 ) テ ィ ー ア ンド イー 
ソフ ト 

魔法 使い に 背 を 向け る ジム 君 . し か し , 逃げ て ば か り 
いて は 先 へ は 進め ませ ん よ . 


piOI0 


コー ス ・ エ ディ タ で 作っ た 直線 コー ス . これ な ら 時 速 
250km 近 く 出 ます . 


トン ネル を 技 け る と …. そこ は 一 面 の 銀 世 界 な の て 5 
42: 


P T 


うー ん , この 面 は 難し い . “RA” た ち も 回 転 ド ア 
を 利用 し て や っ て くる ぞ / 


WAM 


ӨНӨР 


コン スト ラク ショ ン 機 能 を 使っ て , 回 転 ド ア だ ら け の 
迷路 を 使っ て み ま し た . 


2 (0245) 45-5777 


ЛЕ F U FF АВО DD D> ЗАО 2 # 8988-83 
{© 


悪魔 の 火 を 吹く ドラ ゴン の 近く まで きた ジム 君 と , 2 
な き と の 対決 シャ ン 。 


9465 愛知 県 名 古屋 市 名 東 区 豊 ヶ 丘 1810 
2 (052) 773-7770 
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pio10. 
イー・ ア ル ・ カ ン フー 


カン フー を 駆使 し て 敵 を 倒す , 典型 的 な 
アク ショ ン ・ ゲ ー ム で す 。 使え る 技 だ け 

も ハイ , ロー キッ ク グ , 飛び げ り など 7 FEX 
以上 と 豊富 で す が , キー の 組み 合わ せ で 操 
作 は と っ て も 簡単 な の で す . 

ТА と 敵対 する チャ ー ハ ンー 一 族 
に は , 棒術 使い の 王 , KR KOH? E 5 
人 いて , それ ぞ れ 得意 と する 武器 を 持っ て 


うま く 決 まっ た と び げ ば り . 李 の 最大 の 必殺 ワザ な の で 
Ж 


TOky0 ナ ン ル ストリート 


* 人 工 知能 型 シ ミュ レー ショ ン ・ ゲ ー ム ”" 
と 銘打っ て いる だ け あ っ て , 女の子 と の 会 
話 が と て も 楽し い ゲ ー ム で す 。 彼女 を 連続 
し て ほめ る と よく わか る の で す が 。 会 話 が 
進む に つれ 女の子 の モリ フ ゃ や 顔 の 表情 , Ù 
ӘСІ が どん だ ん 近代 て ( の FT И 
登場 する 女の子 は ミー ハー, プリ ッ 子 か 


2 人 に 声 を か けた の に この ザマ . も う , 場所 を 変え て 
みよ うか な あぁ. 


『 etl 

1 すっ サテ フ 

2 23 

12152 

100 ӘЖ 

337» 

сауа 6 
93.15 er nb 


20000) убт ¿Cp 


Y fro! し ゅ あ ご k.. 
фә? SAHE 19... Ba! #5992 ONI 
к'' 
NIS Хх 
Y frye! じゅ あ 20238... 


掛川 市 時 代 錯 誤 


三郷 市 KEEP 


ROM カ ー ト リッ ジ х4, 500 
リア クシ ョ ン 
李 に 向かっ て きま す . 
この ゲー ム で の 必殺 テク ニッ ク は , 何と 
いっ て も 敵 と の 間 合 に 気 を 付け る こと . D 
と は 的 確 に 攻撃 する こと . これ に 尽き ます 
ね 。 
ぐ 問 い 合 わせ 先 コナ ミ ( 株 ) 
9102 東京 都 千代 田 区 九段 南 2-3-14 
靖国 九段 南 ビ ん ル 4F 容 (03)262-9111 


めで た く 1 人 目 を 倒し た . 彼 の 豆 び 様 が 見 も の で す . 


カセ ッ ト ( 2 ЖЖ) Ұ4,800 
ディ スク Ұ6,400 
シミ ュ レ ーション 


ら 補 導 員 まで 55 タ イプ ブ 55 人 . (9%, ナン 
パパ に 失敗 し た 人 で も 女の子 の デー タ さ きえ ぇ 入 
カカ すれ ば 実際 の デー ト が 楽し め る と いう か 
ら う れ し い 限り で す . 

く 問 い 合わ せ 先 > (株 ) エ ニッ クス 
49160 東京 都 新 宿 区 西新 宿 7-1-8 

7%(03) 366-4345 


イマ イ と 思っ た サー フィ ン な ん だ けど な ぁ 。 彼女 は 興 
味 が な いみ た い . 


v 22899| ' 
FT 1300 720” 
ЕХ g00) 9š 
v St. برلل‎ ы 
ө САҒЫ. 214 ша, UM. 
0» サー フィ フ っ て お も し うし ル ど よね 
ú ЖОҒА ふっ ゥ ー ル ・ 
y 244%. 


東京 都 あ た に よし まさ 


3 人 目 の く さり 使い 、 ジャ ンプ し た り し て よ け な いと 
эже аэ 


の コトリ 
17442455” 


気 を 取り 直し て 次 
は 反応 が あり そう (?) 


TONAN жа Ti kesi L Жл 


の 女の子 に アタ ッ ク / で も , 今度 


172A 


з СОЈ. VOUT 
v OLD- Ка жа, 48... 
あ 0 を ァ … 9ー フ ィ フ っ て HUA ED 
の フー 
こん 


どの 女の子 に も ふら れ て し まっ た 人 は , デー ト ・ モ ー 
ド に 期待 し まし ょ ノノ 


トル % 


5 


fu... OU! 

9 dhi 7%5%0%75- ск? (CAF... UU! 

Y tbe を ょ う 510 (KS も っ で ぴっ け は 250009. NU 
いい AP だ っ ゆ … いい 

ç з/“а どん 9 wt し っ まほ ・ _ 


I META STRANGE THING 
IN NEW YORK CITY. 


онар вара біре 


寒河江 市 SHINYA 
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ЕСЕЛІ の PiO な ゲー ム 


dB-IBASIC( コ ン パ イラ ) 


あな た は , いき な り 上 司 に 呼び 出さ れ た . 


「 戦 いた まえ , 地球 の 未来 の た め に 」 

ГА ЭЛ?) 

га» IDE k, 君 し か いな い , ез 
が や ら ず し て 誰が や る ん だ 」 

「 な ん で そう な る ん で すか 部 長 / | 

「 適 当 な 人 材 は 君 し か いな い の だ よ 」 

「 い や で す よ お ぉ お 」 

「 何 を 言っ て いる ん だ , 君 が 1 人 で 戦え ば 


経費 が … あ っ ,。 いや いや 絶対 に 勝て る の だ . 
戦え ノノ 愛 と 勇気 と 地球 の 平和 の た め に 一 


無責任 な 上 司 で あっ た . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


dB-IBASIC( コ ン パ イラ ) 2 本 


キャ ラク タ , サウ ンド と も に Good. 
と くに バク ハツ の 様子 は な か な か ユ 
(O) 


жете етте ETF X1/X1C な ら 問 
題 な 〈 く 起動 で きま す が , X1D で の 作動 は 
保証 び できません. まだ た Xlturbo は IPL 内 部 
ルー チン が 違う だ め , PCG プ ログ ラム の 
デモ が 少し な か し く な り ま す が 。 ゲー ム 自 
体 は 問題 な 〈 く 動き ます . 

コン バ パイル は , まず dB-IBASIC イ ンタ 
ー プ リタ を 起動 し , 

бі [RETURN |63| RETURN |: L с, x 
字 列 長 を 63 に 指定 し て くだ きい (以後 , dB 
-IBASIC/COMPILER 起動 時 に は 必ず イ 
ンタ ダー ジリ タタ から 6 実行 し て くだ る い )。 

Кїї, PCG 定 義 ゲ ログ ラム (リス ト 1) 
と メイ ン ・ プ ログ ラム (リス ト 2) を それ ぞ 
ҺАЛ, テー プ に セー プ し て くだ きい 。 

そし て 次 に コン パイ ラ を 起動 し ($L 63 
を 忘れ ず に /), 

TAPE LOAD ? (Y or N) Y 
と し て , まず PCGC 定 義 ゲ ログ ラム を ロー 


АА іі. qa кәде Ж-Е Ж 
TEXT START =4ООО 
TEXT END =9101 


1 シリ ー ズ +G- -RAM 


ょ と な る ほ は ず で す :- 次 に 
ОВ.) ADR. (> =4ОООН) ? 4000 
PORT SAVE (Y or N)Y 
WORK ADR. ( < EOOOH) ? DOOO 
LINE TABLE—N 
k U UD же ЛЛ, すず を も 
ОВ.) END ADR. =8EC4 
VAR END ADR. =90B2 
と な る は ず な の て , 
PORT LOAD (Y or N)Y 
と 答え て くだ ぜ き るい 。 そし て 0O1E1H か ら の 
2 バイ ト を 0OH, 40H に 書き 変え て, 
0000Hー90B2H ま で を 好き な ファ イル 名 で 
モー ブ し て くだ さい (J-ADR. 120000Н). 
セー ブ が 終わ っ だ ら 再 び コ ン パ イラ を 起 
動 し , 今度 は メイ ン ・ プ ログ ラム を 同じ 手 
順 で コン パオ イル も ます テー ゲ か らら ロー キ 


する と 。, 

TEXT START =4000 
TEXT END =AA10 
と な る の で , 


ОВ.) ADR.( > = ニ 4OOOH) ? 4000 
PORT SAVE (Y or N)Y 

WORK ADR. ( <EOOOH) ? ОООО 
LINE TABLE ~N 


26 ИС в о ТАЛҒАН T аҚ; 
OBJ ЕМО ADR. =В1АА ` 
УАВ ЕМО ADR. =052А 
と な る は ず で す ( あ まり これ に こだわ ら な 
い 方 が 良い か も し れ ま せん ). を そして, 
PORT LOAD (Y or И 
と し た 後 , まだ 前 と 同じ よう に 0O1E1H か 
ら の 2 バイ ト を , 00H, 40H に 書き 変え て , 


0000H-ーD52AH ま で を 好き な ファ イル 名 
を 付け て 先 の PCG 定 義 ゲ ログ ラム の オォ デブ 
ジェ クト の すぐ 後に モー ブ し て くだ る いけ 
-ADR. は 0000H) . 


英 ロ ボッ ト の 3 段 攻撃 は 強力 だ ! 


HIGH WAY 
ж” ARMY 1 


g7 アー ミー 


WIS. MORIYAMA 


qut る の テー ジグ は , 
スィ ャ ーー トド で まあ: ます: 


ІР» Ье» 


EB t ИНАН ге テッ 5209, ре 
ー ム で す .。 テン ・ キ ー の [23][4][a] 
[7|(8][9]с` 8 方 向 に 戦闘 機 を 操り , [Z| で 
ビー ム 砲 。[X| で 爆弾 投下 , | SPACE で t 
ー ム と 爆弾 の 同時 発射 と いう , と て も と て 
も メジ ャ ー か つ 月 並 な キー 操作 で す . それ 
か ら ジ ョ イス ティ ッ ク 1lor2 に も 対応 し て お 
9, さら は に 今 流行 の 2 トリ が ガ ・ ジ ョ イス テ 
ィ ッ ク に も 対応 し て いま す (2 ト リガ ・ モ 
ー ド で 遊び た いと き は , トリ ガ 2 で ゲー ム 
を スタ ー ト きる せ て くだ る さい). 

ゲー ム ・ ス ター ト は , タイ トル 画面 か 赤 
字 で ハイ ・ ス コア を 画面 に 表示 し て いる と 
き に , トリ ガ カ | SPACE キー を 押し ます . 
また この と き に , [CTRL TBg| キ ー を 押 
す と BOOT, [Cc| キ ー を 押す と モー ド と ス 
ター トレ ベル の 選択 に な り ま す . 

レベ ル は 0( 最 強 ) か ら 9( 最 弱 ) で , その 
間 じ わ じ わ と た 10 段階 変化 し ます . まだ モー 
ド に は , フー マル ・ モ ー ド と スー パー・ モ 
ー ド が あり ます が 。 +з 
っ て も 大 し だ た こと は な く 。 単に すべ で て の 敵 
キャ ラク タ ( 一 部 の 物 と 隠し キャ ラク タ を 
除く ) が , まっ た く 同 じ 確 率 で 出る よう に 
な っ て いる だ なぜ け は ぐす ( も が し も し 。. УУ =a st 
り は 強い ). 

さら に 隠し キャ ラク タダ も いく つか 入れ て 
あり ます (プロ グラ ム を 解析 され だ た だら バレ 
る だ ろ ー な ア )。 1 つ だ ぜ だけ 書く C; 
ある 隠し キャ ラク タ を 射 つ こと に よっ て の 
み 1 機 増え を ます が (一 定 以上 は 増え な い )。, 
これ は 決ま っ だ 回 数 だ け 連 続 し て ある こと 
を し な いと 出現 し ます . 

な お , 自 機 は ビル の 向こう 側 を 通る の で 
ビル に 接触 し て も 死に ませ ん が , ビル の 向 
こう 側 に 敵 が い だ り する と 当然 死に ます 
(な ぜ ビ ル の 向こう 側 を 通る の に , ビル を 
爆破 で びき る の か と か , ババ リア に 引っ か か っ 
て 死ね の か な ど と は 聞か な いこ と ). 


ス 一 パー・ 
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自 機 は 
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マシ ン 語 は ロー ダ * 部 分 に 少し 使っ て いま 
TD, これ は は ほとんど 問題 外 で す . オー ル 
BASIC( コ ン ッ イラ ) と 見 て 良い で し ょ う . 


„^^, ^ч”... СС Чн veman 


84 年 12 月 号 の ROBOTS TOWER に お い 
T, 画面 デー タ が 間違っ て 掲載 され まし だ . 


10 ‘HHHH HH 4 KF ¥ 4 4 HFK 


20 'w+ +* 
зр '*+HIGH WAY ARMY+* 
40 ‘+ ++ 
50 ж БҮ +* 


60 '*+ S.MORIYAMA ++ 

70 '*+ 1984/10/29 ++ 

80 “ж $L: 63 +* 

90 жЕ HHH 

100 ' CMT STOP 

110 ТІМЕ-0 

120 OUT &H19 の の 。 HE: WAIT 50:00Т %Н1900,1 
150 IF ТІМЕ“<4 THEN GOTO 120 

140 ' DEMO 

150 WIDTH4Q:CGEN Q@:KRUF ON:FRW:FALET:SCR 
EEN 1,1,1sCLS 4 

160 CLR:DIM Х (2) ,Ү(2) АФ (2) : ТЕМҒО 1500:Ғ 
LRY "LO" : GS=1 

170 б6К1=%&НВ@@@:6К2=%&НС@@@: GR さ = ニ SH4 の の の 

180 A$ (QO) <"НІОН WAY АКМҮ":Х(@)=1%:Ү(@)=1 
2 

190 А%(1)-"Бу S.Moriyama":X(1)=1%:Y(1)=1 
4 

200 A$(2)="Now FCG Setting":X(2)=12:Y (2) 
=16 

210 GX=4:GY=8:G%="Don t touch CMT and pl 
ease wait. ": GOSUE"GR РАТ" 

220 GX=8: GY=9:G$="CMT Э ソノ ママ ニシ テ オマ チ 725" 
71": GOSUR"GR РАТ" 

250 FOR 1-0 TO 2:JØ=LEN(A$(J)) 

240 COLOR 7,0,0,1 

250 FOR I=&H87 ТО &HB STEF -i 

260 LOCATE X(J),Y(J):PRINTSTRING$ (JO, CHR 
$(1)):PLAY"O"+STRS (I—%H7F)+"V1@0CDE " 

270 WAIT S:NEXT: COLOR 7,0,0,0 

280 LOCATE X(J),Y(J):FRINTSTRING$ (JO, CHR 
$ (%H87)) 


290 GX=X(J) : BY=Y (J) :G$=A$ (J) : GOSUE"GR РА 


т" 

500 РОК I=%H87 ТО &HB STEF -1 

510 LOCATE X(J),Y(J):PRINTSTRING$ (JO, CHR 
$(1)):FPLAY'"O"+STRS$ (1-$%&H7E) +"V1 の EDC" 

320 WAIT 5:МЕХТ:СІ 6: МЕХТ 

550 FOR Ігсй ТО 127 

340 LOCATE (I MOD 32)+4,I/Z2:FRINT#Ø,CHR 
%(1); 

TSO NEXT 

560 FOR I=128 TO 255 

570 LOCATE (І MOD 52) +4,1/52+16:РКІМТ СН 
R$(I); 

580 NEXT:FRINTCHR$ (%H16) : ЕКИ 254 

590 GOUSUE "FCG" 

400 ' EEY FUNCTION 

410 CLS 4:GX=12:GY=Z;:G$="#* key function 

#*": GOSUB"GR РАТ" 

420 CGEN Ø:LOCATE 19,18:FRINT STRING$ (20 
‚ СНК% (НЕЯ) ) 

450 CGEN 1:LOCATE 25,15:РКІМТ%йЙ,НЕХСНКФ( 
"101100") 

440 FOR I=@ TO 1:10САТЕ 25,16+1:РК1МТ#@, 
НЕХСНК%("10110000"):МЕХТ 

450 LOCATE 25,18: РКІМТ#0 ,НЕХСНКФ ("000000 
да”; 

460 CGEN Q:COLOR 5: ВОХ (1,5) ~ (17,19) ,СНКФ 
(&H91) 

470 LOCATE 1,5:FRINTCHR$(&H9E); STR TNG ま て (1 
5,СНК% (%H90) ) ; CHR ま (HE ) 

480 LOCATE 1,19:FRINTCHRS$ (%H9C) 』 STR TNG 
15,СНК%(%Н90)) 』 CHR$ (&H9D) : COLOR 1 

490 LOCATE 2,10:FRINT" — " 


500 LOCATE 2,11:РКІМТ" 1 | г ":LOCATE 10 
Ә:РКІМТ "тт" ) 

510 LOCATE 2,12:PRINT" — | 1%: ОСАТЕ 10 
gg LOS PRENTICE 


520 LOCATE 2,13:PRINT" 
まま に RM ege" 

550 LOCATE 2,1З:іРКІМТ" г-----":і ОСАТЕ 10 
ЖЕРИДИ 43-07% 

540 LOCATE 2,16:РКІМТ” | 
; 134 PREINTS my 

550 LOCATE 2,17:іРКІМТ" ------";( ОСАТЕ 10 


“-“ы ОСАТЕ 10 


I"sLOCATE 10 


SOO. 
42 %9% 


次 の 方 法 で 直し て くだ さる い . 

デー タダ タ の っ だ テー プ を も セット し 。 Hü- 
BASIC の モニ タ か らら でも, L DOOO L L 
て 読み 込ま せ , D000-ーFBAA 間 を セー ププ 
шт лёс, JPL ス ター ト の テー ジグ を 作 
る と き に ,。 この テー ジグ を 使う と まとも に 動 
く は ず で す ( な ぜ , 今 ま で 載ら な か っ だ の 
だ ろう ). 何 に せよ ょ , プロ グラ ム 再 投稿 な 
ど と いう や や こし いこ と を し た 私 め が 悪 い 
ん で す . すみ ませ ん . 


„Зк. 


‚14: РКІМТ" І 1 | I" 
560 LOCATE 10,15: РКІМТ" =- "1 ОСАТЕ 1 
8,7: РКІМТ" г": LOCATE 18,8: РКІМТ" I" 
570 LOCATE 18,9: РКІМТ" 6: CGEN 1:COLOR 7 
580 GR2=LtH4000: GR さ =%&HC の の の 
590 GX=3:6Y=11: 6=" 7": GOSUB"GR РАТ" 
500 GX=7:GY=12:G%="X":GOSUR"GR FAT" 
610 LOCATE 21,15:РК1МТНЕХСНЕ% ("4041 2D1F 1 
р1010505142") 
620 GR1=%*HCQ@Q0: GR2=&HB の の の GRI=%H4000 
650 GX=4: GY=14: G$=" or": GOSUE"GR РАТ" 
640 бкігенв000: бЕ2=%&Н4@@@:6К5=%&нС@@@ 
b50 GX=3:GY=16:6G$=" SPACE": GOSUE "GR РАТ" 
560 LOCATE 20, 16: РКІМТНЕХСНКФ ("20671Е101 
D7677") 
670 GR1=%*HCQ0QQ: GR2=%H40Q00: GRI=&HB000 
680 бХ-11:06Ү-10:0%-%7 8 9":GOSUR "GR РАТ 
590 GY=12:G%$="4 6":6050В "GR РАТ" 
702 GY=14:G%="1 2 3":GOSUB"GR РАТ" 
710 LOCATE 32,15:PRINTHEXCHR$ ("808180818 
@811F1D1D1D1D1D1D1D6A9@91909190916EB") 
720 LOCATE Z1,17:PRINTHEXCHR$ ("7A6C6D6C6 
D&C&D7E") 
720 GRZ=&HBAAA: GR さ =%H4 の の の 
740 GX=18:GY=6:G%="or":GOSUBR "GR РАТ" 
750 GR1=&H4000: GR2=&H80Ø0: GR さ = を HC の の の 
700 GX=19:GY=7:G$%$="JOY-STICE":GOSUB"GR Р 
AT" 
770 GY=9:;:G$="W-TRIGGER-JQY-STICK":;GOSUER" 
GR FAT" 
780 LOCATE 32,15:PRINTHEXCHR$ ("2@2@1Е1р1 
р2020") 
790 LOCATE 51,14: РКІМТНЕХСНКФ ("B28Z1F1D1 
D9293"):WAIT 100 
B LOCATE 29,12: РКІМТНЕХСНКФ ("B6871F1D1 
09697") :МАІТ 200 
810 LOCATE 27,12: РКІМТНЕХСНКФ ("88891F1D1 
09899") s WAIT 250 
820 LOCATE 25,11: РКІМТНЕХСНКФ ("ВАВВІҒ 1р1 
D9A9B");:WAIT 275 
850 LOCATE 25,10: РКІМТНЕХСНКФ ("BC8D1F1D1 
D9C9D"):WAIT 287 
840 GR1=&HB の の の: 6К2=&НС@@@: GR さ =&H4 の の の 
850 GX=9:GY=21: 6$="Loading HIGH WAY ARM 
Y"sGOSUB"GR РАТ" 
B6 の ' LOAD MAIN FROG. 
870 МЕМ %HDOQO , НЕЗ, HOL1 , НОО, H1 D , НЕР, 
&H79 , HF B , НСЗ, &H52 , HOO 
CALL &HD の の の 
END 
*"GR РАТ" 
GAD=GY*40+ (GX+1Ø24#6GS) : GAD1=GAD 
FOR G=1 ТО (ЕМ(09» 
50%-М10%(5%,65,1):0650%-і ЕҒТ%(СОӨРАТ% (AS 
Сс(60%)) ,8) 
940 FOR 50-і TO В 
950 61%-М10%(50%,00,1) 
960 біс-(255 AND (ASC(G1$) ОК ((ASC(G1$)/ 
2) XOR (ASC(G1$)*2)))) 
972 OUT GR1+GAD1,G1 
980 IF 6@>1 AND 6047 THEN OUT GR2+GAD1,6G 
1 


990 IF 60-4 THEN OUT GR3+GAD1 ,G1 
1000 GAD1=GAD1 +2048 


1010 NEXT 

1020 GAD=GAD+ 1: GAD1=GAD 

1050 NEXT 

1040 RETURN 

1050 #"PC6" ; 

1060 ПЕЕСННФ( (0) =HEXCHR$ ("SSAASSAASSAAS 
SAA の の の の の の の の の の の の の の の の FFFFFFFFFFFFFFFF”) 
1070 DEFCHR ま ( 1) =HEXCHR ま ("459B19EC7FFE さ 
DAA 1810763060783000 Е781818181818ІҒЕ") 
1080 DEFCHR 和 まま ( 。 )=HEXCHR 和 ("の の の の の の の の の の の の の 
507 の の の の の の の の の の の 9 の の ミロ 6 の の の 9 の 9 の の の の の の の の さ の 6" ) 
1090 DEFCHR ま ( 3) =HEXCHR ま ("の の の の の の の の 2 の の の の 
@EQ の の の の の の の の の の の の Cg6 の の の の の の の の の の の の の C の 6 の ) 
1100 DEFCHR ま も ( 4)-НЕХСНК%("0Е0Е4Ғ4Е27251 
の 3 の の DD4E6F ミ 72E16 さ の の COC4F6E さ 72D 1 の" ) 
1110 DEFCHR ま ( 5) -НЕХСНК%("7070Ғ2>р2Е4С4О 


前 回 に 負け ず 劣 ら ず の パワ ー プ ログ ラム 
Т, АЛИЦАҒСЕШУЕЭТ ТЕЛ 
は 入力 し て 遊ん で みて くだ るい じゃ ワ ー ジ 
ログ ラム の 意味 が わか ら な い 人 は , 
PiO'84 年 8 月 号 を 見 よう /). 

書き 忘れ て いま し だ が 。 この ゲー ム で は 
ゲー ム ・ オ ー バ パー 画面 で 10 秒 で らい 待た な き 
れ ま す 。 早く 〈 再 ゲー ム を し だ い 方 は 、 を こ 
て | RETURN キー を 押す か . ジョ イス ティ 
ッ ク を 時 計 方 向 に 回 し て くだ さい 。 すぐ に 
デモ 画面 に 戻り ます . 

めちゃ くち ゃ な 文章 で 失礼 し まし た . 


вас nAOR の 62R6 の C7468 の じ 7 の 7 の F2D6ECD4 の 8 の C" ) 
1120 DEFCHR ま ( 6)-НЕХСНКФ("0018183С7Е?7ЕҒ 
FC の の 1 の 34 さ の 6 の 7BF さ DE の の の の 9 の の の の の の の BC の 9" ) 
1150 DEFCHR 和 ま ( 7) =НЕХСНКФ ("18185С7Е7ЕЗСр 
RC は 1034306078309400 の の の の の 9 の の の の の の 9 の" ) 
1140 DEFCHR 生 ( 8)-НЕХСНК%("0000010735ҒҒҒО 
500 の 9 の 991973EFB の の の の の の の の の の の の の の の の の の の の " ) 
1150 ПЕҒСНКФ( 9)=HEXCHR ま ("の の 1BEDEDEDFF9 
918 の の 1BE1QAgEBF の 1 の 1 の の 918B3CB181C さ の の の の " ) 
1160 DEFCHR 和 ま ( 10) =HEXCHR ま ("の の の BE の FCFFC 
の の の の の の の 8 の 8 の COE の の の の の の の の の の の の の の の の の の の の の ⑦" ) 
1170 DEFCHR ま ( 11) -<НЕХСНК%("005С187ЕҒҒӨ10 
の の の の の さ の 1 の 7BE の 98 の の の の の の さじ の の の の の の の の の の の 9 の" ) 
1180 DEFCHR$( 12)=HEXCHR$ ( "の 3 の の の の の の の の の の 
200 002:С107вЕ0980000 993C1B7EFFB1 の の の の " ) 
1190 DEFCHR ま ( 13) -НЕХСНКФ6("00501078Е0980 
000 の 9 の 3C1B7EFFB1 の の の の の の さじ の の の の の の の の の の の の " ) 
1200 DEFCHR ま ( 14) -НЕХСНК%("000000187ЕҒЕҒ3 
Cg の 2 の の の の の 1 の 97BE の 2 の の の 00000000 18 の の の の の の " ) 
1210 DEFCHR$( 15) =HEXCHR 和 まま ("の の の の の の 1866FF さ 
CO の の の の の の 91 の 7BE の 2 の の の の の の の の の の の の の の の の の の の " ) 
1220 DEFCHR ま ( 16) -“НЕХСНК%("ЭЭЗЕЕ?ҒҒЕ?ҒҒЕ? 
FAA 000102050В172Е00 FFB1B2BSBE97AEFF") 
1250 DEFCHR ま ( 17)=HEXCHR$( "SSFEFFFEFFFEF 
FAA 0072Е4С890204000 FF7SESC9912141FF"') 
1240 DEFCHR も ( 18)=HEXCHR$ ("0018180018181 
800 1050607050105050 1824667Е4200422С") 
1250 DEFCHR$( 19) =НЕХСНКФ ("0000181800181 
800 0010506070505050 0018254667Е42422С") 
1260 ПЕҒСНК%( 20) =НЕХСНКФ ("0018180016180 
の の の 1030607058583000 1874667Е5АЗ5АЗС@@")› 
1270 ОЕҒСНКФ ( 21) =НЕХСНКФ ("0018180000000 
000 1050607058583000 1854667Е424232С00") 
1280 DEFCHR 和 ま ( 22) =НЕХСНКФ ("0066661618666 
6 の の 0044001 000440000 の の の 6666 の の の の 6666 の の " ) 
1290 DEFCHR$( 23)=HEXCHR$ ('' 120020009202021 
の の の 18180@0Q0DBDB001818 181800С25С5001818") 
1500 _ DEFCHR ま も ( 24) -НЕХСНКФ("00000000071іғ0 
の の の の の の の の の の の の 71F の OO の の の の 9 の 9 の 9 の の 9 の の の の の の の の " ) 
1210 ПЕҒСНК%( 25) =HEXCHR ま ("の の の の 2 さ CFFFFFF さ 
C18 の の 183OFOFBFB2O1 の の の の の の の の の の の の の の の の の " ) 
15220 ОЕҒСНКФ ( 26) =HEXCHR* ま ("の の の の の の の の E の FB の 
の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の 9 の" ) 
1330 ПЕҒСНК%( 27)=HEXCHR$ ("0000001010000 
000 1050701818703010 185С7Е18187Е2С18") 
1540 DEFCHR$ ( 28) =HEXCHR も ("の の の の の の の の の の の の の 
000 の の 2466FF の の の の の の の の の の 2466FFFF6624 の の ") 
1550 DEFCHR$( 29) =НЕХСНКФ ("1818200600201 
010 181824DEDR241818 1010000000000000") 
1560 ПЕҒСНКФ( ZQ@)=HEXCHR$ ("@@182C7E7E7E1 
818 0018506078701010 00185Сс4242420000") 
1570 ОЕЕСНК%‹ 31) -НЕХСНК%("00005С7Е7Е7Е1 
818 0018306078701010 00002Сс4242420000") 
1580 ПЕЕСНК%( 22) -НнЕХСНК6("0000000000000 
の の の の の の の の の の の の の の の の の の の の の の 9 の の 9 の の の の の の の の の の の " ) 
1590 DEFCHR ま ( ささ ) =HEXCHR ま ("SC7EFFFFFFFF7 
ESC の 9 の 9183CSC18B の の の の 005С7Е7Е?7Е?7Е2С00") 
1400 ПЕЕСНК%( 54) =HEXCHR ま ("1 の 1 の 1 の 1FFBOB の 
вав の の の の の の 1818 の の の の の の 0000101с2:в0в0000") 
1410 DEFCHR ま ( 25) =HEXCHR$ ま ("の の の の の 8B さ 日 1C1 の の 
の の の の の の の の の の の の の の の の の の の の の の 9 の の の 1818 の の の の の の " ) 
1420 DEFCHR ま ( 56) = ニ HEXCHR 生 ("の の の の の の の の 6 の の の の 
000 12161Е1Сс7Сс1Е0908 の の 9 の の の の の 69 の の の の の の " ) 
1450 DEFCHR ま ( 57) =HEXCHR ま ("の の の の の の の 6 の の の 
の の の の の の 2 の 4 の F 7E の F の 1 の の の の の の の の の の 6 の の の の の の の " ) 
1440 DEFCHR ま $( 58) =HEXCHR ま ("の の の の の の の の の 6 の の の 
000 1 の FXBFB7EEB ミ の 6 の の の の 9 の 9 の の の の の 6 の の の の の の " ) 
1450 DEFCHR ま ( 29) = ニ HEXCHR 和 ("の の の の の の の の の 6 の の の 
ода の 9 の の 8 の SMFE さ BB6 の B の の の の の の 9 の の の の 6 の の の の の の " ) 
1460 ПЕЕСНК%( 40) =HEXCHR ま も ("FF7CFCFEFFFFF 
FFF の 1 の の の の の の の の の の MFF 168BFC1 の 1 の 1 の の の FF " ) 
1470 DEFCHR ま ( 41) «“НЕХСНК%("ҒЕРЕҒООПООВОСОЕ 
の FOB の FE の の の の の の の の の の F の BFF の の の の の の 9 の の の F@" ) 
1480 DEFCHR 和 ま ( 42)= ニ HEXCHR ま ("の の の の の の の の の の の の F 
B7F の の の の の の の の の の の の じ の 7B の の の の の の の の の の の の C の 78" ) 
1490 DEFCHR ま ( 4 さ )= ニ HEXCHR ま ("の の の の の の の の の の の の の 
осо の の の の の の の の の の の の の の の の の の の の の の 9 の の の の の の の の の の " ) 
1500 DEFCHR ま ( 44) =НЕХСНКФ ("ОО ООООО ОҒВ7 
Е?Ғ の の の の の の の の の の CZB ウ の F QQQ0Q0QQQ0Q00C0783F " ) 
1510 DEFCHR ま ( 45) =HEXCHR 和 ("の の の の の の の の の の の の 
AFS の の の の の の の の の の の の の の の の の の 9 の の の の の の の の の の の の の " ) 


ば ん ぶ ぷ き ん ば ぱい さん. お 答え いた し ま ー す . 手 っ 取り 早い 方 法 は 、 まず 頭 を 金色 に 染め ます (モヒカン な ら モ アベ ター よ ). それ か ら 部 屋 に 
ビ ピンク の スプ レー で グレ だ と か 極悪 。、 モ プン 万 歳 ほ と か 書き ます . 外出 する と き は 黒 の 皮 で で きた 服 を 着 て 体 に チェ ー ン を 巻き 外 を 歩き 回 り ま 
7. そう する と 親 は 「 ば ん ぷ き ん ば い 。 私 達 が 悪かっ た 」 と 言っ て コン ピュ ー タ を 許し て くれ る で し ょ う . 
Р.5.2 シャ レ で す , 間違っ て も 実行 し な いで くだ さい .。 まあ , 自分 が 変わ ら な いと いう の が いい ん じゃ な いん で すか ? PS3 クイ ズ . ヒュ 


P.S. 参考 資料 積木 くず し . 


リス ト 1 HIGH WAY ARMY1 PCG 定 義 プ ログ ラム ソー ス ・ リ スト 


1520 DEFCHR ま も ( 46) =НЕХСНКФ ("0000000000010 
пов の の の の の の の の の の の の の の の の の の の の の の の 9 の 9199 の の " ) 
1520 DEFCHR ま ( 47) =HEXCHR ま ("の の の の の の の の の の F 昌 7 
FFF @ の 9 の の の の 9 の の CO7BOF の の 9999 の の の 9 の 9C の 7B1F") 
1540 DEFCHR ま ( 48) =HEXCHR ま ("の の の 18 さじ SC18g 
の の の の の の の 18 さ B さ の の の の の の の の の の の 1 の の の の の の の の の " ) 
1550 DEFCHR ま ( 49) =HEXCHR 和 も ("の の 42183C3C1B4 
200 0042185С3С1в84200 0042183С5С184200") 
1560 DEFCHR ま ( 50) =HEXCHR$ ("1818181818181 
818 1818181818181818 1818181818181818") 
1570 DEFCHR$ ( 51)-НЕХСННКФ%("0в0в0в080в0в0 
вов の の の の の の の の の の の の 9 の の の の овововововововов" ) 
1580 DEFCHR$( 52) =HEXCHR ま ("1 の 1 の 1 の 1 の 1 の 1 の 1 
の 1 の の の の の の の の の の の の の の の の の 1010101010101010") 
1590 DEFCHR ま ( 53) =НЕХСНК® ("0010000800100 
пов の の の の の の の の の の の の の の の の 00: 2000800100008") 
1600 DEFCHR ま ( 54)=HEXCHR$ ("0000001818000 
000 CZ7EFFFFFFFF7E さ C の BBBFB1F191 の 1 の ") 
16410 DEFCHR$( 55) =HEXCHR ま も ("SC7EFFFFFFFF ア 
ESC 22 の の の 1818 の の の の の の の B の BBFB1F11 の 1 の ") 
1620 DEFCHR ま ( 56) =HEXCHR 生 ("の の の の の の の の の の 2 の の の 
000 00182С7Е7ЕЗС1800 の の の の 18B3CSC18B の の 0 の 9" ) 
1620 DEFCHR ま ( 57) =НЕХСНКФ ("00182С7Е7Е5С1 
воп の 9 の の の の 99 の 9 の の 0 の の の 99 @@@@18%С®С18@@@@") 
1640 DEFCHR ま ( 5 日 ) =HEXCHR ま ("7FFF7CFCFEFFF 
FFF の F の 1 の の の の の の の の の の 9 の の 3FS16BFC1 の 1 の 1 の の の 9" ) 
1650 DEFCHR ま ( 59) =HEXCHR ま ("FBFFFE の の の の B の C 
@Е@ の の 8 の FE の の の 2 の の の の 9 の の の の 8B1FE の の の の の の の の の 9 の" ) 
1660 DEFCHR ま ( 60) =HEXCHR 和 ま ("FF7CFCFEFFFFF 
FFF の 1 の の の の の の の の の の の 9 の の 2168BFC1 の 1 の 1 の の の FF" ) 
1670 DEFCHR ま ( 61)-НЕХСНК%("ҒЕРҒООПООВОСОЕ 
@ЕВ BOFE み MO の OO の の の の の の の B の FF の の 2O の の の の の の EB" ) 
1680 DEFCHR 和 ま ( 62)=HEXCHR ( "O31F 3F の の の の の の 
оға の の の の の の の の の の の の の の の の の の の の の 1 の の の の の の の の の の " ) 
1590 DEFCHR ま ( 62) =НЕХСНКФ ('"F DF BF OF OF AF 7? 
оза 0100000000000000 СЭЕВҒО: 00200000" ) 
1700 ОЕЕСНК®‹ 64)=HEXCHR$ ("OA2A30181 COFO 
ғо の の の の の の の の の の の の の の の の 0020000000 1 000 1 "" ) 
1710 DEFCHR を ( 65) =HEXCHR ま ("の の の の の の の の の FB7 
FFF の の の の の の の の の の C じ の 78 の F の の の の の の の の の の じ の 7BCF" ) 
1720 DEFCHR 和 ま ( 66) =HEXCHR 和 ("FEFF の の の の の の の 
の の の B の FE の の の の の の の の の の の の BFF の の の の の の の の の の の の "' ) 
1720 DEFCHR ま ( 67) =HEXCHR ま ("の の 2 の 7 ささ B さ じ さ F ア 
F7F 0000402020507078 0000402020317079") 
1740 DEFCHR$( 68) -НЕХСНК%("0С51075Ғ7Ғ<ҒӘ 
FØ3 0С510752Ғ7ЕЗҒӘЕОЗ 0С51075Ғ7ҒЗЕ5ҒОЗ") 
1750 DEFCHR ま ( 69) =HEXCHR ま ("の の 2 の OFFBFCFFF 
ЕЕЕ の の の の COE の E の F の OF の FB の の の 9 の COE の E の F1F の F9" ) 
1760 DEFCHR ま ( 70) =HEXCHR ま ("の の の 1 の さ の 7 の F5F 7 
F7F の の の の の 1 の の ES76F5F の の の 1 の 3 の 7 の FSF7F7F" ) 
1770 DEFCHR ま ( 71) -НЕХСНКФ(" 40 СОСОЕОЕОЕВЕ 
CFE 4 の CO4 の E の EEBFCFE 4 の COCOE の EEBFCFE" ) 
1780 DEFCHR ま ( 72) =НЕХСНКФ ("000507 іҒЗҒЕҒ7 
FFF の の の さ の 71F ミ FC7 の さ の 1 の の の 3 の 71F さ FFF7FFF") 
1790 DEFCHR 和 まま ( 73) =HEXCHR ま ("の の の の D の BE の ウ F の F 
ВЕС の の 999D の BOO の の FC の の の の D の BE の OF の FBFC") 
1800 DEFCHR ま ( 74) =НЕХСНКФ ("0000002020461 
в20 の の の の の の 2 の 2 の 46182 の の の の の の の 9 の 292946182 の " ) 
1810 DEFCHR ま ( 75) =НЕХСНКФ ("0000002010080 
404 の の の の の の 6 の 1 の の 8B の 4 の 4 の の の の の の 6 の 1 の の 8 の 4 の 4") 
1820 DEFCHR ま ( 76) =НЕХСНКФ ("0020100004040 
の の の の の 2 の 1 の の の の 4 の 4 の の の の 020100004040000") 
1820 DEFCHR ま ( 77)=HEXCHR$ ("1000000000020 
の の の 1 の の の の の の の の の の 2 の の の の 1 の の の の の の の の の の 2 の の の 9" ) 
1840 DEFCHR ま ( 78) =НЕХСНКФ ("0077000000000 
の の の の の 77 の の の の の の の の 9 の の の の の の 77 の 9 の の の の の の の の の の " ) 
1850 DEFCHR ま ( 79) =HEXCHR ま ("の の nA の の の の の の の の の 
одо の の nn の の の の の の の の の の の の の の QA の の の の の の の の の の の の " ) 
1860 DEFCHR ま ( 80) -НЕХСНК%("03070ҒІҒІЕЗЕО 
の の の の の の の の の の の の の の の の の の の の 3 の の の の の の の の の の の の の の " ) 
1870 DEFCHR ま ( 81) =НЕХСНКФ ("ҒҒҒВҒСОО0000 
の の の の 1 の の の の の の の の の の の 9 の 9 の の ғівеғасаойавоаввв”> 
1880 DEFCHR ま $( 82) =HEXCHR*(「 の の FF の の の の の の の の の 
の の の の の FF の の の の の の の の の の の の の FF の の の の の の の の 9 の の 9" ) 
1890 DEFCHR ま ( 83) -НЕХСНК%("ЕҒ?ЕТҒЗҒ2Е780 
000 ЕС78702020400000 FF7B7 の 2 の の 4 の の の の の 9" ) 
1900 DEFCHR ま ( 84) -НЕХСНК%("ҒҒ7Ғ0О72ҒС7190 
700 FF7F ウ 72FC719 の 7 の の FF7F の 72FC71997 の の " ) 
1910 DEFCHR ま ( 85) =HEXCHR 和 $("FFFFFFFFFEFB の 
000 FCFBFEOE の CO の OO の の FFFBFOE の EC の 9 の の 9 の") 
1920 DEFCHR 和 ま ( 86) =HEXCHR ま ("リフ FFF7F 1F ウ 7 の の 
100 の EFF1FO691 の 1 の の の 7FFF7 フ F1F の 7 の 3 の 1 の の 9”) 
1920 DEFCHR ま ( 87) =HEXCHR ま ("FEFFF の C の の の の 0 の 8 
040 FE6 ミ 1 の CO の の の の 8 の 94 の FEFFF の CO の の の の 8 の 4 の" ) 
1940 DEFCHR ま ( 88) =HEXCHR 和 まま ("FFFF7FFFSF の 7 の 
000 FE の 1 の CC7 ミ F の 7 の の 9 の FFFF7FFFSF ウ 79 の の 9 の" ) 
1950 DEFCHR ま ( 89)-НЕХСНКФ("ҒЕҒСҒОҒЕВОСОО 
000 の の FCF の FEBC の の の の の FFFCFOFEB の C の 9 の 9 の の" ) 
1950 DEFCHR 和 ま ( 90) =HEXCHR$ ま ("COFF の の 2 の 1 の の 8 の 
の の 2 の COFF ウ の 2 の 1 の の 8 の の の の COFF の の 2 の 1 の の 8B の の の 0 の" ) 
1970 DEFCHR ま ( 91)=HEXCHR$( "の の FF の の の 4 の 41 は の 
000 の の FF の の の 4 の 4 1 8 の の の の の の FF の の の 4 の 418 の の の の 9") 
1980 DEFCHR ま $( 92) =HEXCHR$ ま ("の の FF の の の の の の の 2 の 
400 の の 9FF の OO の の 9294 の の の の FF の OO の の の 9294 の 99") 
1990 DEFCHR ま ( 92) =HEXCHR 和 ("の の FF ウ の の の の の の 1 の 
002 の の FF の の の の OO の の 1 0002 の の FF ウ の の 9 の の の 1 の の 92") 
2000 DEFCHR ま ( 94) =НЕХСНКФ ("0044000000000 
000 の の 44 の の の の の の の の の の の の の の 44 の の の の の の の の 9 の の の " ) 
2010 DEFCHR$ ( 95) =НЕХСНКФ ("0010000000000 
の の の の の 1 の の の の の の の の の の の の の の 910 の の の の の の の の の の の の の " ) 
2020 DEFCHR ま ( 96) =HEXCHR ま ("の の の の の の の の の の の の 
ØIF の の の の の の 9 の の の の 9 の の 1DF の の 9 の の の の の の の の の の 9 の 9 の 9" ) 
2020 DEFCHR 和 ま ( 97) =НЕХСНКФ ("0000000000002 
070 の の の の の の の の の の の の E の ウ の の の の の の の の の の の の の の の の の " ) 
2040 DEFCHR ま ( 9 日 ) =HEXCHR 和 ("の の の の の の の の の の の の の 
ода の の の の の 9 の の の 9 の の の FF の の の 9 の の の の の の の 9 の の の EB" ) 
2050 DEFCHR ま ( 99) =HEXCHR も ("の の の の の の の の の の の の の 
оло の の の の 9 の の の 9 の の 9 の の の FF の の 9 の 9 の の 9 の の の の の の FB" ) 
2060 DEFCHR* ま (1 の の ) =HEXCHR も ("の の の の の の 1CSE 7 ビア 


FFF の の 291C さ SE7E7FFF 0000001С5Е7Е7ҒҒҒ") 
2070 DEFCHR ま (1 の 1 ) =НЕХСНКФ ("0020000000000 
の の の 0002071238100000 の の の の の 29 の 1 の の 9 の の 0 の" ) 
2080 DEFCHR ま (1 の 92) =НЕХСНКФ "0000000000000 
000 209E6EFFFFFF7F の F 0000020020 1040100") 
2090 DEFCHR$ (103) =НЕХСНКФ ("0000000000804 
DAB の の の の の の の 99 の 8 の 4 の 0QC の の 99 の の の の 9 の 8 の 4 の AB" ) 
2100 DEFCHR ま (1 の 4 ) =НЕХСНКФ ("0000000000000 
の の の の 94 の E9481COB の の の の の 9 の 4 の の 9 の の 8 の の の の の の " ) 
2110 DEFCHR ま (1 の 5) =HEXCHR 和 ま ( "の の の の の の の の の の の の の 
の の の の の 28 の の の の SQ の の 1 の の の の 2B の の の n の 5 の の の 1 の の " ) 
2120 DEFCHR ま (1 の 6) =НЕХСНКФ ("0000000202020 
202 0000010202020202 0000000202020202") 
2120 ПЕҒСНК% (107) =HEXCHR 和 ("の の の の の の の の の の の の の 
の 1 の の の の の の の の の の 9 の 1 の 1H の の の の の の の の の の の の の の 1 の " ) 
2140 DEFCHR$ (108) =НЕХСНКФ ("7Е00000100АА0 
000 7Е41@2@5ЕЕЕАС@@@ 7F4 の の の の の の の QnA ウ の の の " ) 
2150 DEFCHR ま (1 の 9) -нЕХСНК% ("7Е00008000560 
000 FEB24 の QROFF57 ウ さ の の FE ウ 2 の の の の の の 56 の の の の " ) 
2160 DEFCHR ま (1 1 の) =HEXCHR 和 ("の の の の の の B1 じ さじ さ 
978 0000010707020503 0000010Ғ15552767") 
2170 DEFCHR* ま (1 1 1 ) =HEXCHR ま ("の 21 じ 7B ミ の の の 7 の 
の Cg の の ミ 1EFCFBF ウ FEFBE6 の @ さ 1EFCFBFFEFEFE") 
2180 DEFCHR ま (112) =HEXCHR ま ("の 1 の 1 の 1 の さ 1BE7FF 
F の の の 1 の 1 の 1 の さ 1 さ 71EFF の の の の の の の 2 の の の の の の FF " ) 
2190 DEFCHR ま (11 さ ) =HEXCHR ま ("1 の の の BOB の E の FBF 
CO の 1 の の 22 の 298 の COCOFC の の の 9 の の の の の の の の の の の FC" ) 
2200 DEFCHR ま (114) =HEXCHR ま ("の 1 の 1 の 1 の 11EZFF 
FFF の 1 の 1 の 1 の さ 1 さ 71EFF の の の の の の の の の の の の の の FF " ) 
2210 DEFCHR$ (115) =HEXCHR 和 ("1 の の 2B の BE の FBF 
CFD 1 の @ の 90 の の の BCCOFD の の の 9 の 9 の の 99 の の の の の の FD" ) 
2220 DEFCHR ま (116) =НЕХСНКФ ("ЗҒ7Е5С1804000 
000 2Ғ7Е5С1804000000 ミ F7E3C じ 18 の 4 の の の の の の " ) 
2220 DEFCHR ま (117) =НЕХСНКФ ("0000000000000 
ова の 81COB の の の B 1COB の の の の 98B の の の の の の の 8 の の の 9" ) 
2240 DEFCHR$ (118) «НЕХСНКФ%("01010505021Ғ7 
F の の 01020502051Ғ7Е7Ғ 000200010000007Ғ "> 
2250 DEFCHR ま (119) =HEXCHR ま ("の BSQBBC の F BF 
Е@@ 5с5в706в000000ҒЕ 50265088000000ҒЕ") 
2260 DEFCHR$ (120) =HEXCHR 和 ("の 1 の ミウ の さ の ささ 1F7 
FFF の 1 の この さ の 2 の 2 そ 1F7EFF の の の 92 の の の 1 の の の の の の FF "> 
2270 DEFCHR$ (121) =НЕХСНКФ ( "S@Z85@88C0F EF 
EFF 5CSB7 の 968 の OO の の の FF 5 の 285 の BB の の の の の の FF "> 
2280 DEFCHR$ (122) -НЕХСНК%("02120Е001АҮЛ7ЕҒ 
Е@@ @А1А1Е1А1%7@Е@ЕЕ の 212 の 2 の の の 2 の の の の FF" ) 
2290 DEFCHR ま (12 さ ) -НЕХСНК%("0000006С187ЕҒ 
FOO 1818187C9 ウ 7 の E の FF の の 9 の 9 の の 9 の の の の の の 9 の FF "> 
2200 ОЕЕСНК®Ф (124) =НЕХСНКФ ("02120Е001А7ЕҒ 
ЕЕЕ 1QA1E1Q1 さ 7 の ウ E ウ FF 02120200020000ҒғҒ") 
2210 DEFCHR$ (125) -«НЕХСНК%(" 0000006С187ЕҒ 
FFF 1818187C9070EQFF の の 9 の の の の の 9 の の の の の FF " ) 
2220 DEFCHR ま (126) =HEXCHR ま ("プロ ウ E の C ウ の の の の の の の 
の の の の 7⑦6 の D の 9 の 9 の の の の の の の 4FDFDF1F の 7 の 7 の 3 の ウミ" ) 
2220 ОЕҒСНКФ (127) =НЕХСНКФ ("4040000000000 
000 FBCg7 の ECDC681 の の の FEFEFCFCEFCFBFSBF@" ) 
2240 DEFCHR$ (128) -НЕХСНК%("01050ғ0205050 
507 の の 9 の 9 1 9 さ の 3 の 3 の 2 の 6 の 1 の 3OE の 1 の 1 の 3 の の の 9" ) 
2250 ПЕҒСНК%(129)-НЕХСНК%("7ФСФЕОҒОҒВЕЙЕ 
оғо 7 の CO の の 9 の の の 9 の の の 4 の 4 の 7 の 4 の の D の DBB の OE の 7 の " ) 
2560 DEFCHR ま (1 さ の ) =HEXCHR ま ("の 2 の 7 の 7 の F ウ FF の 
EØF の の の さ の さ の 4 の C の 9 の 3 の F 0207070700010800") 
2270 ОЕҒСНКФ (151) =HEXCHR 和 も ("EE ウ FBFCFBFBFBF 
осо E ウ の の の の 6 の 9E ウ CO の の の の の E の CBC4F の OFBFB7 の の " ) 
2280 DEFCHR ま (1 さ 2) =HEXCHR ま ("の 7 の 7 の F の 7gF 1E の 
100 の 7 の 7 の 2 の 2 の の の 3 の 72F 000004040Е1в072Ғ") 
2290 DEFCHR$( 1 ささ ) =HEXCHR 生 ("EE の OE の FBFBFBF 
470 の 9 の 21CSE7EFEFFFF の の の 21C さ SE7EFEFFFF") 
2400 DEFCHRS (134) =HEXCHR を ("の 11F1F1FSF3F さ 
DZC 01040С1851250150 011С1602021026858") 
2410 DEFCHR$ (135) «НЕХСНК%("СдОЕОВОВОЕОҒАОҒ 
070 Cg の 9 の 9 の 9 の 9 の COCCOS の O COE の BOOE の F の F の 69" ) 
2420 DEFCHRE (156) =HEXCHR 和 ("の の の の の 2 の 42F ミ F ア 
F7F の 9 の の 2949FOE2C69 0000020429255517") 
2420 DEFCHR$ (137) =HEXCHR$( "の の の の の の の の 8 の B の E 
FFF の 9 の の の の の の の の 9 の E の FB の の の の の 9 の 9 の 8 の 8 の EF に 7") 
2440 DEFCHR ま (1 日 ) =HEXCHR ま ("の の の の の の の さ の 4 ミ F ア 
F 7F の 99 の の の の さ の 41F さ E6 の の の の の 9 の の の 4 さ B5 の 1 の" ) 
2450 DEFCHR$ (129) =НЕХСНКФ ("0000000001058 
F9F の の の の の の の の の の の の の 81F の の の の の の の の の 1 の さ B78 の " ) 
2460 DEFCHR ま も (14 の ) =HEXCHR 和 ("の の の の の さ の 4 ロウ F ミ FZ 
F7F の の ウ の の の さ の 4 の F 1F3C6 の 0000030408705018") 
2470 DEFCHR$ (141) =HEXCHR 和 ("の の の の の の の 2 の 6BEE 
сес の の 9 の の の 9 の の 9 の の の 92 の 97C の の 9 の の の の 2 の 6BE9CB の " ) 
2480 DEFCHR ま (142) =HEXCHR$ ("0001010205020 
107 の ⑦ の の の の の の 1 の 1 の 1 の 1 の 3 の の の の 91 の 2 の 2 の 2 の 1 の 1") 
2490 DEFCHR ま (14 さ ) =HEXCHR ま ("DEFEFEFEFCFMF 
@EQ 183 の FOFOE ウ BOF の OB の 46CE ウ E46C ウ 6 の F OED" ) 
2500 DEFCHR ま も (144) =HEXCHR ま ("の F の F の 7 の 7 の 7 の 7 の 
F さ F の CO の B の 5 の 5 の 7 の 7 の 2 の 2 の の の 6 の 6 の 6 の の の の の じ さ じ " ) 
2510 DEFCHR ま ( 145) «НЕХСНК%("ҒОҒОЕОВОСОЕОЕ 
AEO 4 の 8 の の の の の の の の の の の の の 7 の F の 6 の の の 9 の の の の の の の の " ) 
2520 DEFCHR ま (146) =HEXCHR 和 ("の 7 の 7 の F の 7 の F 180 
の の の の 7 の 7 の 2 の 02 の の の の の の の の の 99 の 9 の 4 の 4 の E18 の の の の 9" ) 
2520 DEFCHR$ (147) =HEXCHR ま ("EE の E の COB の の の の 
の の の の 9 の の の の の の の の の の の の の の の の の 9 の の の の の の の の の の の の の" ) 
2540 DEFCHR$ (148) =HEXCHR 和 ("の 7 の 7 の F の 7 の F 180 
100 の 7 の 7 の 2 の 2 の の の その こさ 4 1 000004040Е 160541") 
2550 ОЕЕСНК% (149) =HEXCHR ま ("EE の E の COE の E の E 
оғ? の の の 9 の の の さぶ B74FQFEFF の 99 の の の さ B74FAFEFF" ) 
2560 DEFCHR$ (150) =HEXCHR 生 ("1 の の の の の の の の の の の の 
100 1 の の の の の の の の 9 の の の の の の 1 の の の の の の の の の の の の の の の " ) 
2570 DEFCHR$ (151) =HEXCHR$ ("7C7E7E7F7EFCF 
осо 7070303018080220 00000002030700" ) 
2580 DEFCHR$ (152) =HEXCHR ま ("フフ F ミ ビ さ B の の の の の の の 
の の 9 の 6 の 2 の さ の の の の の の の の の の の の 1 の 9 の の の の 9 の の の の 9 の の の " ) 
2590 DEFCHR$ (153) =НЕХСНКФ ("ЕЕЕЕ7ЕЗЕ1Е@Е@ 
CO4 1C の E の 692 の 9 の の の 99 の の 9 8B38B の の の 9 の の COE の C の 4 " ) 
2600 DEFCHR$ (154) =HEXCHR 和 も ("フミ F さ 9 の の の の の の の 
の の の 6 の 2 こさ の の の の の の の の の の の 18020 10000000000" ) 


名 前 を 付け て も ら え な か っ だ の は だ れ ? 
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2010 DEFCHR$ (155) «НЕХСНК%("ҒҒҒҒҒҒОҒО7020 
100 7СС@@@@@0@@0@@@@@ С@С@С@@7@7@5@1@@") 
2620 ОЕЕСНЕ% (156) =НЕХСНК% ("7ЕЗЕ@Е@@@@@@@ 
の の の “4728000000000000 の 7 の FOF の の の の の の の の の の " ) 
2620 DEFCHR$ (157) =HEXCHR ま ("FCFCFCSC1C の Cg 
400 F の の の の の の の の の の の の の の の の の の 9 の の 1C じ 1C の CO4 の の " ) 
2040 DEFCHR$ (158) =HEXCHR ま ("4FFFFFFF7F7CS 
B の の の 7 の E1CSB1 の の 9 の の の の の 18B1E1C の 494 の 2 の の の ") 
2050 DEFCHR$ (159) =HEXCHR 和 ま (「 EC の の の の の の の の の 
の の の の の の の の の の の の の の の の の の の E の CO の の の の の の の の の の の の " ) 
2660 ПЕЕСНК%(160) =НЕХСНКФ ("A21 O03QOF OF OF 1F 3 
FIF 00010207041Сс2809 010250ғ0ғ09000051") 
2670 DEFCHR$ (161) =HEXCHR$ ('" 8080ЕйҒОЕ 0707 
оға вгооааайгагагаоса B の BE の F ウ B の の の 6 の F の ") 
2080 DEFCHR ま (162) -НЕХСНК%("1824241800100 
810 1892с2с1800000000 0010000010101818") 
2090 DEFCHR$ (163) -НЕХСНК%("152А4508452А4 
028 Е09090Е092859592 1F6F6F1F6D7Q6Q6D"' ) 
2700 DEFCHR ま (164 ) =HEXCHR ま ("の の の の の の の の の の の の の 
の の 9 の の の 99 の の の さ の 7 の F 1F 1F の の の 9 の の の の の の 99 の 9 の の の 9" ) 
2710 ПЕҒСНК% (165) =HEXCHR 和 ("の の の の の の の の の の の の の 
000 の F ミ FFFFFFFFFFFFF の の 9 の の 993 の 7 の F1FSF" ) 
2720 DEFCHR ま (166) =HE'XCHR も (の の の の の の の の の の の の の 
000 F ウ FCFFFFFFFFFFFF 00 ОООВОЕОСОЕОЕЙ") 
2720 DEFCHR ま (167) =НЕХСНКФ ("0000000000000 
の の の の 099 の 9CQEFQFBF ヨ の OO の の の の の の の の の の の の の "" ) 
2740 DEFCHR ま (16B) =HEXCHR も ("の の の の の の の の の の の の 
000 ЕЕЕЕҒЕҒЕЕ?Е?ЕЗЕЗЕ 7F7F 3F 1800000000" ) 
2750 DEFCHR$ (169) =HEXCHR$ ‹"@@2020@@2@@@@@@ 
000 FFFFFFFFFFFFFFFF ЕҒЕҒЕҒҒЕ?ЕЗҒ2ҒӨҒ") 
2760 DEFCHR ま (17 の ) =НЕХСНК% ("дОООООООООО ОО 
000 FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFF") 
2770 DEFCHR ま (171 ) =HEXCHR$ ま ("の の の の の の の の の の の の の 
000 FFFFFFFFFEFEFCFC ЕОСОВОВООООООООО") 
2780 DEFCHR ま (172) =НЕХСНКФ ("0000000000000 
の の の の の の の の の の の の の の の の の の 1 の の の の の 9 の の の の の の の の の 9 の" ) 
2790 ОЕЕСНКФ (171) =НЕХСНКФ ("0000000000000 
ооо の の の の の の の の の F ミ FFFFF の の の の の の の の の の の の 1 ビ さ 日 " ) 
2800 DEFCHR$ (174) =HEXCHR$( "の の の の の の の の の の の の の 
の の の の の の の 9 の の の F の FCFFFF の の の の の の の の の の の の の の の の の" ) 
2810 ЮЕЕСНКФ (175) =НЕХСНКФ ("2000000000000 
の の の の の の の の の の の の ⑦ の の の の の 8 の の の の の の の の の の の の の の の の の " ) 
2820 DEFCHR# (176) =HEXCHR ま ("さき ER6F 1F1F1F の F 1 
ЕЗЕ @@С1С1С1С@Е@2@2 さ B61 の の の の の の の の 1 じ さ じ ") 
2820 DEFCHR ま (177) =HEXCHR ま ("FE の BOB の COE の E 
осо の の の の の の の の の の の の の 0 の の FOE の B の の の の の の の の の 99" ) 
2840 ПЕЕСНК%(178) =НЕХСНКФ ("0810183426180 
の の の の 9 の 9183 じ さ C18 の の の の 1818001005000000") 
2850 DEFCHR ま (179) -НЕХСНК%(" 000060089060 
の の の の の の の の 6 の FOF の 6 の の の の の 9 の の の の 9 の 4F の の の の の の の 9") 
2860 DEFCHR$ (180) =HEXCHR 和 ("の の の の の の の の の の の の の 
000 ҖЕЗЕ7Е7ЕЕЕЕЕЕЕЕЕ の 93 の C1FSF さ F7F7F") 
2870 ОЕЕСНКФ (181) =HEXCHR 和 ("の の の の の の の の の の の の の 
000 FFFFFFFFFFFFFFFF さ F さ F さ FEFFFFFFFFF") 
288@ ОЕЕСНКФ (182) =HEXCHR ま ("の の の の の の の の の の の の の 
000 FFFFFFFFFFFFFFFF F7FFFFFFFFFFFFFF") 
2890 DEFCHR ま (18 さ ) =HEXCHR 生 ("の の の の の の の の の の の の の 
000 FCFCFEFEFFFFFFFF の の COEOE の FE の COE の " ) 
2900 DEFCHR ま (184) =HEXCHR ま ("の の の の の の の の の の の の の 
000 1F1F ウ F ウ 7 の の の の の の の の の の の の 9 の の の の の の の 9 の の 9" ) 
2910 DEFCHR* ま (185) =HEXCHR* ま ("の の の の の の の の の の の の の 
000 FFFFFFFFFFFFSFQF 1F1F1FOE の の の の 9 の の 9" ) 
2920 DEFCHR$ (186) =HEXCHR 和 (の の の の の の の の の の の の の 
000 FFFFFFFFFFFFFCF ウ FEFEFC7B の の の の の の の の " ) 
2920 DEFCHR ま (187) =HE XCHR$ ("の の の の の の の の の の の の の 
000 FBFBF の EOC の の の の の の の の の の の の の の の の の の の 9 の の の" ) 
2940 DEFCHR$ (188) =HEXCHR$* ま ("の の の の の の の の の の の の の 
の の の の 3 の 3 の 7 の 7 の FOFF の F の の の の 9 の 1 の 1 の さ の 3 の 7 の 3") 
2950 DEFCHR# (189) =HEXCHR$ ('" の の の の の の の の の の の の の 
000 FFFFFFFFFFFFFFFF 7 の EE の DOFBFCFEFF" ) 
2940 DEFCHR$ (190) =НЕХСНКФ ("0000000000000 
の の の FFFFFFFFFFFFFFFF 0406070707030301") 
2970 DEFCHR$ (191) =HEXCHR* ま ("の の の の の の の の の の の の の 
の の の CO の COEOE の F の OF の F の OF の の の の 99 の 8 の COC の COB の " ) 
2980 DEFCHR ま (192) =HEXCHR ま ("の の の の の の の の の の の の の 
000 の FOF の OF の F の 7 の 7 の さ の 3 の 1 の 1 の 1 の 1 の の の の の の の の " ) 
2990 DEFCHR$% (193) =HEXCHR 和 ("の の の の の の の の の の の の の 
000 FFFFFFFFFFFFFFFF FEFEFCFCFBFB7939") 
35000 DEFCHR ま (194 ) =НЕХСНКФ ("0000000000000 
000 FFFFFFFFFFFFFFFF の 3 の さ の さ の F さ F7FFEFE" ) 
5010 DEFCHR$ (195) =НЕХСНКФ ("0000000000000 
000 Е@Е@Е@Е@Е@Е@С@С@ の BOB の の の の の 9 の 9 の の 9 の" ) 
5020 DEFCHR ま (196) =HEXCHR 和 ("の の の の の の の の の の の の の 
の の の の 71FSF7F7FFFFFFF @@@7@Е1ЕЗЕЗЕ7Е@7") 
2020 ОЕЕСНКФ (197) =HEXCHR 和 ("の の の の の の の の の の の の の 
000 E の OFBFCFEFEFFFFFF の の EOFOFOFBFCFEFE" ) 
2040 DEFCHR$ (198) =НЕХСНКФ ("0018000020200 
の の の の の の の の の の の 2 1 2 さ の 7 の F 0000000020210207") 
2050 ПЕЕСНКФ (199) =HEXCHR 和 ("の の 4 の の 4 の の の の の 4 の 
4 の の の の の の の 4 の の 8 の CE の F の の の の の の 4 の 9 の の 9 の の の 4 の 6 の 9") 
2000 DEFCHR ま (2 の の ) =НЕХСНКФ (" 2000000040400 
の の の の の の の の の の の の の の の の の 1 さ の の の の の の の の の の の の の の の の" ) 
5070 DEFCHR ま (2 の 1 ) =НЕХСНКФ ("4002000000020 
200 4 の の の の の の 99 の の 2 ロ 2BO 4 の の の 9 の の の の の の の 2 の 2 の の " ) 
5080 DEFCHR も (2 の 2 ) =HEXCHR ま ("の の の の の の B の B の の の の 
の の の の の 9 の 9 の の BOB の の OO の の の の の の 9 の の 9808 の の の の の 99") 
5090 ПЕҒСНК% (202) =НЕХСНКФ ("0100000001010 
の の の の 1 の の の 9 の の の の の の の の の の の 1 の の の 9 の 9 の の の の の の の の" ) 
1100 DEFCHR# (204) =HEXCHR ま ("の の 1 の さ の 7 の F の F の 
207 の の の 1 の 1 の 1 の 1 の 5 の 1 の 1 の の の の の 2 の 7 の F の 9 の の 9 の" ) 
2110 ОЕЕСНЕФ (205) =HEXCHR ま ("3③CFOE の OF の OF の F OF 
ВЕВ 28Е0Е090102040Сс0 さじ さ の CO の E の OE の CO8 の 4 の 9" ) 
2120 DEFCHR ま (2 の 6) =НЕХСНКФ ("ОЗОР 1F SF 3F OF O 
Е@Е 0207070Е1Е0С0808 02091ЕЗҒ2Ғ070500" ) 
2120 DEFCHR ま (2 の 7 ) =HEXCHR ま ("EEOB の の OB の B の BB 
осе CO の の の の の の の の の の B の CO Е@в@@@в@в@в@@@@@" ) 
5140 DEFCHR$(2 の B ) =HEXCHR ま ("の の の の の の の の の の の の の 
の の の の 1 の の の の の 9 の の の の の の の の の の の の の の 9 の の の の の の の の の の " ) 


(K.S.C No3287 は 俺 だ と で ド タ ・ バ リア ン ) 
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リス ト 1 HIGH WAY ARMY1 PCG 定 義 プ ログ ラム ソー ス ・ リ スト 


5150 DEFCHR$ (209) =HEXCHR ま ("の の の の の の の の の の の の の 
000 FFFFSF の F の の の の の の の の 19 の 9 の の の の の 9 の の の の" ) 
5160 DEFCHR$ (210) =HEXCHR* ま ("の の の の の の の の の の の の の 
000 FFFFFCF ウ の の O の の の の の の FBE の OB の の の の の の の の の の の 9" ) 
3170 DEFCHR ま (11 ) =HEXCHR ま ("の の の の の の の の の の の の の 
の の の の の 2 の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
3180 DEFCHR$ (212) = ニ HEXCHR 和 ("の の の の の の の の の の の の の 
000 FFFFFF7F7F さ SF 1F の 7 60702581Ғ0Ғ070300") 
3190 DEFCHR ま (で 1 さ ) =HEXCHR 和 ("の の の の の の の の の の の の の 
000 FFFFFFFEFEFCFBE ウ 189 の 183BFBF の E の の の " ) 
3200 DEFCHR$(214)=HEXCHR$ ("0040000010100 
400 の F47 の ミ の 1 の の の 9 の の 4 の の の 64 ジ ご の の の の の の の の の 4 の 9 の" ) 
5210 ОЕҒСНКФ (215) =НЕХСНКФ ("0000001 204000 
800 Е@Е@С@92@402@@@@@ Е0С080 1: 204000000" ) 
3220 ОЕҒСНКФ (216) =НЕХСНКФ ("0080000000202 
208 の 1 の の の 99 の の の SQS の OO の の の の の の の の の の 92 の 2 の の の " ) 
5250 DEFCHR$(217)=HEXCHR$ ("00000000097020 
004 BOO の の 0 の の の の の の の の の 4 の の 9 の の の の 9 の の の の の の の の 4 " ) 
5240 DEFCHR$ (218) =HEXCHR ま ("の の の の の の の の の の の の 4 
の 4 の の の の 9 の の の の 9 の の の の の の の の の の の の の の の の の の の 9 の の の の の " ) 
5250 DEFCHR 和 まま ( で 19) =HEXCHR 和 ("の の の の の の の の の の 4 の 
108 の の の の の の の の の の の 4 の 1 の の の の の の の の の の の の の 4 の 1 の の ") 
5260 DEFCHR$ (220) =HE XCHR ま ("の 7 の 7 の 7 の F 1E1F6 
FEE の 1 の 1 の の の の の の 9 の の の の の の の 9 の 9 の の 4 の ぶさ の の 9 の の の の の 9 の" ) 
5270 ПЕЕСНК%(221)-НЕХСНК%("ҒОҒОҒСҒЕ?ЕЗЕІ1 
C7C EQBQ1C1EQEQEQ404 070Сс0800000 1878") 
SERA DEFCHR$ (222) =НЕХСНКФ ("OF 1F 3F SESF SF 7 
раз の C1DSBC の の の の の の の の の の の の の の 10030307000") 
5290 DEFCHR$ (225) =НЕХСНК% ("С@С@С@С@&@7@Е 
DEO COB の の の の の の の 9 の の 9 の の の の 4 の CO の 9 の の の の の の の の の " ) 
2500 DEFCHR$ (224) -НЕХСНКФ("0005070707072 
B7F 0005070707075В7Ғ 00050707070735В7Ғ") 
510 DEFCHR$ (225) =HEXCHR ま ("FBFCFAFBFEFFF 


= sss) = 2 HIGH WAY ARMY1 


10 жекк-кек-ккке-же-же-ж 


20 ++ жж 
50 *+HIGH WAY АКМҮ-ж 
40 ++ CMAINI жж 
(SO ++ БҮ ++ 


640 ж% 5.МОКІҮАМА ++ 

70 *+ 1984/11/05 ++ 

ва ж $L: 63 ++ 

90 ЕЕ 964-4 64-96 4 ЗЕ 4 + 

100 COULD INIT 

110 CLR:CLICKOFF:KBUF OFF: TEMPO 7500 

120 DIM бі%(1),5Ғ%(2),В5%(1),В%(7) 

150 DIM ВА%(1),НТ%Х(1),М5%(1),С%(2,1),С0% 


140 DIM FJ$ (2) ,FC$ (2) ‚Маф (5) 

150 DIM В0%(8),В00%(2),1К%(4),БК%(4) 

160 DIM М%(9) 

170 DIM MX (9) 。MY(9) 。EH(7) „ВНІ (7) ,EX (10), 
EY (10) ,EF (10) 。EF1 (10) 

180 DIM ЕҒ2(10),УХ(10) ,VY (10) ,EW(10) ,EC ( 
10) 

190 DIM МЕ (10) „МХ (10) ,МҮ(10) ,МУХ (10) 。NVY 
(10) ,NC (102) ,NW(10) 

200 DIM 50%(20) ,SC (15) ,ВЕҒ(4) „ВЕС (4) 。BEX 
(4) ,ВЕҮ(4) 

210 І WANTED TO USE "DATA"... < 

220 SCORE FOR EACH CHARACTER 

230 SC (2) =0: 


(#10) 
240 SC (1) =5: SC (2) =5: SC (5) =5: SC (4) -10: 
HOP / BAT /CRA/ TAF 
250 5С (95) = 20: SC (6) = 20: SC (7) =5:5С (8) =5: 
EAS / EAW/ HUN / HAT 
260 SC(9) =5: SC (10) -50:6С(11)-50:5С(12)-1 
0: MINZ/TSUZ/FPWAZ/ZHVT 
270 5С(13) =10:5С (14) =20:5С (15) =20: 
NES /WAS / BAA 


280 MY SHIF CHARACTER FATTERN 

290 55Ф-НЕХСНКФ("2А>2ВІҒІрІрЗАЗБ") 

500 SL*$(Q@)=HEXCHR$("2C2D1F1D1DZC3D") 

510 SL%(1)=HEXCHR$("2C2D1F1D1D2829") 

520 Sd$=HEXCHR$("1D2E2F2D1F1D1D1DZEZF42" 
) 

ささ の SF$ (0) =НЕХСНКФ (" 1040412р1ғ1р1р10р5051 
42") 

540 SF$ (1) =НЕХСНКФ ("1042412ріғ1р1рір5551 
42") 

550 РФ (2) =НЕХСНКФ ("10104445412р1ғ1рірір 
1054555142") 

з6@ МҮ SHIF BEAM 

570 ES$ (0) =HEXCHR ま ("46471F1D1D5657") 

Зва В5%(1)-НЕХСНК%("48491Ғ1р1Пр5859") 

590 B$=HEXCHR$ ("4A1F1DSA") : B$ (0) =B$+STRI 
МБФ (S, CHR$ (&H52) ) 

400 B$=HEXCHR$ ("4R1F1DSE"): B$ (1) =R$+STRI 
МБФ (10, CHR$ (&H52) ) 

410 B$=HEXCHR$ ("4C1F1DSC") : RO$=HEXCHRS$ (" 
SF SE4F 4E") 

420 EO$=BO$+STRING$ (5, CHRS (&H52)) 

430 ВФ (2) =EB$+STRING$ (4,СНК% (%Н52) ) +CHR$ ( 
*H1C)+CHR% (НІС) +EQ $ 

440 B$=HEXCHR$("4D1F1DSD") 

450 ЕФ (5) =B$+CHR$ (®Н52) +СНКФ (®Н1С) +СНЕ% ( 
*H1C) +СНКФ (%H52)+STRING$(8,CHR$% (%H1C)) +E 
0% 

460 R$=CHR$ (&H1F) +СНКФ (%H4E) +СНКФ (%H52) + 
STRINGS (2,СНКФ (НІС) ) +СНКФ (НУРЕ ) 

470 ВФ (4) =B$+STRING$ (12,СНКФ (%H1C) ) +E の ま 

480 ЕФ=СНКФ (HIF) +СНКФ (ЕНЕ) +СНКФ (%H1C) + 
CHR ま (%&H4E ) 

490 В%(5) «В%%5ТКІМС%(20,СНК%(ЕНІС)) +HAS 

500 В%(6)-<СНК%(ЕНІҒ) +5ТКІМС%Ф (3, СНКФ (НІС 
) ) +CHR$ (&HSF ) +STRING$ (24 , CHRS (&H1C) ) ыв0% 


FFF ҒВЕСҒАҒВҒЕЕҒЕҒЕҒ FBFCFAFBFEFFFFFF" ) 
5520 DEFCHR ま (2 や 6) =НЕХСНКФ ("OF 1FAFQOF OF SF D 
FFF ウ F1FgFOFOFSFDFFF の F1FgFg ウ FOOFSFDFFF" ) 
5550 DEFCHR$ (227) =HEXCHR 和 ま ( "Cg 1 の B2BEF OF 
BFD Cg1 の 982BOE の FOOFBFD Cg1 の 8B2BOE の F ウ FBFD" ) 
55240 DEFCHR$ (228)=HEXCHR$ ("0400387C7C7E7 
FFF 0400587С7С?Е?ЕҒҒ 04003587С7С?Е?ҒҒЕЕ " ) 
2550 DEFCHR$ (229) =HE XCHR 生 ("の の の の 4 の の の の の 6 の F 
BFD の の の の 4 の の の の の 6 の FBFD の の の の 4 の の 999 の 6 の FBFD"' ) 
5260 DEFCHR$ (220) =HEXCHR 和 ("の の の 1 の の さ 47BF 
EFF 000001005478ҒЕЕҒ の の の の の 1 の の さ 47BFEFF " ) 
2570 DEFCHR ま (2 で さ 1 ) =HEXCHR ま ("の の ロウ の の の の の の の の の じ 
оғ> の 9 の の の の の の の の の の COF5 の の の の の の の の の の の の COF5" ) 
3580 DEFCHR$ (252) =НЕХСНКФ ("0000000010045 
07Е 000000001004507Е 00000000 1 の の 4 さ の 7E" ) 
2590 DEFCHR ま (2 ささ ) = ニ HEXCHR ま ("の の の の の の の の の の の の の 
044 の の の の の の の の の の の の の の 44 の の の の の の 99 の の の の の の の 44") 
5400 DEFCHR$ (254) =HEXCHR 和 ま (" ウ F さ F5F 1F 1F さ F ア 
FFF の F さ F5SF 1F1F さ F7FFF の F さ F5F1F1F さ SF7FFF" ) 
5410 DEFCHR ま (で さら ) «НЕХСНК%(" ВОСФЕОЕОСОВОА 
@СЕ B の CE ウ E ウ CO の BOAOCE В@С@Е@Е@С@В@А@СЕ " ) 
5420 DEFCHR$ (236) =НЕХСНКФ ("0705010902077 
FFF の 7 の 5 の 1 の 9 の さ の 77FFF 0705010902077ҒҒЕ") 
5450 ПЕҒСНКФ (2327) “НЕХСНК%("ЕОҒВҒФОҒОЕОЕОҒ 
の FD ЕЙҒВҒОҒОЕОЕОҒОҒОИ EØFSFØFØEDEØFØFD" ) 
5440 ПЕЕСНК% (238) =HE XCHR ま ("ウロ の の の の の の の の は 1 
Е7Ғ の の の の の の の の の の 9981E7F の の の の 9 の の 9 の の の の の B1E ビ 7F " ) 
5450 DEFCHR$ (239) =НЕХСНКФ ( "400060587ЕҒЕҒ 
CFF 4 の 9 の E の SB7EFEFCFF 4 の の の ER の さ B7EFEFCFF " ) 
5460 DEFCHR$ (240) =HEXCHR ま ("の の の の の の の の の の の 
EBF の 999 の 9 の 9 の の の の の の EEF の の の の の の の の の の の の EEF " ) 
3470 DEFCHR$ (241) =НЕХСНКФ ("000000201С5Е7 
EFE 000000201СЗЕ7ЕҒЕ 000000201С23Е7ЕҒЕ") 


510 ВФ-НЕХСНК%("ЕҒОЕЯҒ4ЕБ25252") 
520 В%(7)-СНК%(ЕНІҒ) +TSTRING ま (ささ 。CHR ま (&H1 
С) ) +B$ 

550 

540 EH( の ) = ニー1 s BEH] (0) =6 

550 BH(1)=-1:BH1(1)=11 

560 ВН(2)-в: ЕНІ (2) =16 

570 BH(3)=11:BH1 (3) =21 

S8@ EH(4) 16: ЕНІ (4) =26 

590 ЕН(5)-21:;ЕВН1(5) = さ 1 

6 の の ЕН (6) =26: ЕНІ (6) = さら 6 

610 ВН(7) = さ 1 』 ВНІ (7) =4 の 

620 АТТАСКЕК 

650 BA$ (0) -НЕХСНК% ("080508") 

640 EA$ (1) =НЕХСНКФ ("18191A") 

550 НОУЕК ТАМК 

660 НТФ (0) =HEXCHR 和 まま ("6 の 611F1D1D7 の 71") 

670 НТ%(1)-НЕХСНК%("60611Ғ1р1р7272") 

5в@ NAIL SATURN 

690 NS$ (0) =НЕХСНКФ ("1Cé671F1D1D7477") 

700 NG ま (1)=HEXCHR ま ("1C671F1D1D7B79") 

710 CARGO の (CARGO mini) 

720 СФ (0,0) =HEXCHR ま も ("686E1F1D1D7A7E" ) 
750 С%(0,1) =HEXCHR ま ("6R6E1F1D1D7C7D" ) 
740 CARGO 1 

750 COE (1) =НЕХСНК® ‹"5А2@2@5Е") 

760 C*%(1,0@)=HEXCHR$ ("7A6C6D7E" ) 

770 СФ(1,1) =HEXCHK ま ("7C6C6D7D" ) 

780 CARGO 2 

790 СОФ (2) =НЕХСНКФ ("6420202020656") 

800 СФ (2,0) =НЕХСНКФ (" 7A6C6Dé6C6D7E'" ) 

810 С% (2,1) =НЕХСНКФ (" 7Cé6Cé6Dé6C6D7D'" ) 

820 CARGO 3 

820 CØ$ (3) =HEXCHR$ ("&A2020202020206RB') 
840 CC ま ( さ 。 の )= ニ HE XCHR ま ("フロ 6C6D6C6D6C6D7B" ) 
850 C$(3,1) =HEXCHR 生 ま ("リプ ビ 6C6D6C6D6C6D7D") 
вод POWERD SOLDIER 

870 FJ ま (の ) =HE XCHR ま ("BSB さ 1F1D1D929 さ ") 

880 FJ ま (1)=HEXCHR ま ("BB2B さ 1F1D1DB485" ) 

890 Р1%(2)-НЕХСНК%("828З1ҒІр109495") 

900 FC ま ( の ) -НЕХСНК%("88891Ғ1р109899") 

910 FC ま (1)= ニ HEXCHR 和 も ("BABE1F1D1D9A9E" ) 

920 РСФ (2) =НЕХСНКФ ("8С8ріғ1р1р9С9р") 

930 EOME РАТТЕКМ A 

940 BOH (0) =HEXCHRS$ ("F4FS1F1D1DF6F7") 

950 EO$ (1) =HEXCHR$ ("1E1DA4ASA6A71F1D1D1D 
1DBABESE6B71F1D1D1D1DASASAARAB1F1D1D1D1DB8 
R9RAERR') 

960 EOE (2) =НЕХСНКФ ("1E1DACADAEAF1F1D1D1D 
1DECBDEEBF1F1D1D1D1DC の C1C2C ミ 1F1D1D1D1DD の 
010205") : BO$ (3) =RO$ (2) 

970 НО%Ф (4) =НЕХСНКФ ("С4С51Е101рр4р5") 

980 Е0$ (5) =НЕХСНКФ ("CéC71F1D1DD6D7" ) 

990 В0%(6) =НЕХСНКФ ("C8C91F1D1DD8D9 " ) 
1000 EO$ (7) =НЕХСНКФ ("CACR1F1D1DDADER' ) : RQ 
$% (8) =В0% (7) 

1010 BOME РАТТЕКМ В 

1020 ЕО0% (0) =НЕХСНКФ ("34") 

1050 BOQ@$(1)=HEXCHR$("1E1DC81CC91F1D1D1D 
1C281C1F1D1D1DD81CD9" ) 

1040 EOO$% (2) =HEXCHR$ ("1E1DCA1CCBEB1F1F1D1D 
ірраісрв") 

1050 WALEING ARMY 

10060 WA$ (0) =HEXCHR ま ("CCCD1F1D1DDCDD " ) : WA 
$ (1) =WA$ (0) : WA$ (2) =HEXCHR$ ("CECF1F1D1DDE 
DF") 

1070 WA$ (3) =НЕХСНК®Ф ("F8F91F1D1DFAFE' ): WA 
$ (4) =WA$ (3) : WA$ (5) =HEXCHR ま ("FCFD1F1D1DFE 
ҒҒ") 

1080 SMOKE 

1090 1_К% (0) =НЕХСНКФ ("ЕЙЕ1") : ККФ (0) =НЕХСН 
R ま ("EAREE" ) Е 

1100 LE$ (1) =НЕХСНКФ ("E 2EZ' ) s ККФ (1) =НЕХСН 


2480 ОЕЕСНК® (242) =HE X( 音 I ド 和 ま ("の の の の の の の の の の の の 
の 2E の の の の の の の の の の の 9 の の の CE の の の の の の の の の の 9 の の の の SE" ) 
2490 DEFCHR ま (で 4 さ ) =HEXCHR 和 まま ("の の の の の の の の の の 1 の の 
Е7Ғ の 0 の の の の の の の 9 の 1 の の E7F 0000000000100Е7Ғ") 
5500 ПЕЕСНК% (244) =HEXCHR ま ("の の の の の の の の の の の の の 
000 の 71F ユ F7F フ 7FFFFFFF の の 71FSFSF7F7F7F ") 
5510 DEFCHR$ (245) =HEXCHR 和 も ("の の の の の の の の の の の の の 
000 E の OFBFCFEFEFFFFFF の の Eg ウ FBFCFCFEFEFE ") 
2520 ОЕЕСНК% (246) = ニ HE XCHR ま ("の の の の の の の の の の の の の 
000 FFFFFF7F7F コ F1F ウ 7 7F7F7F3FSF 1F の 7 の の " ) 
5550 ПЕЕСНК% (247) =HE XCHR 和 ("の の の の の の の の の の の の の 
000 FFFFFFFEFEFCFBE の FEFEFEFCFCFBE の の の "' ) 
5540 DEFCHR$ (248) =HEXCHR$ ("A021 0307 OF OF 0 
505 0001010101050303 000002070ғ080000") 
550 DEFCHR$ (249) =HEXCHRS$ (" SCF OEAF OF OF OF 
BFB 58ЕйЕ090100000С0 さじ 3 の COEOEOE の CO の の " ) 
2560 DEFCHR$ (250) =HEXCHR 和 ま ("の 7 の さ の 7F 1F 1F7 
FFE 0602060С1С181000 の 1 の さ の 7 の の 1 の の 6 の E の " ) 
2570 ПЕЕСНК%(251) =НЕХСНКФ ( "FFPFCSE7E261 
47C CgF の の の の の の の の の の の の の の の 1 の CO の の の の の の の の の " ) 
3580 DEFCHR$ (252) =HEXCHR$ ( "@z@F 1F 3F TF OF O 
FOF 0507070Е1Е0С0809 @%@91ЕЗЕ2Е@7@%@@") 
5590 DEFCHR$ (255) “НЕХСНК%("ЕОВОООВОВОВОВ 
ово CC の の の の の の の の の の の 8 の 8 の E の B の の の BB の B の の の の の") ° 
5600 DEFCHR$ (254) =HEXCHR$ ("QF 1F 3F ZDZRZRB7 
BØF 0101010200000000 080807020000020Е") 
3610 DEFCHR$ (255) «НЕХСНК%("воойдйасодеағағ 
QE の の の の の CO6 の の さ の 2 の の の の の の の の の の の の の の の の " ) 
5620 RETURN 


メイ ン ソー ス ・ リ スト ИИ ИИН 


R$ ("ECED") 

1110 (К%(2) -НЕХСНК%("ЕДЕЗ") : ККФ (2) =НЕХСН 
ККЛЕКЕРІ 

1120 LE$ (Z)=HEXCHR%$ ( "E&E7" ) : ККФ (3) -НЕХСН 
R$ ("F@F1") 

1150 LE$(4)=HEXCHR$ ( "ЕВЕ9") : ККФ (4) =НЕХСН 
R$ ("Р2Е3") 

1140 ' NUMBER 

1150 N$(@)=HEXCHR%$% ("1F9EQR1D1D1F9C9D1E1E 
“у 4 

1160 N ま (1)=HEXCHR 生 ("1C971D1F911D1F921E1E 
яз 

1170 N$(2)=HEXCHR$ ("9EQR1D1D1F9E9D1D1D1F 
99981Е1Е") 

1180 N$ (3) =HEXCHR$ ("9E9E1D1F941D1D1F9C9D 


ЖЕЛЕ) 


1190 N$ (4) =HEXCHR$ ("9E1D1F99961D1F921E1E 
") 

1200 № (5) «НЕХСНК%("92971р1р1Ғ99ӘБІПІПІҒР 

9СФОБДЕЛЕН) 

1210 N$ (о) =HEXCHR$ ("Q9EQR1D1D1F959R1D1D1F 

9C9D1E18E"“) 

1220 М%(7)-НЕХСНК%("92971Бр1Ғ911Бр1Ғ921ЕІЕ 
42. 

1220 N$ (8) =HEXCHR$ ("9EQR1D1D1F95941D1D1F 

9C9D181E") 

1240 N$ (9) =HEXCHR$ ("SESQR1D1D1F9C941D1D1F 

9C9D1E1E"”) 

1250 ELUS ま =HEXCHR ま ("1D1D") 

1260 STAGE DATA 

1270 50% (0) ="111С":50% (10) ="895959" 

1280 50% (1) ="2СССС": 50% (11) ="B の の の の " 

1290 50% (2) ="ЗАА": 50% (12) ="4000000000" 
1500 50% (2) ="1А4":580% (15) ="11111114" 

1510 50% (4) ="2Ғ": 50% (14) =" 17" 

1520 50% (5) ="2ғ99":80% (15) ="750000" 

1520 50% (6) ="В999":50% (16) ="BAAAA" 

1540 50% (7) ="9999":50% (17) ="В777" 

1550 SD$ (8) ="DDAAE'" 』 50% (18) =" 29ғ0000000" 
1360 S5D$(9)="22FF3":SD$(19)="3478AD" 
1570 50% (20) -"01224789АВСрЕҒ" 

1280 MX(1)=-1:MX(3)=1:MX(4)=—-1:MX(6)=1:M 
Х (7) = テー1 』 МХ (9) =1 

1590 МҮ(1) =1:МҮ(2) =1:МҮ(2) =1:МҮ (7) =-1 : МҮ 
(8) --1:МҮ(9)--і 

1400 FOR I=@ ТО 15: SOUND І,0: МЕХТ 

1410 WIDTH 40: SCREEN 0,0,0:С15 4: SCREEN 
1,1,1sCLB 4 

1420 SCREEN 0,0,0:Н5-0: Н5%= "000000" : ЕУ- 
1 の :LEV1=1 の : MOE=1: T じ の = の 

1450 COLOR 7,@,@,@:СбЕМ 0:С51І2Е 0:РКЫ 
1440 FOR I=2 ТО 7:FALET I,1:NEXT:FALET 1 
7 

, 

1450 FOR 65-0 ТО 1:5СКЕЕМ 0,656: СОЦ ОК 1,1 
1460 FOR I=@ ТО 24:1 ОСАТЕ 0,1:РКІМТ5ТКІМ 

G$ (40, CHR$ (%&H87)); 

1470 NEXT:COLOR 7 ' 

1480 FOR 1=9 ТО 13:LOCATE 7,1:РКІМТӘТКІМ 

G$ (25,СНКФ (#%H20)) ; 

1490 NEXT 

1500 GX=8:GY=10:G%="Flease keep on waiti 

ng. " 

1510 GOSUE"GR FAT" 

1520 NEXT: GS=1 

1550 бХ-8:бҮ12:06%-"Моғе few time, pleas 

е -” 

1540 GOSUE"GR РАТ" 

1550 FOR І-0 ТО 1:5СКЕЕМ 1,1,1 

1560 FOR 1-І TO 519 STEP 2 

1570 ГІМЕ(,7,152)-(,27%68,160),РБЕТ,1 

1580 МЕХТ 

1590 LINE (15,15) - (504,159) ,РЅЕТ,7,8 ` 
1600 LINE (15,160) - (204,199) ,РЅЕТ,7, Б 


ぁ 僕 は PiO を 85 年 4 月 に 初め て 買い まし た . 原因 は PiO で す . あま り に も オモ ロイ 名 前 に 思 を た ん で す ….「PiOPiO」 で も 「Pol」 で も な い 
「PiO」 こ の 名 前 が 気に入り すぐ で 買 っ て し まっ だ ん で す . これ か ら も ずっ と 出版 し つづ け て くだ さい. PS. 買っ て 後悔 し て ませ ん . 


OJOO 
а ree 


(野中 一 勇 ) 


1610 РАІМТ(0,0),7,%Н80 

1520 65=1:6Х=2: GY=21: 56%= "СОКЕ: " : GOSUE"G 

К РАТ" 

1630 БХ=22: БҮ=22: 6%= "1 ЕРТ: ": GOSUB"GR РАТ 
1640 GX=22: GY=23: G$="HI GHSCORE: 000000": G 

OSUE"GR FAT" 

1650 МЕХТ:11=0 

1660 FOR 1-0 ТО 1:5СКЕЕМ 1,J,J 

1670 FOR 1=501 ТО 17 STEF -3:11=11+1 
1680 LINE(I,145)-(I,151),PSET, (I1 MOD 5) 

+2 

1690 ІМЕ ‹1-1,145) - (1+1,145) ,FSET, (11 МО 

р 5) +2 

1700 МЕХТ:МЕХТ 

1740 TITLE” 

1720 COLOR 1,1:CGEN @:FOR I=2 TQ 7:PALET 
І,1:МЕХТ 

1750 FOR 1=15 ТО 24 

1740 LOCATE @,I:FRINTSTRING$ (40,СНК%(9%НВ 
EYI 

1750 NEXT 

1760 SC=0: 5С%:="000000":1=5: TC4=0 


1770 COLOR 7:CGEN Ø:PRW Ø:FALET 1,5:WAIT 


200:РАГЕТ 1,1 

1780 FOR I=@ TO 1:5СКЕЕМ @,I,IsGOSUB"G С 

LS 

1790 NEXT:SCREEN 0,0,0 

1800 FALET 1,1: 655=0: 6Х:=12: бҮ=1 1: бФ="НІбН 

SCORE: "+HS$ 

1810 GOSUE"GR ҒАТ": РАШЕТ 1,2: МАІТ 200: РА 

LET 1,2 

1820 ТІМЕ=0 

1850 GOSUE "EEY" 

1840 IF ТІМЕ“4 THEN GOTO 1820 

1850 FALET 1,2: МАІТ 2@@:FALET 1,1 

1860 GOSUB"EKEEY" 

1870 IF ТІМЕ<6 THEN GOTO 1860 

1880 GOSUE"G CLS":FOR I=2 TO 6gFALET 1,0 

:NEXT 

1890 FOR I=@ ТО 24:LOCATE @,I:sCOLOR 1:PR 

ІМТӨТКІМбС%(40, "#") ;: NEXT 

1900 FOR І-й0 TO 20 

1910 COLOR 7,0: СБСЕМ Ø:FALET 1,@:FALET 7, 

—(1=@) 

1920 ЕОХ(1,1)-(Х(29-1,24-1)," "sWAIT 1+1@ 

1920 NEXT: CLS 

1940 LOCATE 2,24:РБІМТІЕ mm БЕНЕН mü us 
к. иш ишш пш шш 

1950 LOCATE 3,24:FRINT" W НЫН | | 
н j“ E K K 

1950 LOCATE 3,24:FRINT" W ШШ аш = шн 
ни шинаны 

1970 LOCATE 2,24:ҒБІМТ" ЕН: ИШ ü иш ш 
и тю ú шин шоши" 

1980 LOCATE 2,24:РКІМТІШ ЕНЕ ЕЕ m G Б 
| иш юп ша ш" 

1990 FOR I=@ ТО 2:РКІМТ:МЕХТ 

2000 LOCATE 10,24:РКІМТ" ЕНЕ ШЕНЕ п ЕШ 


| г 

2010 LOCATE 10,24: ҒКкІМТ"Ш ШШ ü Би ú Ы 
| шн 4 
2020 LOCATE 1@,24:РК1МТ"Ш mE E ва E аш 
| | ш” 

2050 LOCATE 10,24:РКІМТ" ЕНЕ ШШ | иш 
ишш" 

2040 LOCATE 1й,24:РЕ1МТ"Ш ЕН sm E E E 
ш- 


2050 FOR I=@ TO 4:FRINT:NEXT:GX=13:6Y=11 
:6$="By 5.Моғіуата" 

2060 GOSUR"GR РАТ":бХ-10:бҮс15:б6%-"Ні% 5 
FACE оғ TRIGGER" : GOSUE" GR РАТ" 

2070 JL=Ø:R=4:FLAY"Li:L1:L1":FPALET 1,1:W 
AIT 200 

2080 FALET 1,S:WAIT 2 の の ziPQLET 1,7:ТС-0 
2090 GOSUE" SCORE": SCREEN 0,0,0: ССЕМ 0:ТС 
2-0 

2100 ЕФ-" ВЕ C D G+C+D А E D G+C B+C+D 
A G F C DE: A:O.F" 

2110 PLAY"V150"+STR$ (К) +MID$ (E$,24+(JL M 
OD 12)*2+1,2)+";V1002"+MID$(E$, (JL MOD 1 
2)*2+1,2)+";V1QQZ"+MIDS (E$, (JL MOD 12)+*2 
+1,2) 

2120 SOUND 7,56: SOUND 8, 10: SOUND 9,10:50 
UND 10,10 

2120 GOSUE"EKEEY": GOSUER"PFALET" 

2140 R=RND (8) : WAIT 1@@;ТС2=ТС2+1;ТС=ТС+1 
2150 LOCATE 10,13:COLOR (JL MOD 7) +1:РКІ 
МТ G$:COLOR 7 

2160 IF ТС MOD 2-0 THEN JL=JL+1 

2170 IF ТС2=96 THEN CLS: SOUND 7,63: GOTO 
"TITLE" ELSE GOTO 2110 

2180 #"FALET" 

2190 ТС@=ТС@+1:1Р ТС@=5 THEN FALET 6,0:Т 
C の = の 

2200 FALET ТС0%2,1:РААЕТ TC ウ -(TCOS 20) 。 の 
221@ RETURN 

2220 ж"КЕҮ" 

2220 TR=(STRIG(@) ОК STRIG(1) OR STRIG(2 
) ) 

2240 OUT %*H1C00 ,14:J1=( (INF (%H1BQQ) ОК 1 
91)=191) 

2250 OUT %Н1С00,15:202-((ІМР(ЕН1В0ОО) OR 1 
91)=191) 

2260 IF TR THEN JO1=-1: CANCEL: БОТО "GAME 
227@ IF (Ji ОК J2) THEN JO1=@:;CANCEL : GOT 
O0" GAME" 


piQ 


` 1)АК2 HIGH WAY ARMY1 メイ ン ソー ス ・ リ スト 


2280 А%-ІМКЕҮ%(0) 
2290 IF АФ-"С" THEN CANCEL:GOTO "СОМ" 
2200 IF А%=СНЕ%(®Н@2) THEN ROOT 

2310 RETURN 

2220 *"БАМЕ" 

2330 SOUND 7,62:500М0 12,0 

2240 SCREEN 0,0,0:РААЬЕТ 1,7 

2250 CLS:GOSUE"G CLS" 

2260 BO$=CHR$ (55) 

2570 FOR I=2 TO 7 

2280 FALET 1,0 

2290 NEXT 

2400 COLOR ,0:РКЫ 128 

2410 FOR I=@ TO 200 

2420 FSET(RND (287) +16,RND (128) +16,RND (5) 
+2) 

2420 МЕХТ 

2440 CLS: SCREEN 0,1,0:С16 

2450 GOSUE" SCORE" 

2460 GOSUE"LEFT" 

2470 ТС=@:Х=5:Ү=16 

2480 LV=Q@:BF=-1:SF=0:SEF=-1 

2490 і Ғ=0: BUN1 =0: BUC 1 =0: BUN=0: EUX=39: SD= 
2 
2500 FOR І-0 TO 10:ЕҒ(1)-0:ЕС(1) =0: МЕХТ: 
FOR 1=@ ТО 10:NF (1) =0: МЕХТ 

2510 СЕ=@:СР=@:Т1МЕ=51:НЕ=@:М56=@:ТК@=-1: 
BUC=Ø 

2520 ВФҒ-0:ВЕС-Ф:ВЕ-0 

2550 FOR C=@ TO 4 

2540 BEF (С) =0: BEC (C) =9 

2550 NEXT 

2560 500-0:501-0:502-0:605-0: 504=0:505=0 
:506-0:507-56:509-10 

2570 SOUND 8,10:500М0 9,10: SOUND 10,15 
2580 SOUND 11,7@:SDUND 12,0: SOUND 12,12: 
СӨЕМ 1 

2590 w"MAIN" 

2600 SOUND 0,500:500М0 1,501:6500М0 2,502 
: SOUND 3,SO03: SOUND 4,504 

2610 SOUND 5,505: SOUND 6,506: SOUND 7,507 
: SOUND 9,509 

2620 504-0:505-0: S07=56 

2650 IF ТІМЕ<20 THEN BF=-1:PALET 1, (ТС М 
Ор 7)+1 ELSE PALET 1,7 

2540 IF ВҒ<>-1 THEN GOTO "BOME!" 

2050 TR=(STRIG(@) OR (STRIG(1) OR STRIG( 
2))) 

2660 JOY=(STICK(@) ОК (STICEK(1) OR STICK 
(2999 

2670 A$=INKEY$ (0) 

2680 IF (A$=CHR$(&H16)) OR (MS=1) THEN G 

OTO"PAUSE" 

2690 MS MOVE 

2700 1'st TRIGGER MODE 

2710 Е=(((А%="7") OR (A$="z") OR TR) AND 
BEF ( (BEC+1) MOD 5) =0) AND TRØ 

2720 F=F AND FEC (EE) >1 

2720 IF F THEN GOTO 2740 ELSE GOTO 2750 
2740 TR の = の : EEC=BEC+1:BE=BEC MOD 5: ВЕҒ (ВЕ 
)ш-1:ВЕС(ВЕ) =Ø: BEX (ВЕ) =Х+2: BEY (ВЕ) =Y 
2750 IF ТК-0 OR ТІМЕ<50 THEN TRØ=-1 

2760 2'па TRIGGER MODE ` 

2770 OUT &H1C の の 。14』F=(INF(&H1E の の ) OR 191 
) =191 

2780 OUT &H1C の の 。15』F=F ОК ((INF(&H1E の の ) 

DR 191) =191 ) 

2790 F=(F OR ((A$="X") ОК (A$="x")) OR ( 

201 AND TR)) AND ((BØF=Ø) AND (V<17)) 
28@@ IF F THEN GOTO 2810 ELSE GOTO 2830 
2810 B の F=ー1 : BOX=X+1 : EDY=Y+1 

2820 CHANGE SHIP PUSITION 

2850 X=X+MX (JOY) : Y=Y+MY (JOY) 

2840 F=((X<2) OR (X234) OR (Ү<2) OR (Y>1 

7)) 

2850 IF F THEN Х=Х-МХ (JOY) :Y=Y-MY (JOY) 1 J 

оү-й 

2860 IF LF AND (МҮ(20Ү)--1) THEN 1Ғ-0:5% 

=SJ$:GOTO "S$" 

2870 IF (JOYS > の ) AND (Y=17) AND (LF=@) Т 

HEN GOTO 2880 ELSE GOTO 2900 

2880 S$=SJ$: LF= (MY (JOY ) =1) 

2890 GOTO "5%" 

IF Y=17 THEN GOTO 2910 ELSE GOTO 29 


SF= (TC MOD 2) 
2920 IF SEF<>ー1 THEN S*$=SS$:;:SF=0:SE=SE-1 
:60Т0 "S$" 

29530 S*$=SL%(SF) 

2940 IF (MX(JOUY) ぶ の ) ОК (SF1=@) THEN SF=Q@ 
:SF1=0:S*=SS*$ 

2950 IF MX(JOQY)>@ THEN SF1=1 

2950 IF MX(JOY)=-1 THEN 5%-5і %(ТС5) 

29702 60Т0"5%" 

2980 SE=SE+1:IF SE>6 THEN SE=6 

2990 SF=1:LF=0@:SF1=1 

5000 IF Ү>7 THEN 5%-5Ғ%(ТС5%1):650Т0 "5%" 
5010 5%-5Ғ%(ТС2) 

5020 ж"5%" 

2050 IF SMF=-1 THEN GOTO 3070 

2040 LOCATE X-2,18:PRINTLK$ (SMF) 

2050 SMF=SMF+1: IF SMF +4 THEN GOTO 5060 E 
LSE GOTO 5080 

5060 SMF=Q: IF Ү<>16 THEN SMF=-1 ELSE GOT 
о 2080 

5070 IF Y=16 THEN SMF=Q 

2080 МҮ SHIF BEAM 

5090 FOR С-0 TO 4 

2100 IF EEF(C)= の 9 THEN WAIT 1:GOTO 5150 


5110 507-24:ІҒ ВЕС(С)-й THEN БЕС (С) =1: 60 
TO 5150 

5120 LOCATE БЕХ (С) 。BEY(C) :РКІМТ LEFT$ (ЕФ 
«ВЕС(С)-1),29-ВЕХ(С)) 

5120 506-40-(ВЕС(С) ж5):505-0:504-40- (ВЕС 
(С) #5) 

2140 БЕС(С) =REC(C)+1: IF BEC (C) >8 THEN EE 
F (C ) =0 

5150 NEXT 

5160 FOR С=@ TO 4 

5170 IF BEC(C)=1 THEN LOCATE BEX(C) , BEY ( 
C):FRINT Б5Ф(КМр(2)):506-25: 504= 120: 505= 
“2 

5180 NEXT 

5190 МҮ SHIP BOME 

5200 LOCATE Х,Ү:РКІМТ5% 

5210 IF В@Р=@ THEN GOTO 5260 

5220 LOCATE БӨХ, BOY: BO$=CHRS$ (55+ТС5#2):Р 
КІМТЕ(0% 

5250 BØX=BØX+2: ЕЙҮ-БйҮЗ-2:504-255- (BOY #12 
):505- 

2240 IF (ЕйЙХ>57) ОК (BØY+19) THEN BQF=Q 


5260 IF (СЕ=@) OR (СЕ>4) THEN Sn9=1 の 』 SO2 
= っ の の ウー(RD* 1 の) : S03=TC MOD 1 の ELSE 502=1:50 
5-2:609-16 

5270 GOSUB"EN MOVE" 

5280 ТС-ТС%1:ТС4-ТС4%1:ІҒ ТС4-6000 THEN 
TC4= の : LEV=LEV+ (LEV: 1 ) 

5290 SD=TC4/ さ の 9: TCS= (TC MOD 2) : ТС2= (ТС M 
ор 3) 

5200 IF МОЕ-2 THEN SD=2g 

55210 BUN1=0: IF INSTR (50% (50), "Е") <>0 THE 
N BUN1=1 

3320 IF SD=19 THEN BUN1=2 

3330 BUILDING MOVE 

3340 ON BUN GOTO 3400, 3450, 3500 , 3530 
5250 LOCATE BUX 。16:PRINT BUS$;:PRINT#Ø,H 
EXCHR$ ("101100") 

5260 LOCATE ВОХ,17:РКІМТ BUS$;:FRINT#Ø,H 
EXCHR$ ("10110000") 

5270 LOCATE BUX, 1B:FRINT BUS$;:FRINT#Ø,H 
EXCHR$ ("10110000") 

5580 LOCATE EUX, 19:FRINT BUS$;:FRINT#Ø,H 
EXCHR ま ("1 の 1 10000" ) 

5290 GOTO 5550 

5400 LOCATE EUX,16:FRINT EUS$; :FRINT#O,H 
EXCHR$ ("10110001") 

5410 LOCATE ВОХ, 17:РКІМТ BUS$;:FRINT#Ø,H 
EXCHR$ ("10110000") 

5420 LOCATE ВОХ, 18: РКІМТ BRUS$;:PRINT#Q@,H 
EXCHR$ ("10110000") 

3430 LOCATE ВОХ, 19: РКІМТ BUS$;:PRINT#Ø,H 
EXCHR$ ("10110000") 

5440 GOTO 3530 

5450 LOCATE BUX,16:FRINT BUS$;:FRINT#Ø,H 
ЕХСНКФ ("101100") 

5460 LOCATE ВОХ, 17:РКІМТ BUS$;:PRINT#Ø,H 
ЕХСНКФ ("10110022") 

5470 LOCATE EUX, 18: РКІМТ ВОБФ; : РКІМТФ#О ‚Н 
ЕХСНКФ ("10110000") 

5480 LOCATE ВОХ, 19: РКІМТ ВБФ; : РКІМТФО ,Н 
ЕХСНЕ% ("10110000") 

5490 GOTO 5550 

5500 LOCATE ВОХ, 17: РКІМТВОФ (BUC) : S07=16 
3510 SD6= ミ ミー(BUC*4 ) : SG04= さ の : 505=В0С 

5520 BUC=BUC+1:IF ВОС>7 THEN EUC=@: EUN=4 
: EUC 1 = の 

5520 F=((AES(EUX-BOX ) <3) AND (В0Ү>15) AN 
р (BUN さ ) AND BØF) . 

5540 IF F THEN GOTO 2550 ELSE GOTO 5620 
3550 COLOR ,7:PALET 7,7 | 
3560 IF BUN=2 THEN GOTO 2570 ELSE GOTO 3 
590 

2570 5С-5С-20:ІҒ SCX の THEN SC=Q 

5580 GOTO 5600 

5590 SC=SC+BUN*10Q 

5000 GOSUE "SCORE" 

5610 COLOR ,Ø:FALET 7,0: EUN=3 

3620 BUX=BUX-SF:IF BUX<Q THEN BUX=39: ВОМ 
=EUN1 : EUC1=BUC1 +1 

3630 IF ТС4<40 THEN GOTO"SF" 

3440 SCREEN CHANGE 

5650 SCREEN TCS, ((TC-1) MOD 2), ((ТС-1) М 
ор 2) 

5660 IF SF=1 THEN GOSUB "PALET" 

3670 CONSOLE 0, 20,20,39: CLS: CONSOLE 

5080 501=1:1Ғ (SD MOD 2)=@ THEN 500-200- 
(TC MOD 2@)*1@ ELSE SD の =(TC MOD 20) +10 
Z690 GOTO"MAIN" 

5700 *"SCORE" 

3710 ТС1=ТС5 

5720 5С%=КІбНТФ "0000" +5ТКФ (SC) +" の" , 6) 
5750 CGEN Q:COLOR 5 

5740 FOR 10-0 TO 1:SCREEN ТС1,10,10 

5750 CONSOLE 21,3,0, 21: CLS: CONSOLE 

5760 LOCATE 8,21 

5770 FOR 1=1 TO 6 

5780 FRINTN も (VAL (М10%(6С%,1,10)9; 

5790 NEXT:NEXT: SCREEN TC1 。((TC-1) MOD 2) 
,((TC-1) MOD 2) 

5800 CGEN 1:COLOR 7 

5810 RETURN 

5820 *"LEFT" 

5820 CGEN 1:COLOR 1 

5840 FOR 65-0 TO 1:5СКЕЕМ ,65 

5850 LOCATE 27,21:PRINTSTRING$ (L , SS%+CHR 
ま (&H1E) ) 

5860 NEXT: COLOR 7 


45 


419) 


リス トク 2 HIGH WAY ARMY1 メイ ン 


5870 RETURN 
2880 +#"GR РАТ" 

5890 GAD=sH4000+GY%40+ (GX+ (1924%88) ) 1 GAD 
1=GAD 

3900 FOR б-і TO LEN(G$) 

5910 60%-МІ0%(05%,6,1):650%-і ЕҒТФ(СОРАТФ(А 
SC (60%) ) ,8) 

5920 FOR G ウ =1 TO 8 

5950 Gl*=MID$(G@$,G@,1):G1=ASC(G1$) 

5940 OUT GAD1, (255 AND (Gi ОК ((G1⁄2) XD 
К (біж?)))) 

5950 GAD1=GAD1+2048 

1960 NEXT 

5970 GAD=GAD+1:GAD1=GAD 

5980 NEXT 

3990 RETURN 

4000 *"EN МОУЕ" 

4010 CARGO 

4020 IF СЕ<>@ THEN GOTO 4050 

4030 IF КМО (200) =0 THEN CF=RND (3) +1: CF=C 
F:CX=38 

4040 GOTO "EMS" 

4050 IF CF THEN GOTO "CEOME" 

4060 IF СР-й THEN CX=CX-SF-((TC+1) MOD 2 
) ۰ 

4070 FO=TCS 

4080 IF СХ<1 THEN СЕ=0: GOTO "EMS" 

4090 Ғ%-5СКМ%(СХ,17,СҒж2):Ғ1%-5СКМФ(СХ,1 
В8,СҒж2) Ғ-(ІМ5ӘТЕ(Ғ%,В0%)<>0 ОК INSTR(F1% 
„ЕОФ) < >) 

4100 Ғ-Ғ ОК (ІМБТК (ЕФ, СНКФ (&HSZ) ) < >0 OR 
INSTR(F1% ,CHR$ (H52) ) < >Ø) 

4110 LOCATE СХ, 17:РКІМТ LEFT$ (СОФ (СЕ) 。 さ の 
GX) 

4120 LOCATE CX,18:FRINT LEFT ま ( じ ま (CF 。F の ) 。 
ワー ビ X ) 

4150 IF F THEN CF1=CF iCF=4 

4140 Ғ-(СҒ<4) AND ((Y=16) OR (Y=17) ) AND 

.(((X-CX)< (СЕҒҰя2-1)) AND ((X-ーCX) >ー1 ) ) 
4150 IF F THEN BEF= の 
4160 #"EMS" 

41702 FOR С=@ TO 10: 
ank etc.) loop 

418@ IF EF(C)=@ THEN GOTO "EACS" 

4190 IF ЕҒ(С)>9 THEN GOTO 4690 

4200 ' i*i Chr mode 

4210 IF ЕҒІ(С) THEN GOTO "8EOME" 

4220 ОМ ЕЕ (С) GOTO: "НОР", "ВАТ", "СКА, "ТА 
Р", "ВАБ", "BAW" , "HUN" , "НАТ", "MIN" 

4230 EX (Û) =ЕХ (Û) +VX (Û) : EY (C) =EY (C) +VY (С) 
4240 Ғ-(«ЕХ(С)<1) ОК (EX(C)>Z8)) OR (EY 
(С2<0) OR (EY(C) 218)» 

4250 IF F THEN EF (C =0: GOTO 4280 

4260 IF EF (C) +9 THEN БОБОВ "16HANTEI" EL 
SE GOSUE "BHANTE1" 

4270 LOCATE EX(C),EY(C):IF EF (C410 AND 
LEN(E ま )=1 THEN PRINT#O,E% ELSE PRINTE$ 
4280 NEXT 

4290 ' NEIL 

4300 FOR С-й TO 10: : 
etc.) loop 

4510 IF NF(C)=@ THEN GOTO 4390 

4520 ON NF(C) GOTO "NEI", "HTN", "ММ" 
4550 NX (C)=NX(C)+NVX (C)sNY(C)=NY(C)+NVY < 
(e 

4340 F=((NX(C)<@) OR (МХ (С) 5539) ) OR (NY 
(С2<0) OR (NY(C) >19) ) 

4550 IF F THEN NF (C) =0: GOTO 4390 

4560 LOCATE МХ (С) ,NY(C):FRINT N$ 

4570 F=((NX(C)=X) ОК (NX(C)=X+1)) AND (( 
NY(C)=Y) OR (NY(C)=Y+1)) 

4580 IF F THEN ВЕ=@ 

4590 NEXT 

Hedden characters 

4410 IF НЕ=@ THEN GOTO "HFPOS" 

F= ( INSTR (SCRN$ (HX, HY, 2) ,CHR$ (#H52)) 


ん 粗く も 


Enemy fightar 


Enemy missile (NEIL 


F=F OR 
(*H52))< >@) 
4440 IF F THEN GOTO "HHIT" 

4450 HX=HX-1 

4460 IF НХ<0 THEN НЕ=@: БОТО 4670 

4470 IF HF=2 THEN НЕ%-С%(0,ТС5) 

4480 LOCATE HX,HY:IF НҒ<>2 THEN PRINTHE$ 
ELSE FRINT#Ø, HEXCHRS ("Ø203") : LOCATE HX, 
18:FRINT#HO, HEXCHRS ("0405") 

4490 GOTO 4670 

4500 #"HFOS" 

4510 IF BUC1=1@ THEN BUC1=Q@:HF=1:HX=Z9:;H 
Y=RND (10) +2: НЕФ=НЕХСНКФ ("А2201Е1р1рВ2Вв5" 
):6070 4670” 

4520 IF КІСНТ%(5С%,4 
Х-59:НҮ-17:060Т0 4670 
4530 IF RND(1 の の の の ) =0 THEN HF=3:HX=39:HY= 
17: GOTO 4670 

4540 GOTO 4670 

4550 ж"ННІТ" 

4560 IF HF=@ THEN GOTO 4670 

4570 ОМ HF GOTO 4580,4610,4640 

4580 IF L ジ 4 THEN SC=SC+1000: GOSUE" SCORE" 
ELSE L=L+1:s:GOSUB"LEFT" 

4590 COLOR ,7:SOUND 4,30: SOUND 5,Ø:WAIT 

60: COLOR ,S:WAIT 60:COLOR. , 1:WAIT 60: COL 
OR ,0:504-60 

4600 GOTO 4660 

4610 LEV=LEV+(LEV>1):TC4=0@ 

4620 COLOR ,7: SOUND 4,60:SOUND 5,0: МАІТ 
60: COLOR ,Z:WAIT 6@:COLOR ,2:WAIT ¿@:COL 

OR ,0:504-90 


(INSTR (SCRN ま (HX ,HY+1 ,2) ,CHR$ 


›="21@@" THEN НҒ-2:Н 


こ (16KRAM) だ けし か あり ませ ん . 
Pi0 の 編集 部 な ら び に 読者 の 皆さん 、 VIC を 見 捨て な いで くだ きい . 


ソー ス ・ リ スト 


4650 GOTO 4660 

4640 ТІМЕ-0 

4650 COLOR ,7: SOUND 4,90: SOUND 5,@:WAIT 
60: COLOR ,6:МАІТ 60:COLOR ,4:WAIT 60: COL 
OR ,0:504-е0 

4660 НЕ=@ 

4670 RETURN 

4680 ' 2*2 Chr mode 

4690 IF EF1(C) THEN GOTO "16EOME" 

4700 ON EF (C)—9 GOTO “ТӨШ”, "РМА" "Нут", " 
NES" , "WAS" , "BAA" 

4710 GOTO 4250 

4720 #*"BBOME" 

4750 IF EC(C) >0 THEN GOTO 4760 

4740 SC=SC+SC(EF(C)):COLOR ,2:PALET 7,2 
4750 GOSUE"SCORE": COLOR 。 の 9:FALET 7,0 
4760 LOCATE EX(C) 。EY(C) :РКІМТ BOQ@$(EC (C) 
):507-16 

4770 506-21-(ЕС(С)%ж15):504-60-(ЕС(С» * さ の ) 
:505-0 

4780 LOCATE ЕХ (С) , 19: РКІМТ СНКФ (%H1D) 』" 


4790 ЕС (С) =ЕС (С) +1:ІҒ EC(C)= さ THEN EF (С) 
=0: EC (С) = の 』EF 1 (С) = の 

4800 GOTO 4280 

4810 *"16BOME" 

4820 IF ЕС(С)>0 THEN GOTO 4850 

4850 SC=SC+SC(EF(C) ) :COLOR ,5:FALET 7,5 
4840 GOSUE"SCORE": COLOR ,Ø:PALET 7,0 
4850 LOCATE ЕХ (С) ,EY (C) :РКІМТ ВОФ(ЕС(С)» 
:507-16 

4860 506-22-ЕС(С) ж2:504-64-ЕС(С) ж«8:505-0 
4870 IF EC(C)=@ THEN 504-50:50е-2 

4880 IF EC(C)=1 THEN S06= さ 1 』 SH5=15 

4890 LOCATE ЕХ(С),19:РКІМТ CHR ま (&H1D) ; " 


4900 LOCATE ЕХ (C) , 20: FRINT СНКФ (&H1D); " 


4910 EC(C)=EC(C)+1:IF EC(C)=9 THEN EF (C) 
=Ø: EC (C) =0: EF 1 (С) = の 

4920 GOTO 4280 

4950 *"8HANTEI" 


4940 Ғ-(«ЕХ(С)-Х) ОК (EX(C)=X+1)) AND て ( 


EY(C)=Y) OR (EY(C)=Y+1)) 

4950 IF F THEN ВЕ=@ 

4960 FOR С1=@ TO 4 

4970 F=((EY(C) =ВЕҮ (С1)) OR (EY(C) «ВЕУ(СІ 
)+1) ) AND BEF (Ci) 

4980 EF1(C)=EF1(C)〉) ОК (F AND (EX (C) > (EEX 
(C1) +ЕН (ВЕС (С1)-1)) AND (EX (C) < (BEX (C1) + 
BHi (BEC (C1) -1))))) 

4990 NEXT 

5000 EF1(C)=EF1(C) OR (((BØF AND EY(C)=1 
€) AND (BQY=18 ОК ВйҮ-19)) AND AES(EX(C) 
-B@X)< 2) 

5010 RETURN 

5020 #*" 1 оНАМТЕІ" 

5050 IF EF (С) =15 THEN GOTO 5090 

5040 Ғ= ( (ЕХ (С) =Х) ОК (ЕХ (С) =Х+1)) AND (< 
ЕҮ(С)-Ү) ОК (EY(C) =Y+1 ) ) 

5050 IF F THEN ЕҒ-й 

5060 F= (INSTR (5СКМФ (ЕХ (С) ~1 。EY(C) ,4) |, CHR 
Ф (%*%H52))<>@ OR INSTR(SCRN$(EX(C)-1, EY (C) 
+1,4) CHR$(&H52)) < >0) 

5070 EF1 (С) =F ОК (((BØF AND ЕҮ‹С) =17) АМ 
D (BOY=18 ОК В0Ү-19)) AND (AEBS (ЕХ (С) “BOX 
)<2 ОК АЕБ (ЕХ (С) +1+80Х) 2) ) s IF EF1(C) ТН 
ЕМ ЕСС) = の 

5080 RETURN 

5090 ЕР= ( (ЕХ (С) =Х) ОК (ЕХ (С) =Х+1)) OR ((E 
X(C)=X-1) ОК (ЕХ (С) =Х-2)) 

5100 F=F AND ((EY(C)=Y) ОК (EY(C)=Y+1)) 


5110 F=F OR ((EM(C) >-1) AND ((EY(C)<Y) ñ 


ND (YS(16+EM(C) ) ) ) ) 

5120 F=F AND ((EX(C)=X) ОК (EX(C) =X+1 ) ) 
5150 IF F THEN BEF= の 

5140 GOTO 4980 

S130 ж“СВОМЕ" 

5160 IF СҒ>4 THEN GOTO 5190 

5170 SC=SC+30: COLOR ,6:FALET 7,6: GUSUE" ら 5 
CORE" 

5180 COLOR ,Q:FALET 7,0 

5190 IF (CX+CF1)<4@ THEN LOCATE CX+CF1,1 
7:РКІМТВО%(СҒ-4) ELSE GOTO 5220 

9200 LOCATE CX+CF1,19:FRINT CHR$%(%H1D) ; " 


5210 LOCATE CX+CF1,20:FRINT CHR$(&H1D);" 


5220 507-16:506-356- (СҒж2) : S04=RND (90) : SO 
5-0 

5250 IF CF=4 THEN 506-21:505-15 

5240 CF=CF+1:IF CF=12 THEN СҒ-0 

5250 СХ-«СХ-ӨҒ IF СХ<0 THEN СЕ=@ 

5260 GOTO "EMS" 

5270 *"EACS" 

5280 WAIT š 

5290 IF RND(LEV*1@)<>@ THEN GOTO 4280 EL 
SE EW(C)=-1 

5500 ЕР (С) =VaL ("&H"+MID$(SD$ (SD) ,RND (LEN 
(50% (50) ) ) +1 。1 ) ) 

5510 IF СР>0 AND CX> さ の THEN ЕЕ (С) =1 1』EM( 
С›=СР:СР=СР-1 

5520 EX(C)=Z8:IF EF(C)=Z OR EF(C)=7 THEN 
EX (С) =RND (40) 

5550 EY(C)=RND(18):IF EF(C)=3 THEN EY (C) 
=19 

5540 IF EF(C)=7 THEN ЕҮ‹С) =@ 

3350 EF1(C)=@0@:GOTO 4280 

5560 #*"BROMB!" 


РАЦСМИСУІС-10010<-АЖЖат3%10/%.(4В88р.69). か つて VIC ユ ー ザ ー だ っ た 私 と し て は 。 


革 は 私 た ち が パ ッ ク マ ン と か スペ ー ス トラ ベル で 遊ん で いた け E, 今 は 何 の ゲ ー ム 
それから, 作者 の シリ ウス さん 、 あり が と 


5570 IF EC の THEN GOTO. 5290 
5580 L=L-1 

5290 LOCATE Х,Ү:РКІМТВО%(ВС):507-16 
5400 50в6-22-<(ЕСж4)::504-20:505-22-(ВСж4): 
507=0:509=15 
5410 EBC=EC+1:IF ВС<9 THEN БОТО 5450 
5420 ВС=0:ІҒ LØ THEN GOTO"GAME OVER" EL 
SE GOTO" GAME " 
5450 GOTO 5270 
5440 ж"бАМЕ OVER" 
5450 SOUND 7,63: SOUND 12,0:ҒОБК I=@ ТО 1: 
SCREEN 0,1,1:С15:МЕХТ: ЕУ- ЕУІ 

5460 SCREEN 0,0,0:6Х-11:6Ү-7:06565-0:60%-"Үо 
ur GAME was over": GOSUE"GR РАТ" 

5470 F=3:F1=1:REFEAT 
5480 HSØ=VAL (MID$ (HS$ ,F1,1)):SC0=VAL (MID 
%(5С%,Ғ1,1)) 

5490 IF HS@=SC@ THEN F1=F1+1 ELSE Е=(Н5@ 
+ SCA) 

5500 IF F1:6 THEN Ғ-0 
5510 UNTIL F< >Z 
5520 IF F THEN HS=SC:;:HS$=SC$; GX=10: GY=9; 
6%-"Үоци get HIGHSCORE !!"; OSUBR"GR FAT": 
GX= 32: GY= 23: G$=HS$: FOR GS=@ TO ts:GOSUE"G 
К FAT":NEXT 
5550 GX=11:GY=12:G$="Your SCORE ;"+SC$;G 
OSUE"GR РАТ" 

5540 ТІМЕ-0:Ғ-0:БЕРЕАТ 
5550 FQ@=ASC(INKEEY$(@)):F1=STICE(1):F2=ST 
ІСК (2) 


5560 IF «ҒізВ ОК F2=8) AND Е=@ THEN F=1 
9970 IF (Fl=é ОК Е2=&) AND F=1 THEN F=2 
5580 IF (F1=2 OR F2=2) AND F=2 THEN F=Z 
590 IF (Ғіс4 OR F2=4) AND F=3 THEN F=4 
5600 IF (Fl=8 OR F2=8) AND F=4 THEN Е=5 


9610 IF Fø=13 THEN F=5 

5620 UNTIL TIME:1@ ОК F=5 

56520 CGEN Q:GOSUER"G CLS";GOTO"TITLE" 
5640 #"HOF" 

650 VX (C)=SF*-1 

| 5660 IF (ABS(EY(C)—-Y)<2) OR (ЕҮ(С) <2) ТН 
ЕМ EW(C)=EW(C)*-1:VX (С) =УХ (С) - 1: ЕФ=СНЕФ ( 
H1 3) : GOTO 5720 

5670 IF EY(C)<>18 THEN GOTO 5710 

ら 6B ЕФ=СНКФ (НІЗ) 

9690 IF RND(4)=@ THEN EW (C) =A: GOTO 5720 
5700 IF EW(C)=1 THEN EM(C)=ー1』VX(C) =VX (C 
)-1:650Т0 5730 

8710 Е%=СНК%(%Н12) 

5720 IF EW(C)=@ THEN Еж-СНБ%Ф(%Н14%ТС5):У 
X (C) =VX (C)~1:EY(C)=18 

5750 VY(C)=EW(C):GOTO 4220 

5740 #" BAT" 

57530 EY(C)=18:VY (С) =0: VX (C)=—-SF:Es*$=CHR$ ( 
6+TC5 ) 

5760 GOTO 4220 
5770 #"CRA" 
5780 IF EM(C) デ ジー1 THEN GOTO 5800 

5790 VX(C)=SGN(X-EX(C)):VY(C)=-1:EW(C)=0Q@ 
5800 E$=CHR$ (%H16+TCS) 

5810 GOTO 4220 

582ø0 #"TAF" 

58370 IF EW(C)<>—-1 THEN GOTO 5850 

5840 EW(C)=RND (5) +2: VY (C) =RND (3) “1: VX (С) 
= (RND (3) +1) #—1 

5850 ЕФ=СНКФ (%Н@Н+ТС2) 

5860 IF ЕШ(С)<% AND EW(C)>@ THEN E$=CHR$ 
(HBー((EM(C) =1) #2) ) 』VX(C) =0: VY (C) =Ø: 504 
-10-ЕЫ(С)ж10:505-0; 506=5-EW (С) :807=16 
5870 IF EW(C)>@ THEN EW(C)=EW(C)-1:GOTO 
агза 

588@ FOR С1=@ TO 4 

5890 F=RND(11):IF NF (F)=@ THEN NF (F)=1:N 
X(F)=EX(C):sNY(F)=EY(C):NVX(F)=-2;NVY (Е) = 
RND (30-і 

5900 NEXT 

5910 ЕИ(С) =—1: GOTO 4220 

5920 +#" EAS" 
VX(C)=SF*-1:VY (С) =0: ЕФ=СНКФ (&H1E+TC 


ІР (ЕХ (CIST ОК 
(С) >15) THEN БОТО 4220 

5950 F1=17ーEY(C) 』 IF F11 THEN F1=1 

5960 FOR С1=@ ТО Ғ1/5 

5970 F=RND(F1)+1:LOCATE ЕХ (С) -ЅЕ,ЕҮ (С) +F 
:РКІМТСНКФ (%#HZ2+ (C1 MOD 2)) 

5980 NEXT 

5990 GOTO 4250 

000 *" BRAW" 

6010 VY (С) =0: ЕФ=СНКФ (%H@E+TC5) 

6020 GOTO 4230 

6030 *"'HUN" 

6040 IF EW(C)<>—-1 THEN GOTO 6060 

6050 EW(C) =RND (15) +5 

6060 VX(C)=(SF+1)*-1:VY(C)=1:E$=CHR$ (НІ 
B+TC5 ) 

6070 EM(C) =EM(C) 一 1』TF ЕМ(С)<2 THEN VX (C) 
=0:УҮ(С) = の ELSE GOTO 4220 

6080 E$=CHR$ (&H2I-EW (С) ) : S504=60-EW(C) #5: 
505=0: 505=ЕМ (С) :507=16 

6090 IF ЕМ(С) =0 THEN ЕЕ (С) =0 ELSE GOTO 4 
250 

6100 FOR Сі-й TO 2 

6110 F=RND (11) 

6120 IF NF (F)=@ THEN NF (Е) =1: МХ (Е) =ЕХ C) 
s NY(F)=EY(C) :NVX (Е) =SGN(XーNX (Е) ) #2: NVY (F 
)=C1-1 

6120 NEXT: БОТО 4250 

6140 ж*"НАТ" 


(ЕХ (С) 259) ) OR (EY 


うれ し る ょ な つか し る て いっ ぱ 
いで す . 実は , 私 の 母校 の 物理 部 に は, 今 も VIC が 置い て あり ます . し か も 装備 も 貧弱 で . 本 体 ・ テ ー プ レコ ュー ダ ・ 帳 黒 テ レビ ・VIC-1111 


ム が ある ん で し ょ う ね . 
5 ご ざい ます . VIC は 人 不 減 


Де 


リス トク HIGH WAY ARMY1 メイ ン ソー ス ・ リ スト 


D(2 り ) = の ) ) THEN УХ (С) =0: МЕ (Е) =2: МХ (Е) =EX ( 7220 NC (C)=NC(C)+1:;:IF NM(C) THEN GOTO 72 
C)y-1:NY(F)=17:LOCATE МХ (Е) , 17: РКІМТНЕХСН 50 
БК%Ф("641р1Ғ7А"):504-0:505-15:506-16:507-1 220 NVX(C)=-1-SF:NVY(C)=-1:N$=CHR$ (&H65 
Ф )zIF NC(C) =5 THEN МФ-СНК%(%Н69) 

6690 GOTO 4220 7240 GOTO 4520 

6700 *"NES' 7250 ом мс(Сс)-2 GOTO 7270,7280,7290, 7300 
6710 E%=NS$% (TCS) :ЕҮ (С) =17 , 7310,7510,7320, 7330,7540,7340, 7 さ 5@ 。 7 さ 6 の 
6720 VY(C) = の :VX(C)=(TCBT+GF ) ж-1 7260 NF (С) -0:60Т0 4390 

9750 F=RND(11 ) 7270 N$=CHR$ (SHOT) : МУХ (С) =—-1—SF:NVY (С) テー 
6740 IF ((NF (F)=@) AND (RND (10) = の ) ) THEN 1:60Т0 45350 

VX (С) =Ø: NC (F) =Ø: NF (F)=%:NX (F)=EX (С) з МУ ( 7280 N$=CHR$ (#H&5S):GOTO 433 

F)=17:LOCATE МХ(Е),17:РКІМТСНК% (%Hé66) : SQ 7290 N$=CHR$ (HOS) : NVY(C) =0: GOTO 4550 
4297: 509=0: 506=51:9507=16 7200 N$=CHR$ (&H75) МУУ (С) = ニー1: GOTO 4520 
4750 GOTO 42:20 7210 М%-СНК%(%Н75) :NVY (C) =0: GOTO 4330 
5700 #"WAS" 7220 N$=CHR$ (&H68) : МУУ (С) =1: GOTO 4330 
6770 EY(C)=17:VY(C)=0:E$=WA$(TC MOD 6) 75250 N ま =CHR* ま (&H68) : NVY(C) =0: GOTO 4330 
6780 VX(C)=((TC MOD 5) =0) OR ((TC MOD 6) 7540 N$=CHR$ (HOB) : NVY(C) =1: GOTO 4220 
ші) ; 755@ N$=CHR$ (%Н&8):МУХ(С)›=@:6бОТО 4330 
9790 GOTO 4230 7560 NF (C) =0: GOTO 4590 

800 #'" EAA" 7570 #"G СЗ" 

9810 E$=BA$ (TCS) 7280 1.1ІМЕ(16,16)-(202,142) ,РБЕТ,0,ЕҒ 
6870 VX (С) =SGN( (RUX-1)—-EX (C) ) + (ABS ( (RLIX— 7390 RETURN 

EX(C) ) 410) 一 (RND( さ ) =2) ) 7400 ж"сом" 

68250 VY (C)=SGN(S+C—E.Y (С) ) 7410 GOSUR"G CLS": COLOR 7,0,0,0:С15:С0М6 
о840 IF (SGN(VX(C) )=ー1) AND (RND(2)=1) Т OLE: COLOR 7,0,1:CGEN 0 

НЕМ VX (C) =VX(C) =1 7420 FALET 1,7:FOR I=2 TO 7:PALET 1,0:МЕ 
6850 IF EW(C)>—-1 THEN VX (С) =ーSF 』 VY (С) = の XT: SOUND 7,65: SOUND 15,0 

6860 ЕХ (С) =ЕХ (С) +VX (С) :EY (С) =EY (С) +VY (С) 7420 БХ=8: БҮ=8: 5%-"Моде? (NORMAL: 1 /SUFER 
6870 IF EX(C)<1 ОК ЕХ (С) %38 THEN ЕЕ (С) =0 || : 2) ": GOSUB"GR РАТ" 

: GOTO 4280 7440 IF MOE=1 THEN LOCATE 22,8 ELSE LOCA 
6880 IF ЕҮ(С)<1 THEN EF (С) =0: GOTO 4280 TE 30,8 . 

4890 IF EY(C) >14 THEN ЕҮ (С) =14 7450 РКІМТ"Ш" 

6900 GOSUE" 1 6HANTE 1 " 7400 АФ=ІМКЕҮФ (0) : ІР А%<>"1" AND A$<>" 2" 
5910 LOCATE ЕХ (С) ,ЕҮ (С) : РКІМТФО , ЕФ THEN GOTO 7460 

56920 IF ((RUX=EX(C)) AND (BUN=1)) AND EY 7470 LOCATE 8,8:COLOR 7,0,0: РКІМТСНКФ (ЕН 


6150 VX(C)=-1:zVY (C) =0: ЕФ=СНКФ ‹&Н®@+ТС5) 
160 IF ABS(X-EX(C))<é ОК EW(C)=@ THEN E 
W(C)=@:VY(C)=SGN(Y-EY(C)):VX(C)=-1—-SF 
6170 IF EW(C)<>@ THEN GOTO 4220 
6180 F=TC2 
6190 IF Е=@ THEN ЕФ:=НЕХСНКФ ("1EZ81F1D1DS 
821381D1D1F 38") :GOTO 6220 
6200 IF F=1 THEN E ま =HEXCHR ま ("1E さ 61F1D1DS 
622 づ 6 ら 1D1D1F さ 6" ) : GOTO 6220 
6210 E ま =HEXCHR 和 も ( "1E1D さ 61C さ 61D1D1FE1F1D1 
D さ 61 に さら 6" ) 
6220 806= (F+1) #10: SO04= 30: SOS=F #5: 6507-16 
6250 F=((EX(C)=X) ОК (EX(C)=Xー1) ) OR (ХЕ 
X(C)=X+1) ОК «ЕХ(С)-хж2)) 
6240 F=F AND (((EY(C) =Y) OR (EY(C)=Y-1)) 
ОК ((EY(C)=Y+1) OR (EY(C)=Y+2))) 
6250 IF F THEN EF= の 
ө260 GOTO 4230 
270 *"MIN" 
ө280 ЕФ=СНКФ (%H1D) 
6290 УХ(С) «БҒж-1:ІҒ EW(C) THEN VY (С) = の 
6 さ の の IF LEV<6 AND КМО (50) =1 THEN VY(C) = 
GN(Y-EY(C) ) УХ (С) =—-1:ЕМ (С) =0 
6310 GOTO 42350 
6520 *"TSU" 
5520 E*=HEXCHR ま ("6E6F1F1D1D7E7F") :ІЕ EWt 
С)<>-1 THEN GOTO 6550 
6240 EW (С) =RND (40) +1: УХ (С) =- 1: УУ (С) = の 
9250 IF ЕМС) <>0 THEN EM(C) =ЕМ (С) ~ 1: GOTO 
425 ° 
6560 EW (C) =RND (40) +1: VY (C) =RND (3) =1 
6370 VX (С) =RND (2) +1 
63B FOR С1=@ ТО 2:F=RND (11) 
5290 IF NF (F)=@ THEN NF (Е) =1: МХ (Р) =EX (С) 
:NY (F) =EY (C) +1: МУХ (РЕ) =SGN (X=NX (Р) ) #2: МУҮ 


шСі-і (С) +5 THEN EW(C)=@:GOTO 6960 ELSE EM(C)= || 1А):СО ОК 7,0,1 
6400 NEXT: БОТО 4220 -і 74802 MOE=VQL (A$): IF МОЕ-і THEN LOCATE 22 
6410 #"FWA" 6920 E*=SCRN$(EX(C)+1,18) ‚8 ELSE LOCATE 20,8 


7490 FRINT"BW':GY=10:G#$="Level?(LOW;9 "+C 

НКФ (%H1D)+STR$ (LEV1 =1) +СНКФ (НІС) +" Ø:HI 
GH) ": GOSUE"GR FAT": LOCATE 22,10: РКІМТ "Е" 
7500 АФ-ІМКЕҮ%(0):ІҒ ¿(ASC(A$%$)<%HZ@) OR ( 
ASC (АФ) >%Н29) THEN GOTO 7500 

7510 LEV1=VAL (АФ) +1: LEV=LEV1: GX= 21: бФ=" Г 
"+A%+'' J": GOSUE"GR РАТ" 

7520 LOCATE 21,10: РКІМТ" ШЕШ" 

7520 GX=11:GY=12:G$="Are you sure? (Y/N) " 
s GOSUE"GR РАТ" 

7540 A%=INEEY$ (Ø): IF (A$ >"Ү") AND (АФ 2 
"N") THEN GOTO 7540 

7550 IF A$="N" THEN GOTO "COM" 

7500 COLOR 7,0,0 ,0: CLS: БОТО "TITLE" 

7570 #"FAUSE" 

7580 АФ=ІМКЕҮФ (0) 

7590 IF АФ=СНКФ (13) THEN М5=0: GOTO 2710 
7500 IF A$=CHR$ (%H12Z) THEN MS=1:WAIT 500 
s FLAY "У1005С9:У1005Е9:9У1005659":; SOUND 7, 
164: SOUND 8,10: SOUND 9,10: SOUND 10,15: GOT 
O 2710 

7610 GOTO "FAUSE" 

7620 #"SP" 

7650 COLOR 7:CGEN 0 

7640 IF (TC4=38) OR (TC4=2) THEN COLOR 5 
70650 IF ((TC4= さ 9) ОК (TC4=1)) OR (TC4=0) 
THEN COLOR 1 

76600 LOCATE 12,9:FRINTHEXCHR$ ("9A1C9A909 
79А98909А") 

7670 LOCATE 12,10:РКІМТНЕХСНК%("911С9594 

9191959491") 

7680 LOCATE 12,11:FRINTHEXCHR$ (99909990 

9C9899909990" ) 

76902 LOCATE 24,9:РКІМТМ%(0) 

7702 LOCATE 26,9: РКІМТМФ (VAL (RIGHT$ (STR$ 
(LEV-1),1))) 

7710 CGEN 1:COLOR 7 

7720 GOTO 5650 


940 IF ((ЕФ=СНКФ (5) ОК Е%-СНК%(7))) AND 
ЕҮ (С) 259 THEN ЕМ (С) =2 ELSE EW(C)=-1 

6950 IF EW(C)=-1 THEN ЕР2 (С) =0: GOTO 4280 
0960 IF ЕҒ2 (С) =1 THEN GOTO 6980 

8970 LOCATE ЕХ (С) +1 ,ЕҮ(С) +1: PRINTSTRING ま 
((15+EW(C))—EY (C) ,CHR$ (&HIZ) +СНКФ (%H1D) + 

CHR$ (HIF) ) :ЕЕ2 (С) =1: S04=45: 505=0: S06=5: 
507=@: GOTO 4280 

6980 LOCATE ЕХ (С) +1 ,EY (С) +1:FRINTSTRING$ 
((15+EW(C))—EY (C) ,CHR$ (&HIZ+TC2) «СНК% (B&H 
1D) +СНКФ (HIF) ) 

6990 F=RND((15+EW(C))—-EY(C))+1:LOCATE ЕХ 
(С) +1,EY (С) +F: РКІМТСНКФ (%H21) 

7000 IF RND (50) < +2 THEN GOTO 4280 

7010 С1=0: КЕРЕАТ 

7020 F=RND(11):F1=RND(11):IF F=F1 THEN б 

ото 7020 

7020 IF (EF (Е) < >20) ОК (EF (F1)<2>@) THEN G 

OTO 7090 

7040 EF (Е) =6: ЕЕ (F1) өз ЕҒ (С) =5: 504= 150: SO 

5=0: 506=16:507=16 

7050 ЕХ (Е) =ЕХ (С) 1 ЕХ (С) =ЕХ (С) +1:ЕХ(Р1) = 

ЕХ (С) +2 

7060 EY (Е) =ЕҮ (С) siEY(F1)=EY(C) 

7070 УХ (Е) =--2: УХ (Е1) =1: УУР) = の の: VY(F 1 ) =0: 

Сігі 

7080 LOCATE EX(C) 。EY(C) : РКІМТНЕХСНКФ ("21 

0921") 

7090 UNTIL (Сізі) ОК (RND(3)=Ø) 

7100 GOTO 4280 

7110 ж"МЕІ" 

7120 IF МУХ(С)<0 THEN N$=CHR$ (®&Н24+ТС5) 

ELSE М%=СНК% (%H26+TC5) 

7150 IF NVX(C)=@ THEN NF (C)=0:GOTO 4590 

714@ GOTO 4330 

7150 *"HTN" 

7160 NVY (С) -0: N$=CHR$ (&Н&62+ТС5):МУХ (С) =- 

2 

7170 GOTO 433 

7180 #"NSN" 

7190 IF NC(C)=@ THEN NC(C)=1: GOTO 7210 

7200 IF Y=17 THEN NM(C)=ー1 ELSE NM(C) = の 

7210 IF NC(C)=1 THEN МС(С) =2: БОТО 4290 


6420 IF ЕМ(С) <0 THEN GOTO 6490 

6430 EY(C) =16』VY(C) = の 

6440 IF СЕ>2 THEN EM(C)=ー1』VY(C)=ー1』VX(C 
ш-1:ЕФ-Р0%(0):60Т0 4250 

6450 EX(C)=CX+(CF-EW(C))+*2+1 

6460 IF ((ЕХ(С) <40) AND (EX(C)>@)) AND ‹ 
EY(C)>@) THEN GOSUE" 16HANTEI" : LOCATE EX( 
C) ,ЕҮ(С) :РКІМТ НЕХСНКФ ("80811ғ1р109091") 
6470 IF ЕХ (С) <25 THEN LOCATE ЕХ (С) ,ЕҮ (С) 
s РКІМТНЕХСНКФ ("20201р1р1Е2020") :ЕМ (С) =ー1 
s VY(C)=ー1』VX(C) =-1:ЕФ=РЈФ (0) : GOTO 4220 
480 GOTO 4280 

6490 IF ЕУ(С)<217 THEN GOTO 6540 

6500 IF VY(C) 50 THEN ЕФ-НЕХСНКФ("АОА11ҒІ1 
D1DEgE1") : VY (С) =0: GOTO 6520 

4510 ЕФ=РЈФ (ТС5+1) +ККФ (TC MOD 5):УХ(С)-б 
FW 4%1 

6520 IF ЕҮ(С) >17 THEN EF (C)=—1 

4532 GOTO 4230 

6540 IF VY(C) : の AND EW(C)=-1 THEN Рі=0: Е 
Ф«НЕХСНК%("ВЕВҒІҒІрІр9ЕОҒ") ELSE Ғ--1:Е% 
“НЕХСНК%("86871Ғ101р9697") 

6550 ом TC MOD (8+LEV) GOTO 64570, 6380 , 646 
д0, 600, 600, 600 , 6570 

568 GOTO 6600 

5570 VX (C) == 1—SF: VY (C) =RND (3) ~1: GOTO 660 
2 

6580 F=RND(11) :VX(C)=1 

9590 IF NF (F)=@ THEN NF (F)=1:NX (Р) =ЕХ (C) 
NY (F)=EY(C):NVX(F)=-ü2:sNVY (F) =RND (3) ~1 
5600 IF КМр (50) =1 AND F THEN VX (С) =0: VY ( 
С) =0: EW(C) =-2:Е%=РСФ (O) :EW(C)=-3: GOTO 42 
50 

6610 IF EM(C)=ー ミ THEN Е%Ф-РС%(1):ЕМ(С)--4 
: GOTO 4220 

06620 IF EM(C)=ー4 THEN ЕФе-РС%(2):УХ(С)--2 
 ШМҮС(С) “БӨМ(ЕҮ(С)-Ү) 

66 さ の GOTO 4220 

664@ #"HVT" 

6650 ЕФ-НТ%(ТСӘ):ЕҮ(С) =17 

6660 VY (C) =0: УХ (C)=(TCS+SF)*—1 

6670 F=RND(11 ) 

6680 IF ((NF(F) = の) AND (EX(C) #1) AND (RN 


入信 人 人 人 人 人 人 人 人 人 人 信人 人 人 人 人 人 人 人 信人 人 信人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 信人 人 人 人 信人 / 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 人 
YYYYYYYYYYYYUYYYYYYYYYYY XX M "a か XY 7% e” маа" ber 0000000000000000000000000000 
人 人 信人 人 人 人 人 人 入信 人 人 人 人 入信 入信 人 人 信人 人 人 人 人 人 ヘ 人 ヘ ヘ 人 人 Ж GE а. ШЕ АУ A" A ) ) Ж, ЯУ АУАУ) 80000000000000000000000009090 
YL CT CELLET 4 б ” Q Ф % сафе” 68” 4 00000000000000000090000900 
УУУУ У е, ペッ COS MAA ишә ек ж.ж... ААХХХ ЖҰЖ 
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パソ コン サン デー 第 7 期 ス ター ト 


テレ ビ 東 京 , テレ ビ 大 阪 , テレ ビ 愛 知 な | や ニュ ー メ ディ ア な どの 最新 情報 ,。 パソ ンコ 
と ど で 放 映 さ きれ て いる パソ コン 情報 番組 “っ * | ン ・ グ ラフ ィ ッ ク の 解説 な ど ), パパ ツユ コン 道 
ソコ ュ コンサ ン デ ー" の 第 7 期 が , 4 月 7 日 よ | ШЕ, パソ コン を 楽し みな が ら 使 うた め 


бле Б 4 00 as の 話題 が 盛り だ くさ ん で す . 
番組 の 内 容 は , マソ コン ・ レ ポー ト ( ゲ | <《 放 送 日 時 〉 
ー ム ・ ソ フト な どの 紹介 。 パン コン の 意外 毎週 日 曜日 AM.9 : 30—10 : 00 


な 使い 方 な ど ), 持 集 コー ナー( デ ー タ 通信 


だ ん な ん た だ っ て Very Important Computer だ か ら ね . ア . (これ か ら も VIC だ ノ の 金山 啓司 ) 
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この ゲー ム の スト ー リ ー は , 皆様 の ご 相 
像 に お 任せ し ます . 

また , タイ トル 名 の “DEVILON" に つ 
いて で す が , 意味 は まっ た くく ありません. 


プロ グラ ム ・ イ ン フ ォ メ ーション 


自 機 の 操作 や キャ ラク タ の 豊富 さ は 
な か な か で す が , すこ し 難し いよ う 
な 感じ が する ね . 


入力 は KOM モ ニタ の M ユ マン ド を 使っ 
て $8000 一 $C3DEF ま で 入力 し , 入力 後 は 必 
ず セ ー ブ し て くだ さい (スタ ー ト 番地 は 
$8000 TF). 


最初 に タイ トル 画面 と , 各 キ ャ ラク タ の 
得点 (空中 物 は 表示 きれ ませ ん ) が 変 互 に 表 
RINT. そし て [| SPACE キー を 押す 
と ゲー ム ・ ス ター ト で す . 

自 機 の 操作 は , カー ン ル ・ キ ー で 上 下 左 
右 は むろ ん 斜め も 可能 で , 特に , ПІР 
| [| キー を それ ぞ れ 同時 に 押す こと に よ 
b, 機体 を 傾け る こと も で きま す . 


ま た, | SHIFT キー を 押す と 6 連発 ま 


EVILON マシ ン 語 リス ト 


地上 と 空中 か ら の 2 枚 ブ ロッ ク 


ťMART-BOMB OKE! 


ck ご CK 


RARER 
ROUND ӘСІ 
SMT-BOMB 5 
LEFT 


.М 


(むう) + 
YK 


で 可能 な ミサ イル を 発射 し , | CTRL キー 
を 押す と スマ ー ト バク ダン を 投下 し ます . 
この スマ ー ト バク ダン は , 画面 上 の 陸上 に 
ある 物体 (JUMPER や 木 を 除く ) を すべ て 
破壊 する こと が で きま す が , 画面 上 に 
"SMART BOMB ОК//” と 表示 され て い 
な いと 投下 で きま せん . 

С ОТ, ゲー ム は 全部 で 12AREA まで 
љо, それ を 超え る と ROUND 数 が 増 L, 
と きど き 地 上 に 現われ る お や つ を 取る と 高 
得点 が も ら え ます . 以上 の よう に し て ゲー 
ム を 進め て いき , 10 万 点 ご と に 戦闘 機 が 1 
機 ほ スマート バク ダン が 2 個 。 12AREA 
すべ て を クリ ア し た 場合 は 戦闘 機 3 機 ほ と ス 
マー トバ クダ ン が 3 個 加 えら れ ま す . 

ゲー ム の コツ ン は スマ ー ト バク ダン を 有効 
に 使用 し . な る で く 《 低 飛行 で 進む こと で す . 
あと 何 度 か 遊ん えび で いる と わか る と 思い ます 
21, この ゲー ム に は 隠れ ワザ も あり ます (本 
当 は バグ な の で す が ,。 この ゲー ム は 少し 将 

し い の で 残し て お きま し か )。 

272, 敵 か ら み て 味方 の 弾 を うけ た о, 
爆発 に 巻き こま れる と や られ て し まい ます 


#1 アド レス ・ マ ッ プ 


メイ ン ・ プ ログ ラム 
タイ トル 画面 デー タ 
キャ ラク タ ・ デ ー タ (W) 


キャ ラク タ ・ デ ー タ ( 赤 ) 

キャ ラク タ ・ デ ー タ (Ë) 

星 デ ー タ 

地上 デー タ (12AREA 分 ) 

PCG セ ッ ト プ ログ ラム 

英字 , 数 字 な どの デー タ 
ES 


(し か し , 得点 は 加算 きれ ます )、 


クロ ー チ テ チャー は まっ だ で 作り まぜ ん で 
LX. LDL, QD 付 き で クリ ー ン 設計 の 
MZT, し か も 私 は MZ-1500 用 の アセ ンプ 
ラ を 使用 し だ た ので, 楽に 作れ まし た だ . あと 
は プリ ンタ が あれ ば よい の で す が …. 

な お , ワー ク ・ エ リア は $0000 一 $0FEFF 
まで で て で, 当然 バン ク 切 り 替 え を 行なっ て い 
ます . し た が っ て ROM 内 ルー チン は 使用 
し て いま せん . 


この ゲー ム に は 。 サウンド だ け で 音楽 らし 
きも の が あり ませ ん . この 次 の ゲー ム に は 
取り 入れ だ いと 思っ て いま す 。 


D O 


PSAN 
ISR は 出 た の だ 


PiO4 月 号 の ソノ シー ト を 間違っ て や ぶ い て し も 一 た 
‹ を そ 一 速 さ が 3 倍 ど と 一 うる せ ー ク 


ググ 私 は し か だ た なく, 
P.S.2 PiOPiO は 初 投稿 で す . 


も う 一 度 PiO を 買っ だ の で し た . P.S.1 な ぜ P-6m 
ご これから も よろ し く 。 
(だ じゃ れ が 好き な DAI 見 て る か の Ken) 


ФО 


DEVILON マシ ン 語 リス ト 


PIO 


私 っ て どう し て こん な に ドジ な の ・. この あい だ も 愛 機 PC-1350 に コー ヒー を … ゴ メン ネツ . KA pia. PS. HU ト ら ぼる ん , で ん 
TARSA, 古田 勝間 きん , その 他 PiO の 読者 きん , 頑張 り ま し ょ う ノ / (どー し て 女性 の プロ グラ マー は 少な いん で し ょ う . エリ カノ より ) 


DEVILON マシ ン 語 リス ト 


уча пох ҸЕ 


e: 


DEVILON マシ ン 語 リス ト 


52 7 


+7 :50М 


9670 13 


+7 :50М 
07 :18 
9A :00 
58 :СС 
70 :ро 


私 が ゲー ム ・ セ ンタ ー で ゲー ム を し て いる と き に いち ば ん ムカ ツク こと は , PLAY 中 に CREDIT を 入れ られ る こと で す . ゲー ム 機 は PLAY 
中 の 人 が 終わ る まで その 人 の 「 貸 し 切り 」 だ と 思い ます . それ に この ご ろ の ゲー ム に は CREDIT の 追加 等 に より ,。 続け て PLAY で きる も の 
も 少な 《 く ありま せん . この よう な ゲー ム 機 に お な いて, 前 記 の よう な こと を する の は バス ・ 車 等 で の 「 割 9 り 込み 」 行為 に 等 し いと 思い ます 。 も 
sai ちろ ん ゲー ム 中 の 人 も , KÄODAATRLIAÉATOAI 5 Z abp iU (7 5 2 5 EAD b b t 2 A BC U э. 風営法 が 厳 


し く な っ た 今 」。 ゲ ー ム ・ モ センター は 不良 少年 の 温床 な ぼ で は な いと 知ら し め る だ め に も , 我々 自身 が きち ん と する 努力 が 大 切 だ と 思い ます . 
(Hex Oct) 


+7 :SUM 
7A 
оо 


53 


х-чиже-поха %, Ж 


DEVILON マシ ン 語 リス ト 


РА, Љо, どう も , 2001 年 … で す 。 ち ょ っ と 皆さん に お 聞き し た いん で すす けど, みな る ん は プロ グラ ム だ と か PiOPiO, PiODO な イラ スト な 
ど ( の ネタ ?) を , どの よう な と き に 考え て いる の で し ょ うか , 僕 は プロ グラ ム は 数 学 の 時 間 な ん か に プロ グラ ム の 流れ な ん か を 考え て いま す 
が (だ か ら 数 学 が 悪い 僕 )。 皆 きん は どう な ん で し ょ うわ ね え …. (数 学 が 悪い な らん な こと や め り ゃ いい の に や め な い 2OO1 年 宇宙 の 足袋 ) 


Де, 


トン 


+7 SUN 


5 A48 
sFF 


p 突然 で す が , 私 谷山 浩子 さん の ファ ン で あり ます (いき な り PiOPiO と 関係 な か っ た りす る ). と ころ で , 私 , 今 マ シン 語 の 勉強 を 独学 で し 
て いる ん で す が ( ポ ケ コ ュ ン ・ マ シン 語 入門 が テキ スト で す ), シフ ト 命 令 の 意味 や 使い 方 が わか り ま せん . だ れ か わか る 人 教え て 追伸 (P. 
S じ ゃ な いと ころ が シブ イ 1?) PiO の 読者 の 中 に は 谷山 きん の ファ ン が 多い 様 な の で うれ し いで す . BWI アマ チュ ア 和 無線 を や や っ て る 人 
は ペン ネー ム に コー ル サ イ ン を 使っ て は (私 は 50MHz only で す ) ? (谷山 浩子 ファ ン の JP1JWO) 


BIO 


DEVILON マシ ン 語 リス ト 


г-зЕйс-похтҮ IE 


Де, 


DEVILON マシ ン 語 リス ト 


ADD +O +1 +2 +3 +4 +5 +6 +7 :SUM || BCgB 24 оо оо 20 20 20 00 20 ka4 || BECO 24 24 24 24 24 24 24 24 :20 
BABO 00 24 24 00 24 00 SF 00 :CB ВСАО 20 20 00 20 20 20 00 24 :C4 || BECB 24 F5 00 Dé 00 SF SF 84 :21 
ВАВВ 5Ғ OO 00 C2 00 00 28 С2 :ОВ ВСАВ 24 24 00 24 24 24 00 38 :ЕС | BEDO Ва 67 67 00 67 SF 67 24 :A3 
BAŞO 67 00 OO 67 00 00 67 00 :35 ВСВО оо оо оо оо зв оо 00 00 :58 || BEDB 24 00 00 24 24 00 00 24 :90 
ВА98 28 00 67 00 70 00 70 00 :6Ғ BCBB 58 67 67 00 67 67 ОО BB :5C || ВЕЕО 24 00 00 24 24 00 00 24 :90 
BAAO 67 оо оо 24 24 00 24 24 :F7 BCCO 00 BB OO BB OO SF 00 00 :ëF || BEES 24 oo oo 24 24 оо ЗВ 24 :CB 
BAAS 24 24 00 00 SF SF 00 00 :06 BCCB 00 СА 00 СА 00 87 67 67 :С9 || ВЕҒО 24 ОО ЗВ 24 24 00 28 20 :FC 
BABO 67 67 оо C2 88 C2 00 38 :12 BCDO 67 67 24 24 24 Ғ5 00 28 :57 || ВЕҒВ 20 00 00 67 67 00 00 67 :55 
ВАВВ 00 00 00 00 20 00 20 20 :60 BCD8 28 28 28 28 28 28 28 28 :40 || --------------------------------- 
ВАСО 00 24 00 24 24 00 00 24 :90 ВСЕО 28 28 28 28 28 28 28 28 :40 || SUM FB 9A 9F 29 ОЕ А9 7E Оз :92 
ВАСВ 24 24 24 24 24 24 00 24 :FC ВСЕВ 28 24 24 24 24 24 24 24 :24 
BADO 24 24 24 00 67 00 00 67 :3A ВСҒО 24 24 24 24 24 24 24 20 :1C 
BADB 67 00 00 70 SF SF C2 00 :57 BCFB 20 20 20 20 20 20 20 20 :00 
BAEO 28 FS 00 OO Cé OO Cé 00 A9 || --------------------------------- ADD +O +1 +2 +3 +4 +5 +6 +7 :SUM 
ВАЕВ 00 Cé 00 ОО 5F 5Е 00 00 :84 SUM Сз BO 43 АЕ DF 26 C7 F3 :33 || ВҒОО oo Ва 84 84 00 оо BB 88 :9С 
ВАҒО SF SF 00 00 SF SF 24 00 :A0 ВҒОВ SF BB 67 BB 00 67 00 00 :3D 
ВАҒВ 24 00 00 24 00 оо 24 00 16C ВҒ10 24 24 24 28 20 20 00 24 :08 
-------------------------------- - BF18 38 24 24 00 24 24 24 24 +10 
SUM за 35 D3 ЕВ 51 62 72 ED :3F ADD +0 +1 +2 +3 +4 +5 +6 +7 :SUM || BF20 00 24 24 оо 20 20 20 00 :АВ 
вро0 20 20 20 20 20 20 20 20 :00 || BF28 67 00 67 оо 67 00 00 00 :35 
BDOB 20 BB СЕ 00 СЕ Ва Ва 84 :DO || вғзо 84 67 84 00 84 84 84 00 :FB 
BD10 00 Ва 00 84 00 оо 84 00 :8C || BF38 ОО 84 88 Dé оо вв Dé 00 :40 
ADD +0 +1 +2 +3 +4 +5 +6 +7 :SUM || BD18 00 Ва оо 00 24 24 24 00 :ҒО || BF40 88 Dé 38 00 00 38 00 38 :06 
ВВО0 00 24 оо оо 24 00 00 24 :6C BD20 00 24 00 24 00 00 СЕ 00 :16 || вғав oo 58 00 58 00 24 00 00 :94 
ВВОВ OO оо 24 24 оо 00 24 00 :С BD28 00 СЕ 00 00 00 СЕ 00 7 :05 || BF50 70 oo SF 00 00 SF oo 00 :2E 
ВВ10 00 24 00 оо 24 24 24 24 :Ва BDSO 00 00 67 00 67 87 00 00 :35 || БҒ5В oo oo 24 24 24 24 00 00 :90 
BB18 00 00 Cé оо Cé 00 Cé 70 :C2 врзв 28 оо 28 28 28 28 00 70 :38 || BFeo 24 оо 24 24 оо оо 20 24 :BO 
ВВ20 70 70 28 28 00 00 28 00 :58 BD40 00 70 00 70 84 00 00 84 :ЕВ || BFeB 20 20 28.00 oo оо 38 00 AO 
ВВ28 28 00 28 28 оо оо 28 28 :С8 BD4B оо оо 84 оо оо 84 00 00 :08 || BF70 оо oo оо 28 20 20 00 00 :6В 
BB3O 00 оо 00 24 24 24 00 00 :&С В050 84 00 00 84 00 70 00 00 :78 || BF78 00 oo oo 67 00 oo 67 00 :СЕ 
BB3B 24 24 00 00 87 67 67 00 :7D BD58 70 00 00 24 00 24 00 00 :ВВ || --------------------------------- 
ВВ40 00 67 20 67 00 20 00 00 :0Е врьо 24 24 24 00 00 00 00 ВА :ҒО || SUM E2 91 рі 29 93 Dé E5 2C :Е7 
ВВ48 00 20 оо оо оо 24 00 24 :68 врьВ 00 00 84 00 84 ОО СЕ 28 :FE 
ВВ50 00 24 00 Cé 00 Cé SF SF :%Е BD70 СЕ 28 СЕ 00 00 87 00 87 :92 
BBSB 00 OO 28 00 28 оо оо 28 :78 BD78 00 67 00 67 00 00 00 20 :ЕЕ 
BB6O OO OO 00 24 00 24 00 67 «АҒ || --------------------------------- ADD +O +1 +2 +3 +4 +5 +6 +7 :SUM 
BBéB 00 00 Ce 00 Cé 00 Cé 00 :52 SUM ДЕ С5 77 6F А9 А4 ЕВ 32 :60 || ВҒВО 67 00 00 00 67 00 De 00 :A4 
ВВ70 00 Cé оо OO Cé 24 Cé 24 :9А BF88 24 24 00 24 24 24 00 24 :DB 
ВВ78 00 00 00 00 20 24 00 00 :44 BF9O 24 24 24 00 00 20 20 00 :АС 
--------------------------------- BF98 20 20 00 38 00 00 84 84 :80 
SUM ВС ар 48 E? éD 25 BO 16 :92 ADD +0 +1 +2 +3 +4 +5 +6 +7 :SUM || BFAO 84 84 OO 00 BB 00 BB 00 :18 
BDBO 20 OO 20 оо 20 00 оо 00 :60 || BFA8 oo 88 oo 88 00 00 00 BB :98 
BDBB 20 00 20 20 00 20 00 00 :80 || ВҒВО 00 00 ВВ оо 28 24 24 24 :2С 
Вр90 20 20 SF 00 00 SF 00 00 :ҒЕ || BFBB 24 24 24 24 оо 24 оо 24 :D8 
ADD +0 +1 +2 +3 +4 +5 +ë +7 :SUM || BD98 SF 84 BB 84 BB 84 87 67 :С9 || BFCO 24 24 00 F5 00 Ва 84 67 :AC 
BEBO OO 20 24 оо оо 24 24 00 :8C BDAO оо 28 28 28 28 28 00 00 :С8 || BFCB 67 67 67 67 67 67 67 67 +38 
BB88 00 оо оо 00 70 00 00 70 EO BDA8 28 00 00 00 00 58 00 00 :60 || BFDO 67 67 67 67 67 67 67 84 :55 
ВВ90 00 оо оо оо 70 оо 00 28 :98 врво оо зв оо оо оо оо 00 24 :5С || BFD8 84 00 Ва 84 оо DA 00 00 :66 
ВВ98 00 00 28 00 28 00 00 28 :78 BDB8 24 00 00 00 70 00 00 00 :94 || ВҒЕО 70 70 00 70 70 70 70 70 :10 
BBAO 28 24 28 28 24 24 24 Оо :08 BDCO 70 оо 70 00 00 00 00 СЕ :АЕ || BFEB 70 67 SF 84 00 84 00 84 :С2 
ВВАВ SF 00 SF 00 00 70 00 00 :2E BDCB 00 СЕ 00 28 28 28 28 Ғ5 ‘43 || BFFO 84 84 84 00 00 00 24 оо :BO 
BBBO 70 00 00 67 28 67 28 67 :Р5 врро оо D2 оо оо 00 оо 00 D2 :А4 || BFFB 00 24 24 00 оо оо оо oo :48 
ВВВВ OO SF 24 SF 00 00 24 00 :06 BDD8 00 00 00 00 00 D2 00 00 :D2 || --------------------------------- 
BECO оо оо 28 28 28 оо 00 28 AO BDEO OO OO D2 00 00 оо 00 00 :D2 || SUM 51 09 29 43 89 АС ОС ВЕ :С5 
BBCB 00 28 OO 00 28 00 28 00 :78 BDEB D2 00 оо 00 оо 00 D2 00 :ñ4 
BBDO 28 00 SF 00 00 SF 00 20 :06 BDFO 00 00 00 00 D2 00 00 00 :р2 
BBD8 20 20 20 Ғ5 00 00 00 00 :55 BDFB 00 оо рг 00 00 00 оо 00 :р2 
ВВЕО 38 00 00 00 00 70 00 OO АВ || --------------------------------- ADD +O +1 +2 +3 +4 +5 +6 +7 :SUM 
BBEB 00 28 oo oo oo oo 28 oo :50 SUM 4D A4 63 Ға За SD 61 20 :60 || СООО ЗЕ 01 Oé 03 D3 E5 ЗС 18 :54 
ВВҒО 00 00 28 00 00 00 оо 00 :28 COOB 07 10 F? D3 E6 C3 ЕО ЕВ :54 
BBF8 28 00 00 00 00 28 00 00 :50 С010 F5 С5 АҒ 21 00 DO 77 11 :E2 
ー ニ ーー ニー コニー ユニ ーー ニニ ュー ニー ニー ニー ニュ ーー ニニ ー СО18 01 DO 01 FF 1F ED ВО C1 :4E 
SUM 9F 13 Cé ОВ A4 16 E4 6F :90 ADD +O +1 +2 +3 +4 +5 +6 +7 :SUM || CO20 F1 18 Eé ОЕ FC АҒ ED 79 :0Е 
BEOO D2 00 00 00 00 оо 00 D2 sa4 || CO2B ЗЕ CF ED 79 ЗЕ ЗЕ ED 79 :56 
BEOS OO оо оо 00 00 оо D2 oo :р2 || Созо oo oo oo 00 00 oo 20 20 :40 
ВЕ10 00 00 00 00 24 B2 00 ВА :90 || СОЗВ oo оо оо оо оо оо 00 00 :00 
BE18 OO C2 00 СА оо 24 оо 24 :D4 || С040 оо ра 00 00 00 00 00 87 :41 
АШ oo og 24 og oo oo og oo Hap || BE2o oo oo oo oo 24 00 oo 24 :48 || Co4B DA 67 00 00 84 00 84 00 149 
dE Фат саа ВЕ28 OO 24 24 24 оо OO OO 20 :8C || С050 оо оо 84 84 84 00 00 BB :14 
ET RO OE ОБС Со 95 (7 BEZO 20 00 00 00 oo 20 00 00 :40 || COSB ВВ oo oo oo 24 00 оо 00 :АС 
Ше сона SD a CaN BE38 OO SF 00 00 00 00 67 00 :СЬ || С060 oo oo oo oo oo оо оо 24 :24 
БО Q spo, ы шш ошл S ВЕ40 00 00 84 00 84 00 84 00 :8C || CO68 00 оо оо 00 оо 00 00 00 :00 
бе Pi s se DA sos ио суг BE48 Ва 00 Ва 00 84 00 84 00 :10 || C070 oo 24 00 00 00 оо 00 00 :24 
С О ы oo SS (Fë BESO 84 OO 84 00 Ва 00 84 00 :10 || Co7B ВЕ oo 00 00 00 00 00 24 :E2 
ЕСІВ ОО ОО 28 ОО ОО OO 28 OO :70 0696 04.00 0000 09 78А ЖАСА «ӨБ | AANA ASEAN RIESE 
I S шо Sa Oa CO 55 ob Үй BE60 D2 84 D2 84 84 OO OO 84 :B4 || SUM ВА F2 06 01 ЗЕ 53 Сі 1B :FO 
шен SS Co Ao E o So se So 35290 BEéB 84 OO SF 00 00 SF оо 00 :42 
BC50 00 00 24 24 00 24 24 24 :B4 ун ЭЕ оса т Да ЧУ + 
ВС5В 24 24 00 24 00 24 00 SF :ЕҒ елін ем ен оо чо ЧЫ Do ар нщ | 
BCO SF OO SF OO оо CA 84 са Н Dé ЖТТ Лы e OO OO EE E E O ce ADD +0 + 1 +2 +3 +4 +5 +6 +7 : som 
а 40 oo SES oh Sa So та SUM 57 4C 65 95 7C Ор Ор CO :Ға || сово 00 оо оо оо 00 оо оо 00 :00 
ВС70 00 00 00 28 00 00 00 38 :70 pe ы ой аи DO ya O АБ зеи 
BC78 OO 00 20 00 00 28 00 20 :78 GOTO ЧО 00 O0 S0 0.00 Өзб 195 
RE RE C098 00 оо оо 84 00 OO оо 00 :84 
i ADD +O +1 +2 +3 +4 +5 +6 +7 :SUM || COAO 84 00 84 00 00 00 00 00 :08 
ЗЫМ Аі ЗЕ 59 42 15 Ey 52 РА TIE || рево 70 oo 70 70 00 00 24 00 17% || СОАВ 24 24 24 00 OO DA 24 24 :ВЕ 
ВЕВВ 24 24 00 00 00 SF 00 00 :А7 COBO 24 24 24 20 20 20 20 20 :0C 
BE9O OO D2 OO D2 оо оо оо оо :A4 || COBB ва ва ва 84 84 F5 OO 24 :AD 
Ақы а 5 Уз Ча эй че чийи || ЖТС ВА 50 90 Өз ы) 60 20 00 it СОСО 24 24 24 84 24 24 84 SF :1B 
stno 00:54 do 24:60:00 те 00360 || BERO 20 00 00 00 20 20 00 00 120: || COCO SF OO SF SF 00 SF SF 84 45Ғ. 
онн оосо Do жооп s vo ka ipo || ЖҰЛА Ob 00 04 Ча Қа O QO 00 ш CODO оо 84 оо 84 84 BB BB 88 :24 
WO ao со ап со 70 дола || BEBO 24 00 24 00 2400 d0 зо час CODB оо оо 84 84 84 84 00 00 :10 
BEBB 20 24 24 00 24 24 00 24 :D4 СОЕО 00 84 84 OO 84 84 67 67 :DE 


よく ゲー ム ・ セ ンタ ー で 全身 を 動か し て ゲー ム や っ て る 人 を 見 か け ま せん か . 友人 A も そ 一 ゆー 人 と いう より , それ 以上 の 人 間 な ん で す が 、 
EHO 71942) DE IIZI LR. いつ も の よう に 体 を 激しく 左右 に 動か し 英機 や ら 弾 か ら 自 機 を や 避け る せる . 疲れ を 知ら ぬ 彼 の 指 は 休み 
な く (発射 ボタ ン を 打ち 続け 。 レバ ー に は 必要 以上 の カ が か か っ て いる の で 今にも 折れ を そう. そし て 当然 の こと な が ら ゲ ー ム 台 は ガタ ガタ と 振 
ТЬ. と, これ で らい の こと で 驚い た ん じゃ な いん で す . 驚い た の は 彼 の 右 の 手の甲 か ら 6 出血 し て いた こと で す . 彼 は ゲー ム に 熱中 する あ 


PIO 


DEVILON マシ ン 語 リス ト 


ス -| フライ ヤー 


8 


い ぃ ぷっ 2 し 


хс, 152124 е) 


#9, その こと に まっ た く 気 付か な い の で 教え て や る と , 彼 は その こと が 気 に な っ て アッ と 言う 間 に ゲ ー ム ・ オ ー バ ー に な っ だ の で し た . 9 
ソ の よう で す が 実 話 な ん で す . (アホ な 友人 を も っ た ぴい えす ) 


S9 


JR-200 | | 


BASIC 十 マシ ン 語 スペ ー ス ・ ス クラ ンプ ブル 


SPA CESCRAMBL 


. 


С 


о 
4, PiO 星 は JUFC 星 に 完全 に 支配 され iz, PiO'84 年 11 月 B + の チェ و‎ T 
よう と し て いた . そこ で JPC 星 は , PiO 星 ログ ラム を $7500ー あ だ り に リロ ケー ト す 


を 取り 戻す た め に , JUFC 星 に 対し て 攻撃 る と 便利 で す . 

を 開始 し た の だ っ た . | 実行 は LOAD :RUN| RETURN | で 自動 的 
に マシ ン 語 部 を 読み 込み ゲー ム ・ ス ター ҒҒ 9 

ト も ます .。 な お [BREAK |+ ー で 実行 を — | 4 еони 


止め た と き は RUN11O| RETURN |} し て 2 画面 クリ ア 
А-У 252 英 に 当たっ た か どう か の 判定 
3 | ミサ イル の 移動 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 
E 


マシ ン 語 
ا‎ итв ә ~} 


6000—70B7 


スコ ア と ハイ ・ ス コア の プリ ント 
Жота ( いん 石 , ミサ イル , ロケ ッ ト ) 


_ | クラッカー の 処理 は と て も いい の で 
| す が , その 他 の キャ ラク タ が いま い 
b, өзі Же / (V) 


_ カー ソル ・ キ ー, まだ た は ジョ イス ティ ッ 6F60- і や られ た と き の 処 理 
mmm | 2 CE, [SPACE | キー, また は トリ ы аллы Ёш 
7 р fah 7 y P Й - Ç ガ ・ ボ タン で ミサ イル 発射 で す が , 8 方向 $67D7 で いん 石 の 数 , $67D2 で クラ ッ カ 
へ Т 2 に 移動 で き ,. し か も 移動 射 ち が で きる の で ジ ー の 数 , $67DC で ロケ ッ ト ・ ミ サイ ル の 数 
А ョ イス ティ ッ ク の 方 が は る か に 有利 で す . を 調節 し て いる の で , その 数 を 大 きく すれ 
リス ト 1 (BASIC 部 ), リス ト 2( マ シン 遊び 方 は いた っ て 簡単 . 現われ る 敵 を や ば (最大 $80 ま で ), 出現 する 数 も 増え ます . 
語 部 : 96000 — $ 70B7) の 順に 入力 , セー プ っ つけ れ ば いい の で す 。 こち ら の ミサ イル だ だ し , $67DC は 必ず 偶数 に し て 〈《 だ るい. 
し て くだ きい 。 マシ ン 語 部 の チェ ッ ク サ ム は 5 連射 で , 一 度 に 前 方 向 と 下方 向 の 2 発 0 | 


クラ ッ カ ー の 爆発 が 続く … が 測 ま す . 
| 英 の 中 で は いん 石 だ けが 破壊 不可 能 で す . 
ひだ すら よ け て くだ さい 。 また 後 の 方 で 現 


最後 に 


われ お マザー シッ ププ は, ミサ イル を た ぐさ き この ゲー ム に 登場 する キャ ラク タ は , (š 
ん 当て な いと 壊れ ませ ん . と ん と PiO パ ー ツ な どか ら 使 わせ て い だ だ 
な お , 味方 の 宇宙 船 は 10,、 20… エ リア に きま し だ ,。 その 人 だ ち に 感謝 / し ます 。 
着く と 1 機 増 えま す . あま り 特 徴 の な い ゲ ー ム か も し れ ま せん 


が 。 それ な り に 楽し め る と 思い ます . ぜひ 


遊ん で みて くだ る 


[ユエ エナ テテ テテ エ ャ テテ キャ テテ ャ ィ テ テキ ティ 1 2 の の PRINT "" オ エエ ュ オ エエ ュ エ エエ コ #3 2 オ エ エエ ユ ュ エ 
TEE” 
SPACE SCRAMBLE 210 PRINT "т CETL >ҮЯТЕЗЕЗҒЕТ s 


560 GOTO ささ の 

569 КЕМ --- INTRODUTION SCREEN --- 
570 CLS:POKE 7,15 

580 COLOR 3:PRINT "жия CHARACTER S INTRO 
DUCTION жин" 

590 COLOR 7:PRINT " @%@":COLOR 2:PRINT "à 
"ss COLOR 7:PRINT "Фе"; 

OQ PRINT К н нә» era lw YOUR SPACECRAFT 


220 PRINT "arxrrar І129І ТТІТЕТЕТФІ 
by JFC М0.617 ІІІ"; 
Shinji Аокі 250 PRINT " ІІ ІІЗ1І エエ エエ エ ヨ PP エエ ІІ 


222225222222 ЭЕ ЭЕ € ЭЕ AE 3 3Е 3 ¥ 240 PRINT "атт?атт?т алэт II エエ エエ ヤ エ エ エエ エ 
--- DATA LOAD --- із" с ・ 
100 CLEAR $SFFF:COLOR 7,@,@:CLS:PRINT "D 250 COLOR 6:1 ОСАТЕ 4,13:PRINT "HIGH SCOR 
АТА LOADING":MLDAD E RANKING BEST 3" 
109 КЕМ --- SET --- 260 RESTORE 500: ҒОК Ізі TO 3 


"ya COLOR 7sPRINT " 
“егввевввевв«вг”еввееее . METEORITE" 
420 COLOR 4:PRINT "9"; : СООК 7sPRINT " 。 
sa ROCKET MISSILE <... 50 pts" 
450 COLOR 1:PRINT "デリ " ョ sCDLOR 7sPRINT " 


110 POKE %СА00,0: COLOR 7,0,0:CLS:POKE 0, 278 COLOR I+1:LOCATE 0,12%1ж%2:БЕАПр A$:PR 

Ø: TEMPO 2@:RANDOMIZE:DIM H(3) ,N$ (5) +9 КИР А-а” ыш, Ne CRACKER ....... 70 pts" 

120 U=USR ($6180) :ҒОК I=1 TO 5:Н(1)-5000: 280 COLOR 7:PRINT " "sRIGHT$ ( "の の の の 440 COLOR ЗіРБІМТ "7"::СОЦОК 7:РКІМТ " , 
N$ (1) ="COMPUTER. ": NEXT I @"+MID$(STR$(H(1)),2),6); .. ENERGY STATION ... 100 pts" 

129 REM --- TITLE SCREEN --- 29@ PRINT " "sN$ (1) : NEXT I 450 COLOR ө:РБІМТ "4"; :COLOR 7:PRINT " 。 
150 A=1:PLAY "В",%651С0,%61р0 ME DATA ТЕРГЕН ТЕР O a 2 КЕСИДИ НАТ. 5242.. 200 pts" 


140 CLS:POKE 7,15:COLOR 7 510 ОМ A GOTO 520,700 
150 PRINT SPC(6) 』 "オォ エエ ュ エ エエ コ #3 オ エ エコ ユエ エエ エリ " 520 COLOR 5:1 ОСАТЕ @,25:РКІМТ "PUSH SPAC 
160 PRINT SFC(6) 』" ェ Ко зиттз т тт 34 E ВАК OR TRIGGER BUTTON"; 
170 PRINT SPC(é);"arrarrrtI тт ЛЕ?” 550 IF МОТ PEEK(7) ТНЕМ 270 
180 PRINT 5РС(6;;" II ту К © ғы 540 IF STICK(@)=$2@ OR STICK(1) く 24 の THEN 
190 PRINT 5РС(6);"зтіРІ І ІЗІІРІІІІ": 520 

550 Із1-1:ІҒ 1<0 THEN U=USR ($6300) : I=8 


460 COLOR 7:PRINT "> ... LAUNCHING PAD . 
.-.. 500 pts" 

470 COLOR 1:РБІМТ "ав": РКІМТ "оаа": PR 
ІМТ " H БЫ 

480 COLOR 7:РКІМТ " ... MOTHER SHIP ... 
2??? ріѕ" 

490 COLOR 5:1 ОСАТЕ @,25:РКІМТ "PUSH SPAC 


我が家 に 住ん で いる 猫 さ ん た ち へ お 願い し ます . 僕 が めずらし く プ ログ ラム を 作っ て いる と き に , キー ボー ド の 上 を 通ら な いで くだ さい . 
長い プロ グラ ム を 打っ て いる と き に , コン モン ト の あたり を いじ ら な いで くだ さい . ド ョ だ どら けり の 足 で PiO の ト を 走ら な いで くだ さい . それ 
と 、 家 の 回 り に いる の ら 猫 る さん た ち へ . わざ わざ 家 の 中 まで き て ケン カ し な いで くだ さい . お 願い し ます 。 P.S な ん だ か ん だ いっ て も 獲 
は 好き で す . | (馬車 別当 ) 


E ВАК ОЖ TRIGGER BUTTON"; 
500 IF МОТ PEEK(7) THEN 150 

510 IF STICK(Ø)<>$2Ø AND STICK (1) >259 TH 
EN 500 

519 REM --- GAME SCREEN --- 

520 U=USR ($4390) : COLOR 2:LOCATE 0,0: РКІМ 
Т" HIGH"; :COLOR S:PRINT " SCORE"; 
550 COLOR 4:PRINT " LEFT"; : COLOR 6:PR 
INT " AREA"; 

540 COLOR 7:PRINT RIGHT$ ("ØØØØØ"+MID$ (ST 
R$(H(1)),2),6); 

550 PRINT " 
560 COLOR Q:PRINT " 

—— Y — š 

570 FOR Ісі TO 19:PRINT "—":МЕХТ 1 
580 COLOR 2:FOR Ісі TO 2:PRINT " 
S و‎ qp a= Sk ses ҮЗДҮ 


REM --- PLAYING GAME 一 ニー 
PLAY "B", ; , $61F0: U=USR ($6780) 


の の の の の の 22 Өз” 


599 КЕМ --- GAME OVER --- 

6 の の FOR Ісі ТО 50: ҒОК 2-1 TO 7 

610 COLOR J:LOCATE 11,12:РКІМТ "GAME DV 
ER": SOUND 500-1%20,1:МЕХТ JiNEXT I 

620 FOR I=1 TO 5000:МЕХТ I 

650 S= (РЕЕК ($C12A) を $30) *100000+ (PEEK ($C 1 
2В)-ө50) х10000 

640 5-5%(РЕЕК(9С12С)-950) * 1 の の の + (PEEK ($C 1 
20) 一 まさ の ) * 1 の の + (FEE に (まじ 12E ) 一 まさ の ) *10 

650 IF 5>Н(1) THEN H(3)=H(2):N$(3)=N$ (2) 
:Н(2) =H( 1 ) :N$ (2) =N$ (1) :N=1: GOTO 690 

660 IF S>H(2) THEN Н(35) =Н(2) : № (3) =N$ (2) 
:N=2: GOTO 690 

670 IF 5>Н(5) THEN N=3: БОТО 690 

680 GOTO 150 

89 REM --- INPUT МАМЕ --- 

690 H(N) =S:N$ (N)="";ñ=2:GOTO 140 

700 COLOR 5:1 ОСАТЕ 7,23:PRIN. "INPUT YOU 
R МАМЕ !!"ş 

710 Х=22:Ү=135+№#2 


: І ЈДК2 SPACE SCRAMBLE マシ ン 語 リス ト 


リス ト 1 SPACE SCRAMBLE BASIC! Z F 


720 Х-Х%1:С-%41:ІҒ Х>51 THEN 810 

750 COLOR МОр(1,2)%7:1ОСАТЕ Х,Ү:РКІМТ СН 
R$(C) 

740 IF PEEK (まう 2) = の THEN PLAY "В",,%6740 
750 I=I-1:IF I>@ THEN 730 Ы 
760 1=9:0=05К ($6500) : К=5ТІСК (0) : J=STICE ( 
1) 

770 IF К-Ф1С ОК Ј=%Ғ7 THEN C=C+1: IF С>%5 
С ТНЕМ С-%41 

780 IF k=$1D ОК J=$FB THEN С-С-1:ІҒ С<%4 


1 ТНЕМ С-%5С 

790 IF К=%2@ ОК J=$EF THEN PLAY "В",%61Е 
0:РОКЕ %С500%Х%Үж%20,7:06070 720 

800 GOTO 730 

810 Х-%С2В7%М%%40:ҒОК I=X ТО Х+8: МФ (N) =N 
$ (N) +CHR$ (РЕЕК (І) ) : МЕХТ I 

820 FOR 1=1 ТО 5000: МЕХТ 1:60Т0 150 


w.NET UNNS Ж” 


6570 9С А7 00 
6578 86 01 97 


SUM AØ 8B CF 


6580 10 Có 02 
6588 BØ 4F 39 
6590 9С А7 00 
6598 86 0і 97 
65A 10 Сё 05 
6ЗАВ BO АҒ 59 
65B の Аё 00 1B 
65BB ØA А7 00 
55С@ 00 SF 09 
65СВ 86 20 В7 
65D の 65 D7 Bé 
65D8 11 27 10 
&5Е@ Аё ØA A7 
6ЗЕВ 26 F6 39 
6SF の 65 ра вв 
65ЕВ 2Ғ 26 D7 


SUM АЕ ҒО Fš 


5600 СЕ Сі 40 
5608 81 91 26 
5610 А6 20 81 
661 А7 20 BD 
65620 20 81 Ab 
5028 89 2А 14 
5550 А7 21 BD 
5558 の 1 86 02 
5040 80 А7 21 
5648 BØ A7 21 
5550 ØB 84 89 
6658 86 03 А7 
| 666 の 86 80 А7 
| 6668 2А QE 85 
| 6670 93 86 03 
5678 15 86 80 


6680 91 2A ØB 
6688 ЕВ 93 86 
6690 26 15 86 
6698 81 91 2А 
дд BD ЕВ 93 
66АВ 7F 19 Аё 
вд 86 80 A7 
66BB 27 02 7E 
66C の СЕ C3 BF 
66CB 81 8D 26 
600 Аё 01 81 
6608 А7 01 BD 
66E の 01 81 ВЕ 
66Е8В 00 Аё 1F 
66F の ВЕ А7 1F 
66ҒВ А7 1F 81 


SUM DE 29 ОҒ 


700 A7 QQ АФ 
6708 86 ВЕ A7 
710 03 А7 20 
6718 80 A7 QQ 
5720 ØB 86 90 
5728 B 05 А7 
6750 BC Сі 0 

| 4738 の の の の QQ 

| 6748 60 2С 6 の 

| 6748 60 25 24 

5750 24 2С 0 

6758 さ の 00 24 

6760 24 2E 50 

| 6708 90 31 90 

| 6770 60 29 ¿Q 

| 6778 Cg 25 50 


| ӘМ В5 51 JE 
| 


5780 86 30 B7 
5788 87 B3 BD 
5790 4D 27 Е7 
5798 44 44 44 


6780 BD ЕВ 79 
67АВ 70 44 44 


> 毎月 PiIO や /O を 読ん で いる と いつ も 思い ます . 一 一 あ ぁ , 自分 も プロ グラ ム を 組め る よう に な り た だ たい 


自分 も 含め 、 初心者 な ら 誰 で も 


š ° 
OQ QO а 選 っ て る の か な ぁ …。 と / 言 うわ け で 。 MEKA 5 А. ОВАЗІСМ ЕДАС ШШЕ О ЕФ F(R, C atik oK OTT. ジャ 
62 


(9 ЖЗА) 


Жама” ンジ ャ ン /). RASA, これ か ら も 頑張 っ て よ / P.S. いき な り 4 月 号 の PiOPiO に 初 登場 . 自分 の 下手 な 文面 に 思わ ず 赤 面 し て し まっ た . 
OT と | 
=> — 


АА А ーーーーーーーーーーーーーーーーーーーーー 


ロボ ッ ト 1 


ロボ ッ ト 2 ロボ ッ ト 3 


リス トク SPACE SCRAMBLE マ シン 語 リ スト 


6F48 C3 AØ 26 の 3 СЕ Сі 60 ҒҒ:7А 
&éFS@ 7F 17 52 4A 4р 27 05 7Е:07 
6F58 ФЕ 60 BD 63 EO 7E 68 15:С9 


ロボ ッ ト 


63 


= 
/IN 

(p.68) (255”| + [2’06”] 
* u — К k 0175 

マシ ン 語 部 分 が A 面 と B 面 に 収録 る れ て 

いま す の で ,。 カセ ッ ト に 続け て 録音 し 

CIA 

MOTOR OFF, 1 


ソノ シー ト を 使う 前 に 


жем РИО ҮЗЕ УМ, b 
を 破っ だ り , 傷 を 付け だ た り し な いよ うに , 
ミシン 有 目 に 治っ て 数 回 折り 曲げ て か ら , 
注意 し て 切り 取っ て くだ る い ( ソ ノシ ー 
F が 読み 込め な く て も お 取 替 で きま せん 
の で ご 注意 くだ る い )。 

友 ホ コリ も ロー ド ・ エ ラー の 原因 に な り ま 
+. カセ モット に 録音 する 前 に ホコ リ を な 
る で く 取 っ て ない てく だるい 

友 ソ ノシ ー ト は 何 度 も 聴く 前 に 必ず カセ モッ 
ト テ ー プ に 録音 し て お な いて くだ るい 

廊 ソ ノシ ー ト は 通常 の レヒ コード と は 大 きる 
が 違い ます の で , プレ イヤ ー の フル ・ オ 
ー ト の モー ド で は 正常 に 動作 し ませ ん . 
マニ ュ ア ル の モー ド で 使っ て 《 だ さい 

太い っ だ ん パソ コン に ロー ド し て OK と な 
っ た 場合 は , マソ コン か ら 別 の カセット 
ディスケット に セー ププ デ じ で で だ る 


GO の の の の の の の の の の の の の の の の の で 


RO = r 


今月 は つい に ボケ コン が ソノ シー ト に 登場 し まし た . 


1260761 だ け で す が , 
(т て いき а а AR Vy t ў. 


皆さん の 要望 が 多 


と りあ えす PC- 
けれ ば これ か ら も どん どん 収録 


リス エス ト と 報告 を お 待ち じ で お り ま ます . 


RUN"BAT-POD "| RETURN | 

で 自動 的 に 2 つの マシ ン 語 ロー ド し て 
実行 する よう に な っ て いま す . 
FEZA 
5АМУЕ"ВАТ-РОР”| RETURN | 


SAVEM "ВР МАІМ1”, &H7000, & 


HAFFF, &H9AOO| RETURN | 


SAVEM “ВР MAIN2”, &HBOOO, & 
HDFFF, &H9AOO 


ロー ド お よび 実行 方 法 
Hu-BASIC を 立ち 上 げ て 


ж — 753 
モー ニタ か ら 
SBOOO BFFE BOOO : SPACE MOUSE 


(5410 OBL + 
女 ロ ー ド お よび 実行 方 法 
CLOAD “THE-CAR" 
RUN[ RETURN | 
“т 
SAVE "ТНЕ-САВ”, &НАООО, & HA2FF 


[RETURN | 


(р.90) 11730") 
女 ロ ー ド お よび 実行 方 法 


モー ニタ か カ か ら 


(p.106) [1'18"] 

支 ロ ー ド お よび 実行 方 法 
LOAD| RETURN | 
RUN[ RETURN | 

セー ジジ 大法 


SAVE "ТЕСНМО.М/”| RETURN | 


1985 年 4 月 号 の ピオ に 載っ た 「ULTAN」(PC) で , 少し 面白 いこ と を 見 つけ まし た 
パタ ン を 条 し て , 右 に ある 3 つの 増幅 ブロ ッ ク を 並べ ます. そし て 上 か ら . 
скота だ 音波 が また 増幅 され . 
が まし て みょう な か な か 面白 いで し ょ う グ 


SAVEW "Т.УУ.М”, &H4OOO, & 


Н5ОЗҒ, &H4OOO| RETURN | 
ІМ PC-6000 シ リー ズ 


< 
al 


(84 年 12/ 
婦 ロ ー ド お よび 実行 方 法 


>) [242] 


й Е ое аа Ч 
CLOAD| RETURN | 
RUN[ RETURN | 

i FAD 
BASIC 部 分 
CSAVE"FIGHT" すわ 
マシ ン 語 部 分 
Pi0 モ ニタ か ら 


$8АОО, ВЕДЕ, F2| RETURN | 
D2 


_PC-1260/61 


C85 年 5 月 号 ) [0'25”] 

友 ロ ー ド お よび 実行 方 法 
CLOAD| ENTER | 
RUN[ ENTER | 


*+—;7° 1 


CSAVE“FLY!” 
ロー ド の ヒン トー 


ソン ノシ ジ シート の マス ター テー ジ は 2TR38 
で 作っ て いる の で す が , 今回 の PC-1260/ 
61 の プログ ラム は 高 域 成分 が 多く , 19cm/s 
で ダビ ング し だ た だ け で も か な り 高 域 特性 が 
劣化 する よう で す . 

カセ ッ ト に 録音 じ た だ 場合 は 。 505 SIV 

が 激しく な る こと が 予想 きれ ます .。 も し, 
な や ッ ト て せ ー ド で きる な か っ o た は зы а 
テレ オ か らら 直接 ポ ボケ コ ン に 接続 し て ロー ド 
し て みれ 4 だ まん | 


編集 部 か ら の お 願い 


今月 で 「 パ ソン コン DJ」 も 6 回 目 で , 多く の 
機種 で 実行 可能 で ある こと が わか り ま し た が , 
どの よう か 方法 が も っ と も ロー ド し や すい か を 
追求 し て いく た め に , 皆さん か ら の ロー ド の 報 
告 を お 待ち し て お り ま す . 

紀 い プロ グラ ム し か 入っ て な く て も , 手 で 打 
ち 込 ん だ 方 が 速い と は 思わ ず に , どう か 一 度 ロ 
ー ド し て みて くだ さい [| その 機種 て ソノ シー ドド 
が 有効 で ある こと が わか れ ( ば , 次 の 機会 に は 必 
ず 長 い プ ログ ラム を 収録 し た いと 思っ て いま す . 

また , ロー ド で き な か っ た 人 の 報告 も お 待ち 
し て お り ま す . 改良 が 必要 で あれ ば ぱ ば, どん どん 
改良 し て ,。 ソノ シー ト を , プロ グラ ム を 供給 す 
る 新しい メデ ィ ア と し て 確立 し た いと 考え て い 
ЕТ. 

ロー ド で きた 人 も , で き な い 人 も PiO 編 集 部 
宛 に 下記 の こと を お 知ら せく だ さい . 
今回 ロー ド さ せ て みた プロ グラ ム , ロー ド の 

成否 


GOGOOGOGOGOO( 


・ 気付 いな 人 も 多い と 思い ます が 。 7 面 で まず 右 下 の ス 
まだ は 下 か ら 音 波 を 発射 する と, その 音波 が 四方 に 飛び 散り 。 反 
四方 に 飛び 散る と いっ た 具合 に 水 久 レー プ に 入っ て し まい ます . ここ で 部 屋 の 明り で も 消し て 耳 を す 


(5 Є А,— ži) 


の ま 用 機材 
て の 他 , 


意見 , ご 希望 を 書い て くだ さい . 
送り 先 


а 151 東京 都 渋谷 区 代々 木 1-37-! 


ぜん らく ビル 5F 
帳 工 学 社 PiO 編 集 部 "ソノシート 」 係 


THE FIGHTER201 


今後 ソノ シー ト で 供給 し て ほし い プ 
ログ ラム が あれ ば その 種類 また ソノ シー ト . 
を 再生 する と き の 技 術 的 アイ ディ ア な E, 


-- 


JU 70 J) 27 


ナレ ーション ..... 


(SIDE А) 

p Hi, everybody, this is Roxana, пісе to be 
with you again. 

Let me give you а tidbit for 51 users first. 
Hitachi's introducing two types of printers as 
optional equipment for the S1 machines: one 
is MPP-1042, a ten-inch dot impact printer. 
You will find it at only 99,800 yen with lots of 
fancy printing functions, such as condensing, 
enlarging, Gothic font, and Italic font. 

The other опе is МРР-1060, a twelve-inch 
thermal transfer printer for kanji. It provides 
you with high-quality printing with low noise 
at only 158,000 yen. And it uses the longer side 
of size A4 paper, that is efficient in printing 
word-processed files. 

Both printers use cassette-type ink ribbons, 
easy to change. 

Now. are you ready for another fantastic 
experience with computer games? 

Well, here's the first piece of excitement, 
“Ваше Pod 51,” for Ше 51 series.Tm afraid 
the battle willincrease its intensity onto SIDE 
B. So please continue loading, otherwise, the 
computer will be out of your control! 

(SIDE B) 


How did you load on SIDE А? If you are 


losing, you can come over to ту “pad.” 
Here's the rest of the fight in the “Battle Pod 
61.” Nice try, guys! 

>At long last, m glad to present you, ХІ 
fans, with this masterpiece, the “Space 
Mouse” for the X1 series. 

Here we go! 

p Now, a game for SMC-777 is making its 
debut on the sonosheet. Let's jump into the 
thrilling game "Тһе Саг” and urge your car 


forward through rocks into the wild. 

(SIDE C) 

p Fight against the space bacteria with 
poison “manju” іп the “Bacteria Land” for 
the РС-8000 series. 

But don't get lost in а maze. 

p Му God! А lot of floppy disks are attacking 
us! Mad CPUs аге invading my brain! 

H you get addicted to computers too much, 
you might have a dream like this. Do you 
want it? Ok, just one step forward, then you 
will be in the middle of “TECHNO WAR” for 
FM-7. 

(SIDE D) 

p You are going to fight as a lone hand 
against thousands of fighter-planes. Оһ, 1 
wonder if you can survive! 

This is for the PC-6000 series, "Тһе Fighter 
201.” 

>At the request of pocket computer fans, 
here is “FLY! FLY!” for РС-1261/1260. Keep 
your course, or you'll be shot down by a crazy 
jet! 

p Did you get to the destination safely? 


Well, it's time to get back to the peaceful world. 


І hope you found a lot of fights in lots of bytes 
without any bites from the programs as usual! 
Please feel free to give us any comments ог 
advice, and tell me how you have enjoyed the 
sonosheets. 

Im sure these programs will bring you nice 
dreams. 

So, my friends, stay smart until next time! 
Bye bye. 


(АШ) 

РСАСЫН с зк TTT с, ` 
て うれ し いと も . 

ST, S31 ュー ザー の きん に と ッッ ドー 
А. 


НЫ ОХ ТуауШНЫИ, Z? УЕ 
2 機種 を 発表 し まし だ た だ. まず , 104 У +, 
ド у К . 
これ は 99.800 円 の 低 価格 で , 縮小 , 拡大 , 
ゴシック 体 。 斜体 な ど 豊 富 な 印字 種類 を 持 
っ て いま す 。 も う ひ と つ は 、12 イ ンチ 熱 転 
写 江 { 字 プ リン タ の MPP-1060 で これ る も 
158,.000 円 の 低 価 格 な が ら 6, 高 品質 印字 を 
低 騒音 で 実現 し まし た . 特に , A4 サ イズ 
の 横 の 大 きき る が 使え る た め , ワー プロ 印字 
に 最適 . そし て , どちら の 機種 も カモ セット 
式 リ ボン を 使用 し , Y No ERTER.. 
жасымыз ね , コン ビュ ー タ ・ ゲ ー 
ム を 始め まし ょ う . 用 意 は O.K ? 
最初 の ゲー ム は 「S1 バト ル ・ ポ ボッ ド 」 で 
T. この 戦い は 激烈 を きわ め , BE СЖ 
きま す の で し っ か り ロ ー ト し て くだ さい 。 
きる も な いと 動作 は 保証 し ませ ん. 

(B m) u 

>:A 面 の ロー ド は うま くい っ た ? 戦い に 負 
け て いる よう 5 だ っ た 65 私 の と ころ て こし いら っ 


し ゃ い ( 力 を 合わ せ て 戦い まし ょ う ). 22, 


「S] バト ル ・ ポ ッ ド 」 の 続き で す . が ん ば 
#1 4 

p X12 7 XO 38 š A, お 待 だ ぜ し まし だ 、 
あの 名 作 「 ス ペー ス ・ で г それ 
生け Z x 

PZT, ソノ シー ト に SMC-777 の ゲーム 


が 初 登場 スリル いっ ぱい の 「The 
Сат, ТЖТТЖЕІ 227 
(Са) ` 
РН» 55-7 8722227) 7 ҰН ЕТУ 
ジュ ウ で や っ つけ ろ / PC-8000 シ リー ズ 
「 バ バクテリ ア ・ ラ ンド 」. 迷路 で 迷わ な いよ 
эт ОПТ, 
を フロッピ ビー アデ イィ zarot: ° / 
CPU DHAOR THL т < 27 あ 
14222. 
Z 3 2 d 2 >b't йа, あら , еі! 
。 ОК, それ じゃ も うち ょ っ と 先 に 進 
ん で ご らん な る い . Eb, そこ は も ЭЕМ- 
7 ГТЕСНМО WAR」 のど 真 ん 中 / 
(0) x 
PAALA RRD KEC, š AIT 21 
一 人 で 戦い を 挑み ます . 35, ЖЕТЕ 
š 残れ る か . 
PC-6000 シ リー ズ 「The Fighter 201), 
pp ポケ コン ファ ン の リタ クエ スト に お 答え を し 
て お 送り し ます . РС-1261/1260, 'FL Y 2 
ВЕУ, а-л ИТТИ, クレオ ジー 
УтуһҺсЖЬЙЮ(254527/ 
日 的 地 に は 無事 着い た か な ? き あ , <> 
そろ 平和 な 世界 に 戻り まし ょ う . Zh] $ = 
ンピュータ に 負け ず に 頑張 っ て くれ た こと 
と 思い ます , 何 か ご 意見 。 ご 希望 が あり ま 
し た だ たら いつでも 5 どうぞ 。 楽し い ゲ ー ム を 選 
い 浮 べ て 、 よ い 夢 を 見 て くだ る さい 、 を それ て 
は 次 回 まで お 元気 で / パイ バイ. 


Oo с 


の の の の の の の の 


イン パク トブ プリンタ 0 МРР-1042, 


50000000000000000000000000000000000000000000000000000000000000000000 


000000000000 


OOOO000000000000000000000000000000000000000000000 00000000000 


注 : ソ ノシ ー ト の 損傷 に よる 返 本 は 原則 と し て 受け 付け ませ ん . 


ご 容赦 くだ さい . 
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⑧@ S1+ 拡 張 RAM 


K コ ン パ イラ ナマ シン 語 


ХР. 遠く で 起こ っ た 爆発 
の 衝撃 波 で , シー ルド が 後 か に 震え る . 
『 い つか ら … 戦 い 続 け て いる の だ ろう ?』 
思い 出 そ う と 心 の 底 を 探っ た が , 始ま り 
の 記憶 は ぼん や り と し て いて 定か で は な か 
7%; 
『 こ ん な こと が 何 か を 産み 出す わけ が な い 
じゃ な いか … 1 私 は つぶ や いた . 
繰り 返さ れる 戦い の 中 で , 目的 を 失っ た 
私 は 生き る こと を 捨て よう と し て いた . 
そん な と き , ふと … 
『 ず っ と 一 緒 よ …』。 幻 は そう 言っ た . 
『 た え … 子 ?』。 私 は 聞き 返し た . LDL, 
は 答え な か っ た . けれ ど , その と き 私 は 
生き て さえ いれ ば いつ か きっ と 彼女 に 再び 
巡り 会 える こと に 気付 いた 。 そう , 戦い は 
や が て きっ と 終わ る . そし て , あの 細い 体 
を 再び 抱き し め る 日 が 来る こと に . ノ 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


| BASIC 
マシ ン 語 7000--99ҒҒ 
K コ ン パ イラ 


スピ ー F, 動き , 操作 性 , р も う 
何 も 言 うこ と は あり ませ ん . と て も 
楽し い ゲ ー ム で す . (V) 


Ф) я Р 1 (BASIC š; 
に セー し ます 。 

@ リ スト 2 (マシ ン 語 部 : 7000 H —99 F F 
Н)ЖАЛЫ, 別 の テー デ に セー し ます . 
リス ト 3 (K ソ ー ス ) を 入力 し , 一 度 ま た 
講 の テー に セー プ し な だ 後 。 コン パイ ル し もし 


БМ 
> 
СР 
— 
Ni 
| 
b: 


кенені 


гар 


この へ ん は 楽 な の で パー フェ クト を ./ 


⑳ で きた だ た オプ ジェ クト を モニ タ の T コ マン 
ド で 9A00HーDCF7H に 転送 し ます . 

@ > X Z 4 n‘ v — + X (4D00H ~ 
4FFFH) # fä] U £ 5 (5 DDOOH ~ DFFFH (: 
転送 し ます . 

DCF8H-DCFBH に イン ター バル ・ タ 
A: 一 用 の フッ ク を 書き 込み ます (DCEF8 是 か 
ら モ タタ の 王 コ マン ド な ど で 7CH, DCH, 
FEH, 9H を 入力 し ます ). 

の の の ラテ - プ か ら マ シン 語 デ ゲー タ を ロー ド 
L, 7000h ~DFFFH を 9 の 後に 2,400 ボ ー 
で セー ググ す 4 ば 完 成 で す 。 


と 
кард 


$ 
Ааа 


タイ トル 画面 が 表示 、 れ て いる と き に , 
中 [3| で スピ ー ド を 選ん で くだ さい (|3| 
が 最高 速度 で す ). も し キー 入力 を し な い 
で いる と デモ が 始ま り ま す が , 何 か キ ー を 
押せ ば タイ トル 画面 に 戻り ます . 
地上 で の バト ル ・ ポ ッ ド の 動き を コン トロ 
ー ル する に は , 12|[3| の キー を 使い ま 
T. また , この と き |4|-|9| の キー を 押す 
と ジャ ング じ ま す . を そして, 空中 で の 前 後 
の 移動 速度 は |1|4||Z| で +1, [3][e][9] 


て は まつ 夜 作 し て いき まず 。 


й!)АК2 S1 バ トル ・ ポ ボ ポッド ТУУШУЛ F gm 


АТТІ, 


iPOD 


ttt KEY FUNCTION #1 
R ight 


| Left 


‘* BOMB | (89 
f 


HIGH JMP 
ОМ JMP 


. «MISSILE 


攻撃 用 兵器 は 3 種類 あり , 同時 に 使用 で 
きま す . まず [Z| キー は 前 方 に 投げ る 手 格 
ос, 放物線 を 描い て 落ち ます . ビー ム を 
発射 し て くる タン ク や , バリ ヤ を 破壊 する 
OU 3 ССС ат; ¿UX [K] +— FS 
に 向かっ て 飛ば す 火 球 で , 赤い 球体 な ど を 
攻撃 する の に 有効 で す . [C] キー は 前 方 に 
直進 する ミサ イル で , 4 連発 . バリ ア 以 外 
の すべ で て の 物体 に 有効 で す . な お , 敵 の 中 
に は 一 発 で 破壊 で き な い も の も ある の で 注 
意 し て くだ る い 、。 

面 は 基本 的 に は 4 面 ま で で す が , 各 キ ャ 
ラク タ の 動き や 最大 数 が 一 定 の 面 数 ご と に 
変化 する の で , 実際 に は 20 一 30 面 の 変化 が 
楽し め る と 思い ます . 


ЕЕЕ ШТП 
И Еа Шы... 
p~, 最近 私 は あま り プ ログ ラム を 作 


っ て いな いん で す よ . この ペン ネー ム が 今 
度 本 に 出る の は いつ に な る の か …・. 

と ころ で , ゲー ム を 終わ り に する に は , 
タイ トル 画面 表示 時 に | ESC | キー を 押し 
ЕЕ, 

大 貫 妙 子 さ ん 大 好き / 


| リス トイ 4 S1 バ トル ・ ポ ボ ポッド BASIC リ スト 


10 CLEAR, ЕН5ООО 

20 ñ=&HD000 

50 READ A$: D=VAL ("&H"+A$) : РОКЕ A, D:A=A+1 
:ІҒ D〈〉&H39 THEN3O 

40 EXEC&HDOOO 

SO MOTOROFF, 2』LURDM"BP MAIN" 


b0 рата Сс, ВО, FO, 10, ЗЕ, 40, 09 
70 DATA CC,B1,F1,10,3F,40,09 

80 рата СС, B2,F2, 10, ЗЕ, 40, 09 

90 DATA CC, B3,F3, 10, 3F, 40, 09 
100 DATA сс, 85, F4, 10, ЗЕ, 40, 09 
110 DATA 39 ; 

120 EXEC&H9ROO :CLERR。 &HD000:NEMW 


PiO 4 月 号 P.108 の 方 へ . ノイ ズ を 消す 方 法 は あり ます . 画面 を アク セス する 直前 に ODA6 番 地 を コー ル す れ ば よい の で す . 完全 に 消 を る わ 


(SO = 
Ол Ол ; ӘСӘ ЕжЕзРАЕ-БЫйЫыа Т, 見 や すく な 5 り ます よ . 
с Т 


(МЕС) 


00 


оо 
42 


оо 


20 


Дә, 


リス ト の S 1 バト ル ・ ポ ッ ド マシ ン 語 リス ト 
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の © ° (O) p K.C.C の NOP さ ん へ . PC-1245 の RAM 拡 張 は 
思っ て いる 今日 この ご ろ で す 。 


どう すれ ば いい の で し ょ うか ? 


P.S. 今年 高校 受験 で 小金 井 工 高校 を 受け れ ば よかっ た な 一 
(No37141234) 
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p 卒業 … こ の 2 文字 で どの くら い 涙 を 流し た か わか り ま せん . 大 好き だ っ た 人 と も 別れ … 毎 日 元気 な 顔 を し て 出合 っ た あの 日 々 …「 出 合い が 


あっ て 別れ が ある 」… 


これ も , 人 生 の うち の 運命 な の で し ょ うか .. 残念 で す . 


(細谷 美和 が 好き で す ) 


10 'DEF CK=$99A8;DEF ТКАМ=%7020 

20 "СОЕ $865F#, $1FBB#, ФСЕ, $5F00#;HISCO= 
OiRRY[] ; PUKE*FFD4。 130 

30 °ІМТ=ФҒООЕ 』 INT=INT(O)+10』 INVCO)=INT(O 
) sINT(O)=$DCF8 

40 °’ INV(1 )=PEEK( INT-1 ) 』 PUKE INT-1, $85;PO 
KE*FFD4。 128 

50 ’ START 』SCOURE=O』SCDRE2=SOO 』 MRN=5 ; SCENE 
=0;POKE$4F28, ОҘРОКЕФ4Ғ29,0 

80 'ST1;SCR[l;POINT=O;SW=80;FOR I=0 TD 2 
9$ DX (І) =RND (6440) $ DY (10 =RND (140) ; МЕХТ 

. 70 'TI=28-SCENE/4*2;IF ТІ(16 TI=16;FI;LM 
T=TI*110;LMX=80;P0I2=0 

80 'ST2;MX=50;MY=136;MVX=0;MT=0;MJ=0;MVv= 
Ò; DES=0 』 DAM=0 ; VK=0 ; VK2=O 

90 'IF РОІМТ+5СЕМЕ=0 W=$8D00;LGCó, 2J];LGI 
7, 1]; W=$BF90;STR[] 

100 "BCLR[] ; DEMO (0) =30000 ; REPEAT ; К=ІМКЕҮ 
[] 

110 "ІҒ K=$1B POKE$FFD4, 130;50[7, $FF] 
120 ° INTCO)=INVCO); POKE INT-1,INV(1);CLS 
[J CODE $35FF#;FI 

130 'DEMO(O)=DEMO(O)-1;UNTIL (К)707 AND 
К(747) OR DEMOCO)=0 

140 ’LINELO, O, 639, 151, 0, 231 ;STARC];0PC];M 
DEC[] 』S1 MX, MY, 3, 16, $7970] PLD[] 

150 'DEMD(1)=$9180;DEMO(2)=PEEK(DEMD(1)) 
;CRLL$7000 

160 'TI2=5;IF DEMD(O)〉O TI2=16-(K-49)*8; 
POKE$FFEO,4;FI;FI 

170 'MIX(O)=-1;MIX(1)=-1;MIX(2)=-1;MIX(3 
)=-1 

180 'BX=-1;SX=-1;FOR 1=0 TD4;FBF(I)=O;NE 
XT;FBC=0 

190 ’ GBF (0) =0; GBF (1) =0; GBF (2) =0; BBF (O) =0 
{ВВЕ (1) =0; BBF (2) =0; BAF =O 

200 'TBX(O)=-1;TBX(1)=-1;TBX(2)=-1;TBX(3 
)=-1 

210 'F1F(0)=0;F1F(1)=0;F1F(2)=0;F2F=0 
220 'TMX(O)=-1;TMX(1)=-1;TMX(2)=-1;FDR I 
=0 TO4;TSX(I)=-1;NEXT;BSF=0 

230 'FOR I=0 Т015;50С1, 02 ; МЕХТ;50С7, $30] 
;501=0;502=0;505=0 

240 'EFB=(SCENE AND 5) ж256+%8000 

250 ’ LOOP; POKE $DCFF, ОҘЕҒЕ-РОІМТ/200ж106% 
EFB; DE=O 

260 "IF DEMO(O)=O IF INKEY[J)O SO[7,$FF] 
GOTO STRRT;FI;FI 

270 'IF EFE=EFB+256 50(7,2551;600Т0 SCENE 
INC;FI;STRR[1lI;KRI1 

280 °*OPC1 ;MARKC1 $ ВЕАМСЈ $; SHOT C3 ; MIS CJ ; MAN 
MC1$TGBC1;TGMC1;TGSC1;FT1C1$FT2C] 

290 °’ FBOMC] ; GBALL C3 ; BOARD CJ ; BASE CJ 5 BSP [1 
3S0UT1[] 』SOUT2[] 』SOUT ミ [] 』CLOE] 


500 'WHILE PEEK( ま DCFF) 〈TI+TI23MENDiIF DE 


520 GOTO DESOP;FI 

510 'SW=SW+1;POINT=POINT+1;PO0I2=P01I2+1;G 
‘OTO LOOP š 

520 ” ПЕ50Р;50г12,501;50Г8, 161;50(9,161;65 
0210,161;50Г6,2311 

530 ”50(0,801;650С1,11;650С3,101;505,51;5 
07,02 ;50г15, ОЈ 

540 ”ОРГ(1;62ГМХ, МҮ, 3, 16, $7DFO1 』CLO[] ;WAI 
TE200] 』 IF MAN) O 

550 "LINE[O。 О, 639, 151 0, 21 $OPC31;MDECC1;C 
LOCI; GOTO ST2;FI 

560 "5БҮМГ4О, 80, "(ХХ GAME OVER )))",4,4,6 
1ҘІҒ DEMO(O)〉 O 

570 ” PUKE*$FFEO。 644; IF SCORE} HISCO HISC ロ = 
SCORE 』 CRLL ま 7006』FT ョ FT iMRITE400] 

580 "6070 START 

590 'SCENEINC;SCENE=SCENE+1;SYM[240, 54, " 
BONUS", 2,2,71;ВО-5СЕМЕжМАМж100%100 

400 ”ОРГ2;55Е2ГВО1 ; DSET [44, 58, BO, 21 ;CSET 
[56, 58,48,21;С10Г1 

410 °CALL$7003;WAIT [80] ; GOTO ST1 

420 ° MANM; OE=OE+624 

430 'IF MJ=O СХ-МХ;СҮ-МҮ;СА-МСНН(МТ/22;1І 
F ук)о AND VK (4 MVX=VK-2 

440 'ELSE;IF УКУ О JX=JVX(VK-&);JY=JVY (VK 
-&);MJ=2;S01=-JY;F1I;F1 

450 ’VK=0;O0X=MX+MVX;IF ОХ (O OR 0Х277 ОХ= 
MX;MVX=O;FI;IF MVX=1 

460 ° MT=0;ELSE IF MVX=O MT=MT+1 AND 7;EL 
SE MT=MT+Z AND 6;FI;F1;MX=0X 

470 'ñDR=MCHR(MT/2);C1[CX, CY, 5, 16] 81 [MX 
, MY, 3, 16, ADR] ELSE 

480 "ІҒ MJ=2 MJ=1;CX=MX ; CY=MY 』 CA=MCHR (MT 
/2) ELSE CX=MX;CY=MY;FI 

490 'QOX=MX+JX;0OY=MY+JY;JY=JY+1;IF VK>O V 
=VK-1 ; V=V-V/3*3-1;IF OY (108 

500 °ІҒ ABS(V+JX) (3 MV=SGN (MV); JTC]; JX=J 


X+V』 MV=V*4 ; VK=0;FI;FI;FI 

510 'IF ОХ‹О OR OX〉77 OX=MX;JX=O;FI;IF 0 
Y=1 さ 6 MT=0;MJ=0;MV=SGN (MV) ;RDR=$7970 

520 ’ ELSE; ADR=JMP CJ] ョ FT iC1 [CX, СҮ, 5, 16] 』JT 
[] 381 [OX。 OY, 3,16, ADR] 

550 ”MX=0X;MY=0Y;F I ; RETURN 

540 °ЈТ:А=АВБ СМУ) ; IF А) О IF МУ) О IF СХ) 1 
C1 [CX-2。 СҮ+4, 2, 5) ЕІ 

550 'ELSE IF СХ (76 СІГССХ+5, СҮ+4, 2, 35];ЕІ; 
ЕІ 

560 'IF Я) 1 IF MV)O IF ОХ) 1 61Г0Х-2, ОҮ+4 
,2,3,%72ҒАа-(А АМр12ж181;ҒІ 

570 "ELSE』 IF ОХ (7é SI1COX+3, 0Y+4, 2,5,%7ҒС 

A-(A RND1)*181;FI;FI 

580 'FI;MV=MV-SGN(MV);FI;RETURN ' 

590 'JMP;IF JX=O ñ=$7ñFO;ELSE;IF RBS(JY/ 
JX) (2 A=$7AFO;ELSE 

600 'R=SGN(JX)*SGN(JY)*192+$7RFO;FI;FI;R 
=A; RETURN 

610 'MIS;FOR I=O ТОЗ;1Р МІХ(І2)-1 ОЕ=0Е+ 

78 

620 °СІСМІХСІ), МІҮСІ), 2, 57 ;МІХСІ) =МІХСІ) 

-ЗҘІҒ MIXCI))-—1 

650 'S1[MIX(I), МІҮСІ), 2, 5, Ф7ҒООЈ РІ Е ЅЕ 
sIF MK〉O AND МХ) З 

640 'MK=0;WX=MX-2;IF MJ)O IF JX〈O WX=WX- 
1sFIšsELSE;IF MVX (O 

650 'WX=WX-1;FI;FI;MIX(I)=WX;IF MJ)O MIY 
CI)=MY+5;ELSE 

660 'IF (MT AND 22-0 MIY(I)=MY+7;ELSE;MI 

YCI)=MY+6;FI;FI 

670 'S1[MIX(I),MIY(I),2,3,$7F001;ñTS[(2O, 

31J;FI;FI;NEXT;RETURN 

680 " BEAM; IF ВХ (0 IF ВК)О AND МҮ) 16 BX=M 
X+1;WY=MY-B;IF MJ? O 

990 'IF JY(O WY=WY+JY;FI;FI;BY=WY;S2[BX, 

BY, 1, 8, $7ECO] ;ATS[2000, 201 $FI 

700 'ELSE;C2[BX, BY, 1,8,%7ЕС01;ВҮ-ВҮ-12;І 

F BY(O BX=-1;ELSE 

710 ’S2[BX, BY, 1,8, %7ЕСОЈ ;0E=0E+104;FI;FI 
; RETURN 

720 ”5НОТҘІҒ 5Х (0 IF SK)O AND МХ) 2 WX=MX 

ー1 5; SY=MY+4 

750 “ІҒ МЈ=0 SVX=MVX-1;SVY=-4;ELSE SVX=J 
X-1;SVY=JY/2;FI 

740 'IF МЈ) О AND JY〈(O WX=WX-1;ELSE IF МУ 
Х‹О WX=WX-1;FI;FI 

750 'SX=WX;S1[SX,SY, 1,4,$7F201;RTS[(512, Z 


.1J;FI;ELSE IF SY)-1 


760 'C1[SX,SY,1,41l;FI;SY=SY+SVY;IF SVY (1 
2 SVY=SVY+1;FI 

770 'SX=SX+SVX;IF SX)-1 AND SX (8O AND SY 
(148 IF SY〉-1 S1[SX,SY,1,4,$7F301;FI 

780 'ELSE SX=-1;FI;FI;RETURN 

790 'FBOM;FOR I=0 TO4;IF FBF(I)=O IF EFE 
:0))RND(255) AND FBC(EFE:1) 

BOO 'IF 50) 5 IF TST[156]=1 SM=OjFBX(1)=- 
1;FBF(I)=2;FBC=FBC+1 

810 'FI;FI;FI;ELSE;OE=0E+156;CX=FBX(I);O 
A=$76D0 

820 'FBX(I)=FBXCI)+1;IF ЕВХ(12)77 OR FBF 
(1)=1 FBF<I)=0;FBC=FBC-1;ELSE 

850 "IF DC[FBX(I),148,3,4J=1 FBF(I)=1;EL 
SE 

840 'IF ВІСЕВХ‹І), 148, 5, 4]=1 ҒВҒ(12-1;56 
[5] 』ELSE 

850 'IF RND( さ )=O IF В2ІЕВХ(12,146,3,61-1 
FBF(1)=1』SSC5] FI 

B60 'FI;FI;F1;0X=FBX(I);sIF FBF(I)=1 DR=$ 
7700;FI;ELSE;0X=-1;FI 

870 ° IF CX)-1 С1ГСХ, 148,3,4l;FI;IF 0X)-1 
S1 [OX, 148, 3, 4, ОЯЈ ;ҒІ;ҒІ;МЕХТ ; RETURN 

880 'GBRLL;FOR 1=O ТО2ҘІҒ GBF(I)=O IF EF 
Е:2)) RND(255) IF SW}3 

890 ’ IF TST[B28]=1 SW=0;GBX(I)=-1;GBY(I) 
=RND(32)+(EFE:3+I) AND 15)*7 

900 ”бУХ(СІЗ-ЕҒЕ:3%12/128%1%(5СЕМЕ/4 АМО 
1) ;GVYCI)=RND(8)-4;GBF(I)=3;FI;FI;FI 

910 ’ ELSE ;CF=0;0F=0;0E=0E+828; IF GBX (1)) 
-1 IF GBY(I))-1 


920 'CF=1;CX=GBX(I);CY=GBY(I);IF GBF(I)= 


1 CA=$74CO;ELSE CA=$7310;FI;FI;FI 

930 ’GBXC(I)=GBX(I)+GVXCI); IF бВХ(12277 0 
R GBF(i)=1 OR GBX (1I) (O GBF (1) =0 

940 ’ ELSE; GBY (1) =GBY (1) +6GVY (I17 $ GVY (1) =GVY 
YCI)+1;IF GBY(I))=140 GBY(I)=140 

950 'GBS=EFE:Z+I)/16 AND 3;IF GBS=0 GVY( 
I)=-GVY (1) ;ELSE 

980 'IF GBS=1 GVY(I)=-GVYC(I)*7/1O;ELSE I 
F GBS=2 

970 'GVY(I)=-GVY(I)*(8+RND(5))/10;ELSE G 
VY(1)=-GVY( 1)*(9+RND( さ ) ) /10 
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980 "IF RND(5)=0 GVX(I)=-GVXCI);FI;FI;FI 
ІҒІҢҒІ; 0A=$7310 

990 "IF DCCGBX(I), GBY(1), 5, 121=1 GBF(I)= 
1 』ELSE 

1000 °’ IF B1[GBX(I),GBY(I),3,12J=1 GBF (I) 
=1 3SS[15] ; ELSE 

1010 "ІҒ ВЗГІСбВХ (І), СВҮ‹І), 5, 12]=1 GBF (I) 
=1;SS[201;ELSE 

1020 'IF В2ГСОВХ(1),бВҮС(12,5,121-1 GBF(I) 
=GBF (I)-1 

1050 'IF GBF(I)=1 SS[10] 』ELSE 502-12;ҒІ; 
FIšsFIsFIsšsFIsIF GBY(I))-1 

1040 'OF=1;0X=GBX(I);O0Y=GBY(I);IF GBF (1) 
=1 OA=$74CO;FI;FI;FI 

1050 °’ IF CF=1 C2[CX, СҮ, 5, 12, САЈ;ҒІ;ІҒ OF 
=1 52ГОХ,0Ү,3,12,О081;ҒІ;ҒІ;МЕХТ 』 RETURN 
1060 'BORRD;FOR I=0 Т701%(5СЕМЕ/5 AND 1) 
1070 "IF BBF(I)=O IF ЕҒЕ:4)) RND(255) IF 
SW) 3 

1080 °’ IF Т5ТГІ9001-1 SW=0; BBX (І) =-1 ; ВВЕ (I 
) =6; BBS (1) =EFE : 7) 』 BBH( 1 )=RND( 192) 

1090 'FI;FI;FI;ELSE;OE=0OE+900;CX=BBX(I); 
CH=BBH て C I); IF СН)96 СН-192-СН;ҒІ 

1100 ’ IF BBF(I)=1 СА=%7790;Е1 5Е CA=$7730 
;F1;BBX(I)=BBX(I)+1 

1110 'BBH(I)=BBH(I)+BBS(I);IF BBH(1)) 191 
BBH(I)=O;FI;0X=-1 

1120 'IF ВВХ(12277 OR BBF(I)=1 ВВҒ (І) =0; 

ELSE OH=BBH(I);IF ОН) 96 OH=192-0H;FI 
1150 ’OA=$7730;IF ЮСГВВХ(12,144,3,81-1 В 
BF (I)=1;ELSE 

1140 "ОВй-%7950%ОСГВВХС12%1,156-СН,1,161 
1150 "IF ВІГВВХ(12,144,53,81-1 ВВҒ(І2-1;5 
S[301sELSE 

1160 'IF В2ГВВХ(12,144,5,81-1 BBF (1) =BBF 
(1= 131Е BBF(I)=1 

1170 'BBF(I)=6;SS[51;0H=0;BBH(I)=0;FI;EL 

SE 

1180 "ІҒ ВІГВВХ(12,136-ОН,1,161-1 OH=0;B 

BHCIJ=0;FI;FI;FI;FI 

1190 ’BZ[BBX(1), 136-OH, 1, 16] 』 BS[BBX( 1 ) 。 1 

56-0н, 1, 1671 

1200 'OX=BBX(I);IF ВВЕ (І) =1 DR=$7790』ELS 

Е OA=$7730;FI;FI 

1210 "ІҒ СХ) -1 C2ECX+1 136-CH, 1, 16, $7930 
J; C2[CX, 144, 35,8, САЈ;ҒІ 


1220 "IF ОХ)-1 52Г0Х%1,126-ОН, 1 16, $7930 


1;52Г0Х,144,3,8,081;ҒІ;ҒІ;МЕХТ; RETURN 
1250 ’BASE;IF BRF=O IF EFE:8))RND(255) I 

F SW) 3 

1240 'IF Т5ТГ11041-1 SM=ー1 』 BRHX=-1 』 BRY=14 

O3 BAF =4 ş BAD=O; BCF=0;FI;FI;FI 

1250 ' ELSE ; CX=BAX ; CY=BAY ; CA=$7550; BC=BCF 
; OE=OE+1104 

1260 'IF BAF=1 CA=$7610;BAF=0;0X=-1;IF В 

C=1 CA=$74C0;FI; ELSE 

1270 ’' IF BAF=4 BAX=BAX+1; IF EFE:9) (BAX В 

AF=3;F I; ELSE 

1280 °ІҒ BAF=3 BAY=BAY-1;IF BAY=130 BAF= 

2;FI 

1290 ’ ELSE; BAX=BAX+3+ (SCENE AND 1);FI;FI 
:08-%7550 

1500 ’ IF DC[BAX, ВАҮ,4,121-1 ВСҒ-ВАҒ (4; ВА 

F=1;ELSE 

1510 'IF B1[BAX, ВАҮ,4,121-1 вар=вар+з 
1520 'IF Вар, 5 ВСҒ-ВАҒ (4; BAF=1 ; S5025) 』EL 
SE 802=12;FI; ELSE 

1330 ’ IF В2ГВАХ, BAY, 5, 12J=1 BAD=BAD+ 1 
1340 ° IF BAD)5 BCF=BAF (4; BAF=1;SS[30] ŞEL 

SE 502-12;ҒІ;ҒІҢҒІҢГІ 

1550 'IF ВАХ) 76 BAX=-1;BAF=0;FI;0X=BAX;0 
Y=BAY 

1360 °’ IF BAF=1 IF BCF=0 шені RO ENE 
ш%7А4СОҘҒІҢҒІҢГІ 

1370 "IF СХ»-і C2LCX+BC, СҮ, 4-BC, 12, CR1;F 
I 

1580 'IF 0Х)-1 S2[OX+BCF 。 OY, 4-ВСҒ, 12, 041 
sFI;sFI;RETURN 

1590 'TGB;IF DAM} о рам=рам-1 』F 1 』TGF=O』FO 
R I=0 TO3S;IF TBX(I))-1 

1400 ”СІ1ГТВХ(І),ТВҮс(12,2,11;ТВХ(Іо-ТВХ(сІ 
)+ さ 』 IF ТВХСІ) (77 

1410 ’ IF DR[TBX(I), TBY(I),2,11=1 рам=рам 
+15 IF рам) 44 DES=1;FI;TBX(I)=-1 

1420 "ELSE S1CTBX{(I), TBY(I),2,1,%$7F401;F 
IsELSE;TBX(I)=-1;FI;ELSE 

1450 'IF ВАҒ)2 AND RND(C(BRF- さ ) ж52+8) =O 』 I 

F TGF=O ТВХ (І) =BAX+1+BAF 』 TBY( 1 )=BRY+5 
1440 ”ТбӨҒ-1;51ГТВХ(1),ТВҮС(І2),2,1,%7Ғ401; 

FI;FI;sFI;sNEXT;RETURN 

1450 'FT1šsFOR I=O Т01%(5СЕМЕ/2 AND 1›;1Е 
F1F(I)=O IF ЕҒЕ:10)» RND(255) 


a 


X— T 2 Ға” 
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1460 * IF TSTEB2B]=1 F1X(1)=RND(50)+15』F1 
Y(I)=-10;F1VX(I)=O;F1VY(I)=10 

1470 'F1M(I)=RND(5)+4&;F1F(I)=2;FI;FI;ELS 
E;0OE=0E+828;CX=F1X(I);CY=F1YCI) 

1480 'IF F1F(I)=2 CA=$73A0;ELSE;CA=$74C0 
;FIsPVY=F1VYCI) 

1490 'F1XCI)=F1X(I)+F1VX(I);F1YCI)=F1YCI 
)+F1VY(1T) ;Е1М(1)=Е1М(1)-1 

1500 'IF F1MCI)=O F1VX(I)=(RND(2)-1)*(2+ 
CSCENE/7 AND 1)) 

1510 *F1VY(1)=(RND( さ )-1)*CRND(4)+4) 3F1M( 
1)=RND(4)+4jFI 

1520 "IF Ғ1Х(12)77 OR F1X(I)(O OR F1FC1I) 
=1 F1FCI)=OiELSE 

1530 "ІҒ F1Y(I)(O DR F1Y(I))EFE』11) F1Y( 
I)=CY;F1VYCI)=-PVY;F I; 0A=$73A0 

1540 'IF ПСІҒІХСІ»,Ғ1Ү(12,3,121-1 Е1Е(1) 
=1 ;ELSẸ 

1550 / ТЕ ВІСРІХ(І), Ғ1ҮС1),3,121=1 Е1Е(1) 
=1 $ SS[30] ;ELSE 

1560 'IF В?ІҒІХСІЗ,Ғ1Ү(19,3,121-1 ҒІРСІ» 
=1;SSL201;ELSE 

1570 'IF ВЗІҒІХСІ»,Ғ1Ү(12,3,121-1 ҒІРСІ» 
=1 3SS[10] jiFIFIiFIjFI 

1580 'OX=F1X(I);OY=F1Y(I);IF F1F(I)=1 OA 
=$74CO ョ FT FI 

1590 'IF СҮ)-1 С2ГСХ,СҮ,5,12,СА1;ҒІ 

1600 "IF F1F(I))O 52Г0Х,0Ү,3,12,081;ҒІ;Ғ 
I;NEXT;RETURN 

1610 'FT2;IF F2F=O IF EFE:12))RND(255) 
1620 'IF TST[B2B]=1 F2X=-1;F2Y=RND(32)+1 
b$F2VX=2+(SCENE/3 AND 1);F2VY=0;F2D=0 
1650 'F2M=RND(8)+16;F2F=2;FI;FI;ELSE;OE= 
DE+B28 iCX=F2X 』CY=F2Y 

1640 "ІҒ Е2Ғ)1 CA=$7430;ELSE;CA=$74C0;FI 
; PVX=F2VX 』 PVY=F2VY 

1650 'IF Е2Х%3)-МХ AND F2X(=MX+ さ IF F2F= 
2 IF ЕҒЕ:13)) RND(255) 

1660 'IF МҮ-Ғ2Ү) О F2VX=0;F2VY=RND(5)+8;F 
2M=(MY-F2Y) /F2VY;F2U=F2M;F2F=3 

1670 'FI;FI;FI;FI;F2X=F2X+F2VX;F2Y=F2Y+F 
2VY;F2M=F2M-1 

1680 'IF F2M=O IF Ғ2Ғ-3 F2F=2;F2M=F2VY*F 
2U/4-RND(16) ;F2VY=-4;ELSE 

1690 'F2VY=(RND(3)-1)*RND(3);F2VX=(RND (2 
)*2-1)*(RND(2)+1);F2M=RND(4)+3;FI;FI 
1700 "IF F2F=1 F2F=O;FI;IF F2Y (O OR F2Y) 
140 F2Y=CY;F2VY=-PVY;FI;OñR=$7430 

1710 'IF DCCF2X,F2Y, 3, 12]=1 F2F=1;ELSE 
1720 "ІҒ В1(Е2Х,Ғ2Ү,3,121-1 F2F=1』SS[3O] 
з 

1730 'IF В2ІҒ2Х,Ғ2Ү,3,121-1 F2D=F2D+ さ 
1740 'IF F2D)5 Ғ2Ғ-1;58(201;Е15Е;502-12; 
FI;ELSE 

1750 'IF ВЗГЕ2Х,Е2Ү,3,121=1 F2D=F2D+2 
1760 'IF F2D)5 F2F=1』SS[10] ;Е15Е;502=12; 
FI;FI;FI;FI;FI 

1770 'IF Е2Х)77 IF RND(4)=O F2F=0;ELSE F 
2X=CX;F2VX=-PVX;FI;FI 

1780 'IF F2X〈O F2X=CX;F2VX=-PVX;FI 

1790 'OX=F2X;0Y=F2Y;IF F2F=1 Об-%74С0;ҒІ 
1800 'IF CX)-1 С2ССХ,СҮ, 3,12, CAI ŞFIŞIF F 
2FyO S2[0X, OY, 3, 12, OA1 ŞFI;FI; RETURN 

1810 'TGM;FOR (1-0 TO2;IF TMX(I))-1 

1820 ? CiCTMXCI), TMY (1), 1, B1 TMY CI) =ТМҮСІ 
)+12;1Е TMY(I) (=144 

1850 'IF БАСТМХ(12,ТМҮС(12,1,81-1 DES=1;T 
MX (I) =-1 $ ELSE 

1840 ’S1ETMXCI), TMY C1), 1,8, Ф7ЕЕОЈ ョ FT ELS 
E;TMX(I)=-1;FI;ELSE 

1850 'J=RND(2);IF F1F(J)=2 AND F1VX(J)=O 
1860 'IF RND(5)=0 TMX(I)=F1X(J)+1;TMY(I) 
=F1Y(J)+12 

1870 'S1[TMX(I), ТМҮСІ), 1,8, $7EEO1ŞFIŞFI; 
FI;NEXT;RETURN 

1880 'BSP;IF BSF=O IF EFE:14))RND(255) 
1890 'IF TST[1270]=1 BSX=-1 』BSY=RND (4) *8 
+(SCENE AND $18) 』 BSV= さ 』 BSD=O 

1900 'BSM=13;BSF=2;FI;FI;ELSE;OE=0E+1270 
; CX=BSX jCY=BSY 

1910 "ІҒ BSF=2 CA=$77F0;ELSE;CA=$7890;FI 
; PV=BSV 』 BSX=BSX+BSV 』 BSM=BSM- 1 

1920 "ІҒ BSM=@ BSV=(RND(2)*2ー1)*CRND(2)+ 
1 ) $ BSM=RND( さ )+ ミ ョ FI 

1930 'IF BSX〉75 OR BSX (O BSX=CX-PV』 BSV=ー 
PV*2 ォ FT IF BSF=1 BSF=OiF1 iDR=$77FO 

1940 "IF DC[BSX, BSY, 5, 8]=1 BSF=1 』ELSE 』B1 
СВХ, BSY, 5,8) 、 

1950 'IF B2[BSX, BSY, 5, 81=1 BSD=BSD+3 
1960 'IF BSD)11 BSF=1』SS[100] ŞELSE;SO02=1 
2;FI;ELSE 

1970 'IF ВЗГВ5Х,В5Ү,5,81-1 BSD=BSD+4 
1980 'IF BSD)11 В5Ғ-1;55(801;Е15Е;502-12 
;FI;FI;FI;FI 

1990 *'ОХ=В5Х;ОҮ=В5Ү;1Е BSF=1 OA=$78905FI 
2000 'IF CX)-1 C2[CX,CY,5,8,CR1;FI;IF BS 
F〉O 52Г0Х,0Ү,5,8,0А1;ҒІ;ҒІ;БЕТИЯМ 

2010 'TGS;FOR 1=0 TO4;IF Т8Х(1))-1 

2020 'IF TSY(I))-1 C1CTSXCI),TSY(I),1,43 
;F1I;TSXCI)=TSX(I)+TSVXCI) 

' 2030 'TSYCI)=TSYCI)+TSVYCI);IF TSVYCI) (1 
6 TSVY(I)=TSVY(I)+1;FI 

2040 'IF TSY(I)) 148 OR TSXCI)(O OR TSX(I 
))79 OR DCETSXCI), TSYCI), 1,4]=1 

2050 'TSX(I)=-1;ELSE;IF TSY(I))-1 S1[TSX 
CI),TSYCI),1,4,$7EBOlJ;FI;FI;ELSE 

2050 'IF BSF=2 AND RNDCB)=O TSX(I)=BSX+2 
; TSY(I)=ESY+8 

2070 7 TSVX て 1 )=BSV』 TSVY(T)=O3S1 [TSXC1I),TS 


OGRE) と 4 月 号 の この コー ナー に 載っ か っ た 方 。 お 返事 で す の っ ノ / ま ず p.84 打 伊 奈未 刀 論 くん . あん た は エラ イッ 
Оле, ет ож. 宮崎 先生 の こと を 書い て まし た が , 少し で も 彼 に つい て 知っ て いる な ら , せめ て "K 


を いか いま も よう 。 


ポッ ド ソー ス ・ リ スト 


びす て (書き 捨て ? ) は 良く な い / 


Y(1),1,&,$7EBO1;FI;FI;NEXT;RETURN 
2080 ’STAR;FOR I=0 T029;IF DX(I)=-1 IF R 

ND(80)=0 DX(I)=0 

2090 'DY(I)=RND(140);FIsELSE;DOC[DX(I),D 

Y(1I)]J;šDX(I)=DX(I)+2 

2100 'IF DX(I) (640 DOSCDXCI), DYCI), (DY(I 
2 AND 52%11;Е(5Е DX(I)=-1;FI 

2110 'FI;NEXT;RETURN 

2120 > MARK; IF РО12-640 РОІ2-О  МХ--1;ҒІ; 
IF LMX (8O 

2130 'IF LMX)=O SICLMX; 152, 1,6, 67۴6231۴1 
sLMX=LMX+1 

2140 "IF LMX(80 SI[LMX, 152, 1, 6, $7F50];FI 
sFI;RETURN 

2150 ”50071;650(9,5011;50(2,96-501ж21:;ІҒ 
50120 501-501- 1; FI; RETURN 

2160 ' SOUT2; S0C10, 502ж15/121;60г4, (502 A 
ND ФҒр2ж161;50Г5,11 

2170 "ІЕ 50220 502=502-2;ҒІ ; RETURN 

2180 ”500Т3;ІҒ 5035) 0 50Г6,5051;5035-503-2 
;FI;RETURN 

2190 ’ATS;SOCO, X1 AND %ҒҒ1;50Г1,%1/2561; 
SOCA, %21; SOC8, 161 

2200 ’S0[12, 201;S0[13, 0] ;503=%2; RETURN 
2210 "SCR』CLSE] АМОГІИ ІМЕ ГСО, 178, 639, 19 
9-а:132 

2220 'LINEC1, 178, 1, 199.。4。0。0] LINE 658, 1 
78, 638, 199, 4, 0, 01 

2250 'SYM[3S2, 181, "HIGH SCORE", 2. 1. 7]48Y 
МС351,181, "HIGM SCORE"; 2 1, 1) 

2240 .’ OP CI] sDSET [64, 181, HISCO, 51; CSET[76。 
181,48,51;С10Г2 

2250 "Б5ҮМІ452, 189, "SCORE", 2,1,61;85ҮМІ451 
„1990. =: > 1.21 

2260 *ОРЕ1;05ЕТГ&4,189,5СОНЕ, 51; CSET [76。 
189, 48, 31 』 MSET [上] ; CLOC] 』 RETURN 

2270 'MSET;COU=O;WHILE COU (MAN AND соо ‹1 
0;52ІС00ж4%1, 181, 3, 16, $79701 

2280 'COU=COU+1;WEND;IF COU(10 C1[COU*á+ 
1,181,3,16)JšFIšsRETURN ` Ç 

2290 'MINC;IF MAN (10 MAN=MAN+1 ; 51 [MAN*4- 
5,181,5,16,%79701;ҒІ;БЕТИЯМ 

2500 ° MDEC 5 C1 ГМАМж4-3, 181, 5, 16, $79701 ;MA 
N=MRN- 1 』 RETURN 

2510 'ñRY;BPOINT=$5C00;MCHR=DIM[41;JVX=D 
IME6] 』JVY=DIME6] 

2520 ° JVXCO)=ー1 』JVY(O) う =ー-10』JVX(1)=0』JVY( 
1)=ー12 』JVX(2)=1 』JVY(2)=ー10 

2550 °’ JVX( さ )=ー1 』JVY( さ )=ー-14』JVX(4)=O ョ JVY( 
4)=ー16』JVX(5)=1 』JVY(5) =-14 

2540 "MCHR(O ) =%7970 ; MEHR( 1 ) =$7С70 ; МСНЕС 2 
2ш%7970;МСНН(3)-%7050 

2550 'DEMD=DIM[3J;MIX=DIM[41;MIY=DIM[41; 
FBX=DIM[51;FBF=DIM[51 

2560 'GBX=DIM[31;GBY=DIM[31;GVX=DIM[31;G 
VY=DIM[3] ;GBF=DIM[3] 

2370 "BBF=DIME さ ] 』 BBX=DIME さ ] 』 BBS=DIME さ ] ; В 
BH=DIM[ 3] 

2580 ° TMX=DIMC31 ; TMY=DIM[3] ; TSX=DIM[5];T 
SY=DIM[51;TSVX=DIM[S51;TSVY=DIM[S51 

2590 'TBX=DIM[41;TBY=DIM[41;F1X=DIM[21;F 
1Y=DIM[ さ ] ;F1F=DIM[3] 

2400 "F1VX=DIM[ さ ] ョ F1VY=DIME さ ] 』F 1M=DIME ミ ] ュ 
sDX=DIME さ 30] ; DY=DIM[Z0] 』 INV=DIME2] 

2410 ° RETURN 

2420 'DC;R=O;IF %1+%3)=MX IF X1〈(=MX+ さ IF 
42+44) =MY IF X2(=MY+16 

2450 °’ IF CK[%3, %4, OA, МХ-%1, МҮ-х2, ADRI DE 
S=1;A=1;FI;FI;FI;FI;FI;A=A; RETURN 

2440 ’'DA;A=0; IF X1+X% る ) =MX IF %1 (=MX+3 

2450 °’ IF %2+Х%4)=МҮ IF %2‹=МҮ+16 A=1;FI;F 
I;FI;FI;A=A; RETURN 

2460 'B1;A=0; IF %X1+%Z)=SX IF %1(=SX+1 
2470 °’ IF X2+X4) =SY+(SVY(O)*SVY IF х2<5-5Ү 
+4+ (SVY) 0) +SVY IF SX)-1 

2480 °Я=1;С215Х, 5Ү, 1, 4, Ф7Ғ307 ;5Х=-1;ҒІ;Ғ 
I;FI;FI;sFI;R=R;RETURN 

2490 °В2;Я=0;ҒОВ 7-0 TO3;IF MIX(J))-1 IF 
Х1+Х35) =МІХСЈ) IF %1(=MIX(J)+2 

2500 'IF %2+%X&)=MIY(J) IF х2 (=МІҮ(Ј) +ЗА= 
1:С2ГІМІХ(.72,МІҮ(,72,2,53,%7Ғ001 

2510 "МІХСЛО--1ҢГІҢГІҢГІҢГІҢГҒІ;МЕХТ; A=A; 
RETURN 

2520 'BZ;ñ=0;IF X1+X さ ) =BX IF х1 (=ВХ+і IF 
%2%%4) =ВҮ IF Х2 (=ВҮ+8 IF ВБХ)-1 ñ=1 

2550 ”С2ГВХ,ВҮ,1,8,%7ЕС01;ВХ--1;ҒІҢГҒІҢҒІ 
FI; FI; A=A; RETURN 

2540 'TST;IF OE+%1 (LMT UE=UE+X1 』 =1 3ELSE 
A=0;F I ; RETURN 

2550 ” 55;50ГО0, 801;60г1,21;50г6,81;50С8,1 
61;50112,151;50Г15,01;5035-О0О 

2560 'SSE2;SCORE=SCORE+X1;WHILE SCORE) =S 

CURE2 SCORE2=SCORE2+500 

2570 "MINCE] 』MEND iDSET[64。 189, SCORE, 3J;R 

ETURN 

2580 °’OP;GPC1 ; СКА=1 ; RETURN 

2590 "ОР2;ІҒ GRR=O OPC1;F1; RETURN 

2600 °CLO;POKE GADR, OiTRRME] ; GRA=0; RETUR 
N 

2610 'CLD2;IF GRA=1 CLOC1;FI1; RETURN 

2620 'МОР;1Р GADR) RDDR(O)+120 CLOC1;OPC] 
şFI1 $ RETURN 

2650 °51;СРОКЕ GADR, і, х1, х2, х5, х4, Х5#; МО 
PCJ ; RETURN 

2640 ”Сі;СРОКЕ GADR, 2, %1, х2, Xš, х4; МОРСЈ ; 
RETURN 

2650 'S2;CPOKE GADR, 3, хі, х2, х5, х4, X5#;ND 
PEJ; RETURN 

2660 ’C2;CPOKE GADR, 4, х1, х2, %3, х4, Х5%;МО 


PCI; RETURN 

2670 'CSET;CPOKE GADR, 5, %1, х2, х5, х4; МОРГ 
J ; RETURN 

2680 ’ DSET 』 CPUKE GADR, b, Х1,Хх2,Х5%, Ха МОР 
ТЈ ; RETURN 

290 ° DOS; GPC) sCPOKE GADR, ов, x3, O, х1#, х2 
#;CODE $3470#, $103F#, $4206#, $35F0O# 

2700 °DOC;GP[1;CPOKE GADR, O#, 1%, х1#, Х2%; 
CODE $3470#, $103F#, %4200#, 655ҒОЖ 

2710 °CLS;CODE ФСС, $4700#, $3470#, $103F#, 
%4200% 

2720 'CODE %С600%,%105Ғ%, 64106%, ФСС, $989 
0%, %1053Ғ%, %4107%,%55ҒОФ 

2750 “( АМОҘОРГ2;ҒОН 1=0 ТО 79;61Г1,152,1 
,6,%7Ғ621;61ГІ,158,1,18,%7Ғ742 

2740 "NEXT』CLOE] 』 RETURN 

2750 'LINE;GP[J;CPOKE GADR, о#, х5, O, Ой, %1 
#,х2#, Х5%, 4#, X6 

2760 °СОрЕ %5470%, %105Ғ%, %4201%, 655ҒОФ% 
2770 'PRI;GP[1l;CPOKE GADR, 0%, Х5,0,%1%, %2 
%,1,Хх4;СОрЕ %5470%,%1035Ғ%, %4204%, %55ҒОЖ 
2780 'GCHR;GP[1;CPOKE GADR, 0%, 0, $OZOF#, O 
-Х1%,Х2%, ОЖ, O#, Х5%, ОЖ, Х5%, Х4%,1,Х5 

2790 °СОрЕ %5470%, %103Ғ%, %4209%, %55ҒОФ 
2800 'SYM;WHILE PEEK(X さ ) (20; СОрЕ %АҒ, %Е6 
‚ $F806#, 65470%, %105Ғ%, %421В%,%5570% 

2810 ° OA=BPOINT ; CR= ま $FO14 CA=CA(O) СРОКЕ 
OA, 7#, 7#; РОК I=0 TOZ;DACID=CACI) ; NEXT 
2820 ” GCHRCI%1, %2, %4, 45, %6, BPOINT] $ X さ =X% さ + 
1 ;%1=%1+%4*8 ; WEND ; RETURN 

2830 °’ GPR; I=0; WHILE PEEK(X4+I) 90 

2840 ’CSET[X1*2+I*+2, «2*8, РЕЕК(х4%1),%51; 
I=I+1; WEND; ロ =X4+ 1 ; RETURN 

2850 °’ 50; POKE $FFES, %1;POKE $FFE4,%2;RET 
URN 

2860 ° рІМ; А=ВРОІМТ ; ВРОІМТ=ВРОІМТ+х1ж2 ; А= 
A; RETURN 

2870 ° INKEY;CODE %3470%#, $103F#, $4101#, $1 
Е89%, $4F, まく 5F O# 

2880 'BCLR;WHILE ІМКЕҮСЈ O O;WEND; RETURN 
2890 'KR;MK=0;BK=0;SK=0;ñ=0;IF DEMO (0)) 0 
sI=PEEK($FFEO);K=I;GOTO KEYR1 

2900 'KEYR;K=PEEK($FFEO);IF KOI 

2910 "KEYR1 』 IF К) 127 

2920 "し =1 』 REPEAT; IF PEEK( ま 700F+L )=K 

2930 'IF VK2 (OL VK2=L;A=1;ELSE A=2; GOTO 
KEYR;FI;FI 

2940 'L=L+1;UNTIL L=10 

2950 °’ IF K=$CB MK=1; GOTO KEYR;FI 

2960 °’ IF K=$CA BK=1;GOTO KEYR;FI 

2970 'IF К=%С8 SK=1;FI;GOTO KEYR;FI;FI 
2980 "IF A=0 УК2-О ELSE IF ñ=1 VK=VK2;FI 
sFI;RETURN 

2990 'ELSE DEMO(2)=DEMO(2)-1;IF DEMO(2)= 
о 

5000 'W=PEEK(DEMO(1)+1);DEMO(1)=DEMD(1)+ 
2;DEMO(2)=PEEK(DEMD(1)) 

5010 'IF (W AND 16220 SK=1;FI 

5020 'IF (W AND 52220 ВКт1;ҒІ 

5050 'IF (W AND 64220 MK=1 ョ FI 

5040 'IF (W AND 15) VK=W AND 15』FI 

5050 'FI;RETURN;FI 

5060 ”МАТТ;ҒОН Ісі TO %1;FOR Ј=0 TO 500; 
NEXT ; NEXT 』 RETURN 

5070 ’GP;ADDR=$F010; GADR=ADDR (O) ; RETURN 
5080 ”5ТН;ОРГ2 

5090 'STR2;IF MiO)=1 W=GPR[W:1),W:2),W:3 
2,8%41%1;60Т0 STR2;FI 

5100 'IF W:0)=2 S1[W:1),W:2), W:3),W:4), W 
: 5) *256+W:6)];W=W+7 

5110 ’ GOTO STR2;FI;CLOC1 ; RETURN 

5120 ’LG6G;$OX=W(O) $OY=W: 2) ;W=W+3; 1=0 

5150 'LG2;CX=W(0O);CY=W:2);W=W+š 

5140 'I=I+1;IF СХ=1000 IF I=1 PRI[DX,OY, 
х2,Х11;ҒІ;ҢІҒ CY=O GOTO LG;FI 

5150 'RETURN;FI;LINE[OX, OY, СХ, СҮ, X1, 01$0 
X=CX; OY=CY; GOTO LG2 


ソー ト EN 


その 割 に や や こし い ぃ 名 だ 


(お せっ か い の 村 川 く ん より ) 


くら い は 付け よう ね . PF 
最後 に な っ だ けど , p.100 の で っ ぷろ まし 一 さき ん. IC や 抵抗 を ハン ダ 付 け す る こと で し た だ たら “電子 工作 " 


зн 


PC-6000 シ リー ズ +EXAS コ ン バ パイ ラ ROM 


BASIC( コ ン パ イラ ) + TYE 


1944 年 後半 . ドイ ツ 軍 は 圧倒 的 な 戦力 の 
連合 軍 を 前 に , 次 々 と 敗退 し て いっ た . し 
か し , あな た は 3 人 台 の 快速 戦車 を 引き 連れ , 
猛然と 連合 軍 に 立ち 向かっ て 行っ た . 

この プロ グラ ム は I/O の "781 年 8 月 号 に 掲 
載 さ れ た 「TANK DEFENDER, を PC- 
6001 に 移植 し た も の で す . MZ で 次 々 と 現 
われ る タン ク を 破壊 する と ,。 スカ ッ と する 
よう で 非常 に 楽し か っ た の で , PC-6001 で 
も や り た いと 思い 移植 し まし た . 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


+ ~ F2 
%- > |2 


= BASIC( コ ン パ イラ ) 
マシ ン 語 D500—DF0F 


аі, サウ ンド と も まあ まあ で す が , 
移植 版 の ゲー ム に は や は り 新 し い オ 
リ ジ ナ ル を 追加 し て ほし いな . (О) 


PC-6001 に EXAS コ ユン イラ を セッ ト し 
с, ペー ジ 鐘 1 に し ET КАБ I DEE 
打ち 込ん だ ら モ セー し て , コン パイ ル し ま 


+. STRING LENGTH は 10 を 指定 し ます . 


о 


うま て く て コン を キル て で ЗАЛ Ж 
に や ーー ジ し ます ) “そし で マシ ジン CN L 
ニタ な ど を 使っ て 入力 し 、 先 に セー ジ ズ し だ 
プ ジ ェ クト ・ プ ログ ラム の 後に モー し ま 
ья 

др жы, 者 本 だ か と きだ は ) ペー ア や を 92 
г ЛС» u e ЕО 6 


後ろ る から 狙 い 撃 ち だ . ノ 


表 1 行 番号 マッ プ 


30 | 初期 設定 

20 |16X16 キ ャ ラク タ 表 示 
Ü | 8X8 キ ャ ラク タ 表 示 
| 画面 クリ アル ー チ ン 


タン ク の 周り に 何 が ある か 調べ る 
燃料 補給 
| 敵 タ ンク の り タ ー ン 防止 
| タン ク を 仮想 画面 に 描く 
自分 の タン ク を 動か す 

敵 の タン ク を 動か す 

弾 を 動か す 

弾 が 何 に 当たっ た か 調べ る 

弾 が タン ク に 当たっ た 
0 | 爆発 雲 を 表示 

0 | 弾 が 壁 に 当たっ た 
| 弾 が 当たっ た 壁 表 示 
| 敵 タ ンク を 左右 どちら か ら 出 すか 決め る 
20 | 文字 を 表示 
90 | SCORE や HI-SCORE な どの 表示 
) | 数値 を 文字 列 に する 
) | 最初 の タイ トル を 出す 
0 爆発 音 を 出す 

メイ ン ・ ル ー チ ン 
| | 自分 の タン ク を 動か す メ イン ・ ル ー チ ン 
| 敵 タ ンク を 動か す メ イン ・ ル ー チ ン 
| 自爆 

自分 の タン ク が 1 台 や られ た 

| GAME OVER 
) | 1 面 ク リア 

| 司令 部 や られ た 
i ウエ イト ・ ル ー プ 
スコ ア ・ テ ー プ ル 

1 台 増 える 
x TEA TIME 

0 | ベス ト 5 決 め る 
0 | ベス ト 5 表 示す る 
80 | マン ン 語 ロー ド 


RUN す る と , 自動 的 に マシ ン 語 を 読み 取 
っ た 後 ゲ ー ム が スタ ー ト し ます . 


ぼう っ て こと は あり ませ ん . た だ 右端 か 左 
端 か ら 出 て くる 敵 タ ンク を 破壊 し て くだ きる 


с, 20 台 破壊 する と 1 面 ク リア に な り ま す . 


また だ 中 央 の 一 番 下 で 点 減 し て いる の が 味方 
の 司令 部 で , ここ を 破壊 きれ る と ゲー ム ・ 
ーー ます yË 

右 の 端 (GCORE の 左 の に ある メー ター は 
燃料 計 で , 全部 な く な っ た だら 自分 の タン ク 
の 向き や , 弾 を 撃つ こと が で き て も 動く こ 
と が で き な く な り ま す . こう な っ た ら 6|P| 
キー を 押し て 自爆 し まし ょ う . 動け な く な 


アド レス 計算 
16 メ 16 キ ャ ラ 表 示 


8 X 8 キャ ラ 表 示 
キャ ラク タ ・ デ ー タ 
画面 デー タ 


表 3 変数 表 


1 一 5 位 ま で の ハイ ・ ス コア 
1 一 5 位 ま で の クリ ア し た 面 数 


MY TANK の 残り 

敵 タ ンク が 一 度 に 出 て 〈 る 最大 数 
燃料 が 減っ た 数 

MY TANK が や られ た か , また は 司令 
部 が や られ た か , また は 面 ク リア し た 
か 調べ る フラ グ 

MY TANKO X 座標 

MY TANK の Y 座 標 

ІҢ TANKO XER 

敵 TANKO Y 座標 

弾 の X 座 標 

弾 の Y 座 標 

MY TANK の 向き 

ІШ TANK の 向き 

敵 TANK の 破壊 し た 数 

20—22 台 敵 TANK を 破壊 し た と き 敵 T 
ANK を も う 出 さ な い よう に する フラ グ 
MY TANK の 弾 発射 フラ グ 

ІШ TANK の 弾 発射 フラ グ 

ІШ TANK の 弾 発射 の 確率 
爆発 雲 の フ ラグ 

弾 の 向き 

弾 の 飛ん だ 距離 


Е-кшй 


る の が 嫌 な 人 は , AROR b DEE Р, 
司令 部 に くっ つい て みて くだ る きい. 燃料 が 
補給 きれ ます .。 この と き 図 1 の よう に ぴっ 
な たり 司令 部 に くっ つけ ば 早く 燃料 が 補給 る 
れ ま 7. 

ゲー ム の コツ は や だら に 敵 を 追い 回 し た 
り せ ず , 路地 に 隠れ て 待ち 伏せ を する と 4 


面 で らい は 楽に クリ ア す る こと が で きま す . 


ちな み に 面 は 何 も な い 面 を や あわせ て 12 面 あ 
り ま す が 。 作者 自身 で も 7 面 ま で し か 行け 


= 


75 


БЮ 


ませ ん で し ただ. 


な お , ゲー ム 中 | SHIFT | キー を 押し な 
が ら |I| キ ー を 押す と ゲー ム が 一 時 停止 


L, | SHIFT | を 押し な が ら |[O| キ ー を 押す 
再開 し ます . 


ラム の 説明 


フロ ー チ ャ ー ト を 書か ず に 作っ た た だ ため , 大 
変わ か り に くい と 思い ます 。. 一 応 BASIC 
部 の 行 番号 マッ プ グ ( 表 1) と アド レス ・ マ ッ 


18 REM ttt E TANK- DEFENDER ++ ++ 
š 5608.35.20 5 
20 50508 354й:СОМ5О(ЦЕ,,,й0:5СРЕЕМ 
4,2,2: COLOR 1,0,2: С(.8:0907023970 
39 REM XXXXXXX LES せっ で LI メメ メメ メメ メメ 

44 DIM X26 ,Ү2(4» NES? Bé? ‚51% 
(62,56) ,09562 

sü DIM 5Х( 82 ,5Ү%63,М2662,Х0662,Ү 
044) 。 POK る) BICO ‚ММ 62 

ӛй DIM RZL) RT G7 ILACE НІ) 
Zü F ヒ ビー: ご ドーロ :ТЕ=0 :МТт=2:РЕ=0 :СК=2 

:22=4:Р(=й:50=Й:НМ=й 

ЕЙ xX2¿4081=12:Y20C0y=2B:HM0B=2 FU=d 
: ロビ ー ロ 
90 FOR: 1= エ 1 TO ZZ 

1808 IACI =68:ІЕ І/2%2-І THEN IACI 
=i 

116 NEXT : RETURN 

120 НЕМ RENAN 16016: 920 ХХХ 

138 А0=%НО528: РОКЕАО ,х- 1: РОКЕАО + 


= 


ЕЕ 
144 РОКЕАО+5 СН: ЕХЕСАО+ & : РЕТОЕІЧ 
150 КЕМ メメ メメ メメ GO の まう し | XXXXXX 


i44 А0=%НО525 : РОКЕАО ,х- 1: РОКЕАО + 
1,ү-1:РОКЕАО+5 , СН 

170 EXEC%&#H05éC :RETURH 

160 КЕМ XXXXXXXXX CLS ХХХ 
190 FOR Y=1 ТО 24 STEP 2 

200 FOR X= TU 26 STEF 2 

210 CH=1:GOSUB 1ЗЙМЕХТ:МЕХТ : РЕТ 
URN 

220 REM XXXXXXX DT Ok. фр 
258 GOSUE 1%°8:ñD=MHDDB8B+( ¿FB-FC; 
らら ) = SLX5228 

240 IF “ҒВ+ 1) /ЗұЗ=ЕВ+ 1 THEN 300 
258 FOR Y=3 ТО 22 СТЕР 2:ҒОВЕ х= 
Т0-26 STEP 2 

260 PE=PEEE CAD :J=PEZ156:IF ñ=1 T 
HEN 288 

270 СН=7+297:4=1:50Тт0 29й 

280 СН=РЕ-Ј% 1&4+29:4=0 :Ар=А0+ 1 
290 50506 130 :МЕХТ :МЕХТ 

344 RESTORE 329:FOR Ј=# TO 4 
310 READ X,Y, CH: 50508 138 NEXT 
326 САТА. 12,28;94,14;28,9?,19,2393 
,15,12,21,41,14,21,41 

390. ҒОК-Хе-2598 TO =76422 STEP -3 
340 РОКЕХ НАА : ЧЕХТ : РОКЕ- 2555, 2 
S:RESTORE 360 

3258 FOR Y=21 ТО 24:х=27:ВЕАСМЕ:5 
OSUB 1?30+NEXT:RETURN 

зей DATA F,U,E,L 

370 КЕМ XXXXX PEDO әш, ОСА XXXXX 
330 хш11:Ү-2:МФ-"ЕОЦЫО"%5ТРФСЕВ» 
17: は USUB 1930 

3 FOR Y=1 TO 24:ҒОВ х-і TO 26 
490 ТхекнраайжҮүҰ25 РОКЕТ,Й 

418 IF Ү<З3 THEN 438 

420 IF РОІМТ((хХ-12Ұ8,(Ү-12Х89-1 
THEN: ROKE- Т, 255 
430 NEXT NEXT HO=d:HOO A G 
44й FOR х=й ТО 27:РОКЕХФЫр,253:Р 
ОКЕ х+мС+ 700 , 255 :ЧЕХТ 
450 FOR Үсй ТО 25:PDEREEYZ28+HD, 25 
З: РОКЕҮХ28+МО+ 27 , 253 :МЧЕХТ 
48й х= 13:ү=23:65Н=20:50506 728 
34378 xX=11:y=2:;:M$=" "+60508 
1°38 RETURN 
450 РЕМ XXXXXX ФЮ LONATE U KXXXXX 
=й hBD=x+YX28S+%HDBBB 


0), 
まま も だ 
16X16 ド ッ ト の キャ ラク タ に は "Ҹа や 
"な ど が あり ます が ,。 これ に より 1 画面 
66 バ イト で すみ まし た . 
タン ク の キャ ラ に つい て , 自分 で は どう 


変数 表 ( 表 3) な ど を 書い て お き 


し て も タン ク ら し い タ ンク が 作れ ず PiO5 
月 号 の Panzerspitze の タン ク を 使い まし た だ. 


リス ト 1 TANK DEFENDER V/—Z • ЈА F g 


500 ВІ=РЕЕК:ЧС-28› :B2=PEEK(ND-—-27 
9:ВЗ-РЕЕКОМрж2) :Ed=PEEK:HNHD+ SA 
3160 Б5-РЕЕК(СМО%54) :Bé=PEEFR¿(HD+57 
J sB?=PEEK¿(ND- 1) :B8=PEEK¿(ND+27) 
Аі=61+62:А2=63+64:А3=6В5+84:8 


= m р 
м) 
-+ 
m 
со 


IF GP=1 THEN sū 

HO=0:IF ВЗ-2й OR B5=20 OR B? 
THEN HÜ=1 

IF B4=20 ОК Вё=20 OR Б8-2й Т 
HÜ=HÜ+1 

IF Нб=й AND бМ=й THEN SOUND 


Т = m= = 


= 


IF HOA AND GN=Q THEN 61й 

IF GN=1 THEN RETURN 
HU=ğ0 : SOUND 10, : РЕТОЕМ 

КЕМ XXXXXX ね し りょう Sn? XXXXX 
HU= テ 1:IF FUSS: ТНЕМ 578 

8 РОКЕЪНЕ2 16+FLU 32 ‚НАА : FU=FIJ- 


は Cw. ¿n (Cn cn e (Л T ¿n H (Л ¿n £. nN 


mm O O (Q е 2» 


ы, фр по] e C. ШОЛ ra wo ro 
© 


>. 


IF НО-2 THEN PHREHES 1 ロト FU ま ヨ 


м (кеі 


со 


U 3- ほぼ "うし XXXXXX 
ОМ LEP? GOTO 478,280,290,780 
A3=510: RETURN 
A4=510: RETURN 
A1=510:RETURN 
ÂZ2=510: RETURN 
REM xxxxxx TANK 5 
ND=xX+kHD880 +Y 28 
POKEND , ВН: POKEND+ 1 , GH: РОКЕМО 
,GH:POKEND+29 , GH: RETURN 
REM XXxXxxXxx МҮ TANK 
IF ІМКЕҮФ-"е" THEN END 
788 АХ-й:йҮсй:Х-х2(й) :ү=Ү240) :М1 
-М<8) :GDSUE 498 
770 DN STICK(KE) GOTO 798,798,81 
0,810,820, 830,850,850 
GOTO 879 
IF Al=8 THEN АҮ=-1 
NI=é : GOTO S78 
IF 42-0 THEN АХ=1 
N 1=8 : GOTO 870 
IF АЗ=й THEN Аү=1 
М1=7:60Т0 870 
IF ід-й THEN ñX=-1 
Мі? 
IF BD=1 THEN AX=0:AY=0 
IF NCO} <>МІ THEN AX=0:AY=0 


`” = 
ры 


“рк Cr O Cr. СЬ. 


GH=B : 50506 724 
х2<й) SX B) +4Х:Ү2(08)=ү2(0) + 
Ү:Мейо-М1 

92й хах24й)  ҮсҮ24ей)  СН-М1:0605МБ 
‚188 

934 GH=11:G0SUB 720 :RETURN 

940 КЕМ ТА TANK XXXXXXX 
959 KN AP} iT イニ YSCP) ghH1= ニ HICP) :5Р=1 
‘GOSUB 49й 

940 АФ="":ІҒРА1=ӣй THEN АФ=АФ+" 1" 
70 IF ñZ=8 THEN АФ=АФ+ "2" 

F20 IF АЗ=й THEM АФ=АФ+" 33" 

990 IF A4= THEN ñ*=ñ*+"4" 

i444 IF GP=1 THEM А2%=АФ :GP=0: ロロ 
SUE 498:;60Т70 940 

iaia IF РМО<12%Ұ8-1 THEN А2Ф®=АФ:б 
070 10848 

020 IF A$=A 1$ P); 


58.50 оз CO со CO со (0 CO Q 


THEN 1454 


GOTO 文 と GOSUB を 間違え て 入力 し て 
し まっ て 。 ゲー ム 中 に いき な り 凌 走 し て し 
まい , この Bug を 見 付け る の に 3 筒 月 半 か 
か り ま し だ . これ も フロ チャ ー ト を 書か な 
いか ら で し ょ うか 。 

今度 こそ を オリジナル ・ デ プロ グラ ム 作 り だ た 
い な . 


1020 IF А2%-"" THEN А2%=А% 

1048 LP =YALMIDECAZ# , RHO: 1? LE 

М<А2%2%1,190; 

1050 Ах=й;:Аү=й:ПМ LEP) 

,.1880,1098,11й0 

ійей GOTO 1118 

1078 бҮүт-1:М1с2:05070 1110 

1088 ах=]:М1=4:50ТО0 1114 

1898 Аү=1:141=35:60Тт0 1110 

1 1 Ах--1:МІіл5 

1118 IF МІХУР) THEN АХ=0 :AY=0 

1128 メー ニーバ 2(P) ҮсҮү2ЖР»)  СН-1:0505МБ 

138 :GH=8 : USUE 720 

1139 ХӘСРо-х2ә<Р»жах:Ү2<РосҮ2ЕР»О» + 

AY 

1140 x=x2i P)  ҮсҮү2ЖР) СН-М1:06065МВ 
139 : GH=F : GOSUB 720 

1150 Aii Po =A$ NiP) =Ni: RETURN 

1188 REM XXXXXXXX ТАМА XXXXXXXX 

{174 М2=1:[=Р:М2<‹[›=М(1›-1 

1188 IF Әші THEN ІсйЙ:М2( Із-М41»)- 

5 

1198 U¿dI)=1:SXdI)=X2(I):SYCOCI)=Y2 

СІ) 


GOTO: TOTO 


1208 IF М2<12-2 THEN .SYCT11wWSVY AT 
%1 

1210 IF М2(12-З THEN 55х15 =5ҳ(1› 
%1 

1228 1= ニ PiIF 9-1 THEN Ітсй 


1250 IF (51221 THEN 1 る 99 

1248 IF №21) 43 THEN РОКЕҺНО547, 
8:50Т70 1248 

1258 РОКЕЫНО549,1:РОКЕМНО558,%Н1 
۴ 

1240 Ах=0ӣ :Аү=0 : Ох=0 : Оү=ӣ 


12708 IF М2<12<8 THEN NZI = 1 
1288 ON М241) GOTO 129й8,130й8,131 
0, 1320 

129й ロイ テ モー1』 ロ ミー 1』 ロロ T ロ 1338 

1388 АҮүсі:0ОХ-1:06070 1338 

1318 Ах=1:0ү=1:50т0 1338 

1328 8х--1:0Үш 

1330 Б-РЕЕКкс5хХС Із жтахж(су«Із +Y) X 
ZƏ+% HDBBB) 

1348 БізРЕЕКсбУҰ I +DX+AX+(SY C I+ 
DY +E Y ロロ 

1350 X=SKXCEY :Y=SY(I) :CH=1 

1340 IF М2-1 THEN HZ=8:GOTO 1388 
1370 GOSUB 139 

1388 IF R+łR1<>0 THEN 1440 


1398 СН-14:ІЕМ2<12<З THEN CH=13 
1400 5х1) =54(1) +AX: SY D =SY<I)+ 


1418 х-5Х(1)Ү-5Ү(1):6050МВ 130 
1420 РСКЕҺМНО547,14:РОКЕУМНО549,2: 
PIEE&HDS58B.&H1E :FRETURI 

1430 КЕМ Ұ%ҰЖҰҰ Мшсс あ に ド っ トマ XXXXX 
1440 Sx(I)=SXú¿I)+6X:SYúIy=SY¿I)+ 
AYU I? =2:60SUB 1428 

1450 IF Е>253 OR R1>253THEN1740 
1488 IF R=20 QR Кі-2й8 THEN HN=2: 
Uc I> =0 RETURN 

1470 IF Ri>0 AND Ri<12 THEN PL=R 
1 GOTO 1510 

1434 IF R>0 AND R<12 THEN PL=RiG 
OTO 1518 

1498 U< I)=0: RETURN 

1500 REM ХХХХХХ TANK ЖАЛ メメ メメ メメ る ミ 
15160 IF PL=11 THEN Рі-й 

1528 IF 120 AND PL?0 THEN 0‹1> =0 
: RETURN 


„ымм. Ж Жду йур? 


4 月 号 に 初め て 書い た ハガキ が 出 て いる で は あり ませ ん か . 本 当 に ビッ クリ し まし た . 
- 1350User の 方 に 聞き た い の で す が 、 僕 の 1350 は [BRK | キー を 軽く ノッ ク す る と POWER OFF の 状態 に な る の で す . 皆さん の 1350 も 同じ よう 
に な る の で すか , それ と も 僕 の 1350 が 故障 し て いる の で し ょ うか .。 ハー ド に 強い 方 教え て くだ さい . 


店 は 変わ り ま す が , 


P.S. 他 の 機能 は 異常 あり ませ ん . 
(北海 道 の 狼 男 ) 


1538 5Х(СІз-ХУ2(РІ) : ЗФҮСІЗ-Ү2ЕРІ):В 
(FL) =BCPL) -20 

1540 IF PL=0 THEN X2(0)=13:Y2(0) 
=20 : HN= 1 : RETURN 

1550 IF PL<> THEN TS=TS+1:GOSUB 
3248 

15 る 9 Ті-(Т75-13/5:Х-28:Ү-19 

1578 Y=Y+TL:X=X+(TS-TL¥X5)-1:CH=1 
:GOSUB 160 

1580 IF TS>29-ZZ THEN BT(PL =1 
1590 REM XXXXX は "< は つっ つ 57% XXXXXX 
1488 ※=SXCT> :Y=SY(I) 

1610 IF 01) <2 THEN И‹1›=2 

1628 ON 3015-1 GOTO 1439, 1430,14 
44,16449 , 1650, 1 る る 9 

1630 GUSUB 2348:CH=10:60TO 1470 
1640 CH=11:GOTO 1470 

1650 СН-12:60Т0 1670 

1648 CH=1 

1678 GOSUS 138:UC1I)=UCT)+1 

1480 GH=14:GOSUB 720 

1598 IF UIT)=B THEN М(1)-й:0Н-Ө: 
GOSUB 72 
IF UCI? =0. AND Т5219 THEN НМ 


710 IF МСІзшй AND 
GOTO 1799 

1720 RETURN 

1730 REM か へ" に あたる XXXXXX 
1748 XOCE)=OXEYOC1T)=OY iPOCT)=1 
1750 R2C1T)= ニ RiR ヨ CI)=R1 

IF М2‹1›=2 THEN SY(I)=SYCI) 


РОСІЗ-і THEN 


IF М2(12-З3 THEN $хХ601›=5х1› 
GOTO 18йй 
1790 КЕМ XXXXXXX ре” こわ す XXXXX3 
IF М2(12-2 THEN SY(I)=SY(I) 


5х‹1›=5х‹ T1? 


IF ОМ2‹1>=3 THEN 


Ха5хХ412 5 イーSYK15 
1830 IF Е2(12-255 THEN РОКЕХ+Ү#2 
8-ынрййй,254:СН-3:5050МВ 140 

1848 X=X+XOC I)  ҮтҮүжҮ0с1) 

1850 IF ЕВЗ(12-255 THEN. РОКЕХ+ҮХ 2 
S+&HD8088 ,254:CH=3:G0OSUE 148 

18&B РОСІз ай ШІСІз-Й RETURN 

1878 КЕМ XXXXXX と "ちら 77% XXXXX 
1830 xX2(00}=1:Y2(00:=1:IF_ ЕМО 1) 
Ұ2-чй THEN x2 D0) =25 

189й IF xX2(0)<6 THEN х2<рРО›=25 
1900 IF X2(0)>18 THEN Х2<00›=1 
1910 RETURN 

12208 REM まま まま +1“ PRINT xxxxxx 
1950 МҒ-( ЕМ(М%О 

194й FOR ІМ-й TO NF-1:CH=1 

1958 CG=ASCIMID ま SEMS ,IN+1, 152 

1968 IF (4 どく CB5) АМО(С5<582ТНЕМ СН 
-С05-44 

1970 IF (64<Сб; АМООСОС?УЭТНЕМ СН 
=С6-5 1 

19808 GOSUE 150 ІХ-Х {NEXT : RETURN 
1998 КЕМ ХХХХХ CURE еїс.. XAAS 
Хш28:Үл2іМФ-"НІСНе: 


:Y=3:M$=" SCORE" : GOSUB 1 
28 X=29Ə:Y=5:SC=HIú 1} :G0SUB 213 


x=29:Y=7:M$=" SCORE" :GOSUB 1 


=B :GOSUB 2138 
ME="MY" :60SUB19938 
* 


2040 X=28:Y=?:5C 
2050 X=28:Y=11: 
2040 X=28:Y=12:M$="TANKS" : G0SUB 


x=28:Y=14:M$="¥ ¥ "GOSUB 


х=28:ү= 17 :МФ= "ТАК" : 60506 


FOR Y=1? TO 22 
2188 Х=25:М%=" 3999": 605061930 
2118 NEXT RETURN 

2120 REM XX TIS ET XXXXXX 
2138 50%-5ТРВ%(5С) :50%-БІбНТ%(50% 
,LEN( SO ま ) – 1) 

2148 М=РІЗНТФ "#0009" +50% „5) 
2158 GOSUB 1950 RETURN 

2160 БЕМ XX DEMO XXXXXXXX 
2170 GOSUB 1F0:GOSUE 2900 :60=06 
зай 


2180 PESTOFRE22808:FOR Ч=й TO 12 


әй READ X,Y,CH:GOSUB 130:МЕХТ 
ай бата 8,6,27,11,6;,17;14,6;29 
7;6%22,11;14%6 


72 
<= 
- 
た 


b) r pj r= 


bà © FJ 00 حم‎ HF: 
) ы = 


м 
LU 
© 


x=14:Y=15:M$="TANEK" GOSUB 1 

938 

2248 Х=3:ү= 19 :МФ="РИѕЅН SPACE" : 50 

SUB 1930 

2250 Х=14:МФ="0Б TRIGGER" : 50506 
19308 

2260 FOR МЕсй TO 1500 

2278 IF STRIG(60)=1 THEN ド E=@ iRET 

IR 

2280 IF STPRIGC(1? =1 THEN KE=1:RET 

URN 

2298 NEXT:IF BZ=0 THEN В2-1:050Т0 
3710 . 

23 В2-й:050Т0 217й 

2310 КЕМ メメ メメ メメ メメ SOUND XXXXXXK 

2320 SOUND 7,&HER : SOUND й0,15:501) 

ND 1,255:500МО0 &, 15rSOUND 8,8 

2330 RETURN 

2344 SOUND 7 HEB SOUND 2,255:50 

UNG 2,.,1S:S0UND4, 15: SDUND 9,14 

2358 SOUND 11,#:500Ч0 12,581S0UN 

D 13,0: КЕТОЕМЧ 

2340 SOUND 7 , HER: SOUNG 2,0: SOUN 

D 3,10 :SOUNDé, 15 

2378 SOUND 9, 14:50040 11,0: SOUND 
12,8:S0UND 13,0 :RET URN 

2380 REM XxX メメ メメ メメ MEIN XXXXXXXX 
3908 GOSUE 48:60506 1420 

2400 GOSUE 2170 

2418 GOSUB 230 

2420 GOSUB 388 

2420 бЧ=0 :EXECŁH1058:0N HN GOTO 

2730 ‚3050 。 2? 60 

2448 IF HU=1 THEN 2470 

2450 IF ロ P=3 THEN FU= ニ FU+ 1: РОКЕ?:Н 

Е21А%Е0%ҰЗ2,129:0Р-Й 

2448 ロビ = ニ ロ P+ 1: ІҒ FU> 157 THEN BD=1 
: ロビ ニ 9 

2478 Х=13:Ү=23:0Н=20 : 505068, 720 

2488 IF CU=18 THEN СН= 1&:60=506 1 

38 

2498 CU=CU+1:IF CU=20 THEN ClU=4: 

CH=15:G0SUB 139 

2500 SI=STRIG(KE):IF 51=0 THEN F 

ド = 1 

2510 U=1:IF 00) >й THEN TD=TD+ 1 

5050Б 122й:60Т0 2549 

2520 IF HOTISI=1 AND F ド =1) THEN 

2548 

253й TD= ニ 9 :F ド = ロ : GUSUB2B る BiGHSUHB 1 
120:650Т0 2560 

2540 GOSUB 758:65050МВ 2320:IF uca 

›=@ THEN GOSUE 3210 

2550 БЕМҰХЖҰҰ Zx TANK MEIN Zx xx 

2548 GN=1:ER$=INKEY$:IF BD=1ANDE 

R=" р" ORER$="P"THEN GDSUB 2700 

2570 IF ER$="I" THEN SOUND? , 255: 

GOTO 259й 

2588 GOTO 2400 

2590 IF -INKEYE<2 "O0" THEN 2590 

2608 IF 22<>& THEN GOSUB 3220:ІҒ 
22-4 THEN GOSUB 2220 

2610 U=0:P=P+1:IF Р>22 THEN P=0: 

Бото 2430 

2620 IF UCP} >0 THEN GOSUB 122й:6 

OTO 2440 

2430 GOSUB 3210 

2648 IF BT(P>=1 THEN GOSUB 3200: 

GOTO 2410 

2650 IF B(P)<>20xP THENBCP) =B<P) 

+1:6G0SUB3228:DO=P : GUSUB 1888:060Т 

0 2410 

2668 IF РМО(12ҰСК-1 AND UKP)=9 Т 

НЕМ GOUSUB 1176 

2670 IF ІАР) =1 THEN ІАР› =0 : 605 

UB 950:60Т0 2410 

2480 ІАР) =1:650Тт0 261й 

28908 КЕМ XXXXX 3 に りょう Sh XXXXXX 

2708 Hh=1:GODSUB 2340 :Х=х2(0) :Y=Y 

2490) FOR D2= ニ 9 ТО 2:CH=10+D2 

2710 50506 130:ҒОР МЕ-й TO 1000: 

МЕХТ :МЕХТ :СН= 1 : 60506 150:БЕТМЕМ 

2720 РЕМ XXXXXXXX (Ы  XXXXXXXX 

27360 Еб-йіНЫ-0:ҒОВ PK=0 TO 280 


リス ト 1 TANK DEFENDER ソー ス ・ リ スト 


2740 FOR P= TO ZZ:IF UICP)>9 THE 
М GOSUB 1229 

2750 FOR WE=0 TO 105:МЕХТ:МЕХТ:М 
ЕХТ 

2760 FOR 1=й TO 22:Х=Х2(1) :Ү=Ү2‹ 
1) :CH=1:G0OSUB 130 

2778 01) =0:В(1) =0 :5Н=0 : 50508 72 
9 :NEXT:GOSUB 89 

2780 СН=1:Х=245+МТК2:ү=14:00506 1 
58 

2798 IF МТ-й, THEN 2830 

2808 MT=MT-1:GOSUB 88 

2818 GOSUB 330:GOTO 2430 

2820 REM Х%ҰХҰҰ% GAME OVER %%%%% 
2830 500М07,%НЕҒ:ЕОВҮ-6Т085ТЕР2 
2848 FOR X=4 TO 22 STEP 2 

2850 CH=1:GOSUB 130 :МЕХТ :МЕХТ 
2840 RESTORE 2830:FOR AC=0 TO 5 
2878 READ X,Y,CH:GOSUB 130:NEXT 
2880 DATA 5,7,27,8,7,21,11,7,19 
2890 DATA 15,7,1?,18,7,25,21,7,1 


8 


2900 FOR МЕ-й TO 15090 :МЕХТ 
2910 FOR 2-1 ТО 22:ВТ‹2›=@:МЕХТ 
2928 ІҒЕР;НІ(5) THEN GOSUB 3440 
2928 GOSUB 3710:GDSUE 70 

2%añ BHSUB 28й88:50Т70 2418 

2950 REM ҰҰҰХ%ЖҰ CLEAR XXXXXXXX 
29640 BÛ=@ : SOUNDS „2 : SOUND 7 HFS 
2970 FOR T=FU TO 158:SF=SR+1:SC= 
SR 

298й PDKEMHE216+TZ32,%HS1 

2994 SOUND 1.9:SOUND 4, 144: SOUND 
8,15 

зайй х=28:ү=9 : GOSUB2 130 NEXT : 500 

HDS, 8 

3414 FOR МЕсй TO 19000 :МЕХТ 

2020 HhH=0:FB=FB+1:TS=08:GOSuB 208 
ü 

2030 IF ЕВ/ЗҰЗ-ЕВ THEN 50508 33° 
9 :CK=CK-5:22=22+1:FC=FC+1 

3040 IF 22-7 THEN 22-6:СК-5 

3950 IF FB/12#12=FE THEN SL=SL+1 
3040 FOR 2=й ТО 22:ұВТ(20-й 

2070 Б(29-8:0(29-0:МЕХТ:005МБ 80 
:50Т0 2410 

3080 REM まま し れれ Ln) Lhi” Xxxx 
3999 SOUND? ‚НЕЕ: SOUND 1,0:500М0 
0,20 

3100 x=13:Y=23:FOR 1=й ТО 25 

8118 CH=15:GOSUE 139:SOUNDE, 15 
3128 FOR 1-й TD 199:NEXT 

2139 CH=14:GOSUB 138:500М08,0 
3140 FOR 0-й ТО 180 :NEXT :МЕХТ 
3150 GOSUB 2340:ҒОБ J=08 TO 2 
31éB СН=10+.1:00508 1308:CH=1 

3170 FOF ME=@ ТО 189898 NEXT :МЕХТ 
3180 GOSUB 130:MT=B:GOTO 2768 
2190 REM Xxxxx 33 LOOP xXxxXxXxx 
3200 FOR МЕ=ӣ ТО 75:МЕХТ:ВЕТИВМ 
3210 FOR МЕс8 ТО 30:МЕХТ:РЕТМЕМ 
3220 ҒОР ME= ロ Т0105:;МЕХТ : RETURN 
5230 REM XX SCORE TABLE xxxx 
3240 SB=30:IF TD<14 THEN SB=% 
8258 IF TD<8 THEN SE=15 

3260 IF Тр<4 THEN SB=39 

3270 IF T=8 THEN SB=Sg 

3288 SR=SR+SB 

3290 IF SR30000 THEN SR= ニ BB9 

3300 IF SR> 1 AND FL=ü THEN ロロ 

SUE 3348 

3318 X=28:Y=9: SL=SR 

3820 GOSUB 2138:RETURN 

3330 БЕМ XXXXXX し っ さき いえ る XXXXXXX 

3340 FL=1:MT=MT+1:CH=41:X=26+MTš 

2:Y=14:GDSUE 140 

3350 SOUND? ,&HCE : SOUNG 9,80: SOUN 

D 1,0:SOUND 8,15 

3340 FOR МЕ-й TO 1009 :МЕХТ 

3370 SOUND 7, HFS: RETURN 

3380 REM XX TEA TIME まま 
22394 GOSUE 190:050506 344 :RESTORE 
3429 

3400 FOR ВВ-й TO á:READ х.Ү,Сн 
8418 GOSUE 130:МЕХТ 

3420 DATA 18,4,27,13,6,19,16,6,1 

79.937 

3430 рата 12,97,22, 15,9 ,24,18,9,1 

9 

3440 FOR Х=1 ТО 21:Y=3:CH=1 


PO 


3456 GUGUB 138:X=xX+2Z:CH=28 

3450 ロロ SLHB 130:X=x-2:G0SUB 
NEXT:FOR Y=1 TO 11:х=23 
СН= 1 : 5OSUB 180: =Y+2:CH=28 
506МВ 180:ҮсҮ-2:650650Б 3220 
NEXTIFOR х=25 TO IS- STEP-1 
Y= 1 ヨコ ュ ヒ H= 1 :GOSUB 130 :х=х-2 
CH=28:G0OSUB 130 :х=х+2 : 50506 
28 :МЕХТ 
ҳ=13:Ү=12:МФ=" ^^" :60508 193 


IF ӘТБІС(КЕз-й THEN 32283 Чо= 0+ 1:МЕХТ:В2-1:050Т0224й 
RETURN 
КЕМ ХХКХХЕХХ BEST 5 .ЯИХИХХХ 
ҒОК.2Ө2Т0.%Ұ 5ТЕР 1 
IF SR2F81CJ ТНЕМ НІ<4%12-Н1 
ЈУ Hh J+ 1) SHME J> 

LP'OSPRPM1X TEIN АМС НІ(,-12>5 
ЕМ НІ Ji =58:НМ< Ji =FE 

IF Ј=і AND HI J? <SR THEN НІ 
SR: HH Jji =FE 

MEXT : RETURN 

КЕМ X%%x PRINT- BEST S XXNX 


RE まま :FOREI VALE "RH" tA) < 


DU 


ош ішіп 
са O m T O ого 
1, 
oe س‎ 4 p. ت‎ о = 
гй 


бз шш ت‎ 


— 
"7 
< 


об ل‎ іш (Ú TU 


“は СЛ PE ¿uú Pj 


ІЛ ох, 


2 


ЕХЕСАНЕСӢЙ : RETURN 
DATA 04,04,21,42,4е,34,0й,2 


Ü. C, Cr. O. Cr. Ok ГЬ. 


Sd 
сь. 


іш шір 


LU 
“J 
en] 


DATA 10,fb,cd,?a,25,1 


шы бр ت‎ G 


с 
сп 
іш 


DATA 


“5 ما‎ Ch 


T 


FLAY 


003511" ," +19004 10" 

LAY "d4g2b4" , "г4620494" , "г 
е 

L 


ге 


O 
0 
[кч] 


DATA 
X=S:Y=3S:M$="SCODRE":GOSUB 19 


= 


ір) її .ن‎ Ú СЛ її ق‎ 0) 


DATA 76,25,с4,889,25,2а,с4а,4 


ЕЛ -4 in .. 
sf O. wj > 
41 
іш 
Іш 


іп Іі). 


[кх] 


"о&Ч8.с1&о5Ба8.о5д1ё&д" 
с" ,"ао4со5Бо4&эд+##44" 
"әВ.ҰН1424.о6сВо5ЫЬ","с 


~J 


ҳа 17 :МФ=" ROUND" : 50508 1938 
UU=1:FOR Y=é ТО 14 STEP 2 
メー 1 ME=STRE (UU) + "1" 150508 1 


[л 

41 
pa 
сш 


САТА ес,5БЫ,сЖ,.Ғе,са,?а,25,с 


in 
لت‎ {Л £ زا‎ 
сш 


š 


4) 
һә 
т 


DATA 7й,1а,77,8й8,47,23,1Б,7 


ل“ G‏ ل“ 


PLAY "аЗ. #1402." ,"с4оЗЬ2. " 
Ндарбад4" 
й IF PEEK(&HFD1B) <54 THEN 259 


іп CGO م زرا‎ 


іл. 


съ 02. У — о. Q (Ji 


© 


ШІ;  505МБ 2130 
' THEN МЭФ-"ГГГТІ 


+ m — í p. O Ü 


D‏ ل“ 


~J 
= ت‎ 


DATA ЬЫЗ3,20,Ұ4,с42,7й0,1а,Б8,с 


ュ 


Lt" БТ SS 

M3#="";FÜFR HH=1 ТО HMC UU: +1 
13 キ =MS ま + " NEXT GOTO. 3819 
イニ ザ + 11Х= 16 :ME=" OVER" + STRECH 
2-95 600 5= 
М%ФчМЗ3%Ф:х-12:605/МБ 1950 


リス トク 2 TANK DEFENDER マシ ン 語 リス ト m 


л 
~ гт 
ж 


л о 4» 
бз c с 


DATA аа,1а„сб,‚,21,Ә5, сӛус 


~J 


м С O ЪЪ СО r 


сә 


ш 
LU 


:Y=1%?:M$="PUSH SPACE" :30 


w + (ú CL ú moa mm 
N. А-а 
FU 
сш 


nr 
هه اھ“‎ 


К x 
H a Il 


— © 


` 
^^, 


4:M$=" 9R TRIGGER" : 50506 


Өз X a نن‎ (ú rm (ú боса ü) C زت‎ ір (ú CQ (à ú — 


زا іп іш С‏ زرا حسم 
ао с о‏ 
їй єє 0 ыш‏ 

حسم 

Ох 


© ت‎ 
ба —. CO 


DBSO: さ F FE 58 ОЕ 58 ОЕ 58 ОЕ:ОҒ 


0500: рр 21 28 р5 26 ОО рр 6Е:6С DéAB: 77 ВВ ФЕ D8 SF 08 SF ҒЕҒ:ОВ 
0508:01 06 ОВ 29 10 FD 00 00:45 рево: SF ҒҒ SF D8 éF 08 77 B8:0B 0958: 58 ОЕ 58 ОЕ 7С 13F 00 00:27 
0510:16 OO рр SE ОО 7В Е6 05: В5 0668: 78 7С 80 02 80 02 7F FC:73 0850:00 оо ОҒ ҒО 07 ЕО ОЗ Со: А5 
р518:2:С DD 77 04 19 11 ОО E2: АО DELO: ЗЕ FE 40 01 40 01 ЗЕ 1ЕЗІБ DESC US СО 05 Со 05 CO 05 COCOG 
D520: 19 DD 75 02 DD 74 05 CF: BA DC: 1D EE 1B Fé ІВ Ғе ҒҒ ҒА:26 реготу CO OF CO OS CO OS: CO OC 
Об 15 OC FT OI OT CD -ООФЕРҒ 06ро: ҒҒ ҒА 1B F6 1B Få 1р ЕЕ:26 рв78:03 СО 07 ЕО ОҒ ҒО 00. 00:89 
р5350:0р5 21 СО ре Ер SB 2A 05:р2 DéDS: SE 1E 40 01 40 01 ЗЕ FE:1B шун ы Мыне сын алг Ры шыны ЗАНЫН ИБИ ШИНЫ ж НЫНЕ Ка АННЫ 
р558:01 20 ОО ED 42 ЗА 2D О5:8С П6ЕО:35С 1С 7Е 7Е 7Ғ ҒҒ ?Ғ EPS SQ Sum? 16 20 95 CF FF CTS 16 2E o 
D59440: ОЛ ID CZ 40 DI EB O6 1031E D6EB: ZF FF 31 ЕЕ ОҒ DE ЗЕ Е4:Ар 
р548: SE 02 Ср 62 DS 25 15 50:В7 D6FOs7F ЕС ҒҒ ЕЕ FD DE FE ҒЕ: Зо имена час оо: 7C /E ЗӨ S60 J0 7012 
0550:С2 4A DS ED 42 99 05 01:80 ОБРЕЛ УР УР УЕ SP SS AR POAC DOGE ЛӨ БО ST CO SB БОАК БОТЕН 
0558:1Е 00 09 ED АВ 99 D5 10:рр et бе іе е еселей ЕЗ ЭС TREES” зата tn i a gs CR Et рЮЕ?оОғ ЗЕ ӨО 3F CO ЗВ ЕО 356 РОО] 
5602487 CT Аг” TO OS IA プイ ノバ SRIF Sum: 44 92 07 06 72 E2 OA FO:O2 ПОЧЕВ 78 SS SO ТӨ ХЕ ОСОО ТЕ 
D56811 DS С9 00 Ср OO DS 21。FE DORON OC 0077С ІР 56 ОЕ 5С ОУ сыр, 
0570:40 DE ED ЕВ 2A D5 01 O8:6B рл00:00 16016 SU ЗВ. プ ビ 3E5 E DS D86868: SJE SE JF 7E JB. EE 397 LEY? 
0578:00 ED 42 ЗА 20 D5 09 DsiB1 D708: 08 56 02 18 04 00 01 84:Е1 ЮВВо: 58 ОЕ 58 ОЕ 58 ОЕ 58 ОЕ: 18 
ні D7190r 0B CO: ZB 90 ZD SC FE 76401 DBBS ЗӨ ОЕ 8 ОЕ 7C IF ОО 00%2 
бит: 16 24 5С 7 BD 97 ОЗ С4:48 0718:ЕС 76 ЕН 7В 79 ЗЕ 50 .02 じ F расо оо OO SE IF ТЕ OE “TE OES 
D720:00 ОС 10 ОС 18 12 10 38:94 рас8:1В8 ОЕ TB ОЕ 19 ОЕ 19 BET 2U 
0580:С2 7Е D5 EE 06 ОВ CD 62:30 р728:08 ОВ оо ОО ОО OO ОВ 64:79 06800: 18 BE 18 СЕ 18 СЕ 18 6EiFB 
0598:05 Ер 45 9B DS 01 20 00:96 П750:05 20 26 Оо 40 ОС 54 04:Ер RSDS 18 JE 10 3E SÜ IF OK "ОСОРО 
D590:09 ІЗ ED 4B OE 05 10 ЕЕ С2 D738: 38 АА 18 18 44 05 02 O0: SD D8E0: 00. OO 7F FC ЗЕ FE 38 ОҒ:ҒҒ 
DOE: 29 OOOO 00-00 FF- 00” ООВ 0740:01 80 01 80 01 80 01 80:04 DSE8s 58:07 58 07 39 OF 3F ҒЕЗ 05 
рдо: 00 ОО ОО ОО ОО ОО ОО 00:00 D748:01 ВО 01 80 01 80 01 80:04 DOP O TF PE: ЗО TO SS ЛУО SEVE 
рБАВ:ОО ОО ОО ОО оо оо ОО ОО:ОО р750:0О0 ОО ОО ОО ОО ОО ОО ОО: ОО D8F 8:38 58 38 ІС 7С 1F ОО 00:5Ғ 
рГЕНВО:ОО ОО ОО ОО ОО ОО ОО ОО: ОО р758:00 ОО ОО ОО ОО ОО ОО ОО: ОО چ کے‎ т ИДИШ 9 AO Нз ЭШИ Г” ЖАН А | 
D5B8:O0 O00 оо 00 00 Оо OQ 00:00 D760: 00 ОО ОО ОО ОО ОО ОО FF:FF Sumt 57 49 07 СЗ 07 ЕЗ ЗА 62:12 
DSCO: 00 OO ОО OO OO боо OO ОО: ОО D768:FF ОО ОО OO OO ОО ОО оо: ЕЕ 
DSC8BsOO OO OO ОО ОО ОО ОО ОО: ОО р770:О0 ОО ОО ОО ОО ОО ОО ОО: ОО р900:ОО ОО 7Ғ FE 7Ғ FE 7F ҒЕ:77 
DSDO: 00 оо оо OO OO OO OO ОО: OO D778:00 00 ОО ОО ОО ОО ОО OO: OO р908:62 C6 42 С? ОХ CO OZ CO: R4 
р508:00 оо оо 00 OQ оо ОО OO OO 0910:07 CO 03 DO: GS COOL жау GE 
DSEOsO1 80 61 86 Ғі BF ҒҒ ҒҒ: ES 1 DO іА 05 19:ЕА р918:032 СО ОЗ СО 07 ЕО ОО 00:6р 
DSE8:FF ҒҒ F9 9Ғ F7 EF EF Ғ7:62 ы р920:00 ОО 7F ЕВ 7F ЕВ 7F DE:4E 
DSFOsEF F7 EF Е7 ЕР F7 F7 ЕҒ:%98 D780:55 АА 54 2А OA 50 Ой: 21 0928:7Е DE 7F DE 7F FF 7Ғ BE:6F 
DSF8:FB DF FC ЗЕ FF FF 60 06:79 0788:40 0O2 40 02 бо ОО Во 01:05 р950:7Ғ ЕВ ЗЕ ҒО ІҒ ЕО ҒҒ ҒЕ:А2 
SI Ee р ко қарас E ЫЛЕ Б ака le к йз СУ ОСЕДИ р790:80 01 оо оо 40 ОР? 40 О2: ОБ р938:ЕҒ FE ОО ОО ОО ОО ОО оо: Ер 
бат: 55 05 4A 2С 4С 51 42 SB: B6 0798:50 OA 50 ОА 54 2A 55 AA:31 D940: 00 ОО ОО ОО ОО ОО ОО ообо 
D7A0: 55 AA 54 2А 50 ОА 50 48:71 0948:00 ОО ОО ОО ОО ОО ОО ОО: ОО 
р600:60 06 ҒҒ FF ЕС SF FE DF:79 D7A8: 44 62 4E 32 1B 60 81 C1:E3 D7501 00 оо OO_ OQ 00 оо оо 00:00 
D608BsF7 EF EF F7 EF F7 EF F7:98 D7BĐB0:83 81 06 DB 4C 72 46 22:08 0958:00 ОО ОО ОО ОО ОО ОО ОО:ОО 
D61OrsEF F7 F7 EF Ғ9 9F ҒҒ ҒҒз62 р7В8:52 ОА 50 ОА 54 2A 55 ñA:33 D960gFFW ОО АА ОО FF ОО АА 00:52 
БӨЗБЕРЕ-ЕК-ҒІ BE 61:86 Or OOF р7г0:01 EO ОЗ FO 05 FO 07 79746 р968:ЕҒ ОО АА ОО FF ОО АА 00:52 
П620:7Ғ FC ҒҒ FE ҒҒ FE 78 7С:69 р7С8: 06 78 06 58 ОС さじ ОС 3 4C р970:00 ОО ОО ОО ОО ОО ОО ОО: ОО 
0628:77 BB 6F DE SF DE SF FFroB ZBOP” FOU pP PU PS: TE 18 0679o р978:00 ОО ОО ОО ОО ОО ОО 00:00 
D630: 5F ҒҒ SF DB «Ғ 08 77 B8:0B D7D8: さ 8 ОЕ 30 ОЕ 78 1F 00 QOs1BH || ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
0658:78 7C ҒҒ FE ҒҒ FE 7F ҒС:69 р7Е0:00 009 7С ОО ЭҒСҒО ЗЕ FCjE6 ム 6 бит: 64 17 59 ОЗ А7 55 06 18:41 
D640: SF FE 7F ҒҒ 7F ҒҒ ЗЕ 1E:95 D7E8: 3C 1Е 5С ОҒ 3С 07 5С 07:28 
D648:1D EE 1B Её 1B FA ҒҒ ҒА: 2А ПАРОВ SU 07 さじ 07 つじ QF SIC ЕТИН D980:00 FF ОО АА ОО FF ОО AA:52 
DéSOsFF FA 1B FA 1B Fé 1р EE:2A D7F8:s3F FE SF FB ОО ОО OOrFO 0988:00 ЕЕ ОО АА ОО FF ОО AA:52 
р658: ЗЕ 1E 7Ғ FF 7Ғ FF SF ҒЕ:95 0990:00 ОО ОО ОО ОО ОО ОО ОО: ОО 
р660:01 80 61 86 91 89 9F FOIA :1 АВ B3 71:66 0998:00 ОО ОО ОО ОО ОО ОО ОО:ШОО 
р668:9Ғ-Ғ9 995995 97 ЕЗ ӨҒ-ҒІЗзСА рӘАО:ҒҒ ҒҒ АА АА FF ҒҒ АА АА: А4 
р670:ӨҒ FI ВР FT SF FY 97 Е9:00 D800: ОО ОО 7F FE SF FE 38 02:Ғ4 D?AB:FF ҒҒ АА АА ҒҒ ҒҒ АА АА: А4 
П678:9В D? 9С 39 9F Е9 60 06:47 D808: 38 ОО 58 OO 58 10 3F FO:E7 D9EQ:OO OO OO ОО ОО ОО ОО обоо 
ーーーーーーーーーー デ ーーーーーーーーー デ ーーーーーーーー ニ ーーー DELO: SF ҒО 58 10 58 ОО 58 00:Е7 D9E8:00 ОО ОО ОО ОО ОО ОО ОО: ОО 
быш 72 61 FB 57 9P 51770 GLE DEIR SB OZ SF РЕ FE ОО оо: Е4 р9Со: оо оо оо оо оо оо оо 00: 00 
D820: 00 OO 7F ЕЕ 2 FE 28 о2: Е4 09Сс8:00 оо OO ОО OO ОО ОО 00:00 
0680: 60 06 Е F? 9С 39 9B 09:47 0828:28 00 58 ОО: 20 SF ЕОФЕ7 D9DO: FF ОО АА ОО FF ОО АА 00:52 
0688:97 Е9 ВЕ F1 ӨР Fi ВЕ F1:00 D830:3F ЕО 58 20 38 ОО 58 00:E7 D9D8:FF ОО АА ОО FF ОО АА 00:52 
0690:8Е Ғ1 97 E? 99 99 Е Е9:СА D838: 38 оо 38 00 оо оо OO: EC D9EQ:FF ОО АА ОО ҒҒ ОО АА 00:52 
0698:9Е Ғ9 91 85 61 86 01 BOTIA D840:00 ОО 7С ЇЕ 58 ОЕ 38 ОЕ:27 D9E8:FF ОО АА ОО FF ОО АА 00:52 
D6AOs 7R FC 80 02 80 02 78 7С:73 рВ48: 58 ОЕ 58 ОЕ 58 ОЕ SF ҒЕ:ОҒ D9FO:FF ОО АА ОО FF ОО AA 00:52 


うす で ぐ プ ログ ラマ ー と し て デビ ュー し ます (編集 部 の 方 , お 願い し ます ). 現在 「 と と ば て い ぃ いぶ /」 と わ め き な が ら 大 変 に 読み や すく 〈 作 っ て い 


ーー 
76) (е) 4 月 号 の 「 人 並 ベ ゲーム 」 を 見 て お どろ いて し まい まし た .「 お お っ / こ の 人 間 の キャ ラ は 私 が 昔 作 っ た ルパン ゲー ム の ルパン で は な いか 
QA QA ? っ / き す が は ルパン だ っ 」( い っ だ いぼ く は な ん な ん だ …). と ころ で 皆さん 、 最近 PC-1500/1501 が 不調 っ ぽい で す が ご 安心 くだ きい. 私 が も 
ба. 
2 
78 3 る ん で す よ , Сов. Р.5. ポケ ュ コン で 目覚 し 時 計 を 作ろ うと し て いる あな た だ た, CSAVE の 出力 音 も を ア ング を 通し て 鳴ら せ ば ば っ ち し で 


же 


DF8BgFF ОО 


Sum: ЕВ ЕС 


DA00: ОО FF 
DAOB: OO ҒҒ 
Da10OsFF ОО 
DA18:FF ОО 
DAZO:FF FF 
DA28:FF FF 
DAZO: FF ОО 
DAZ8:FF ОО 
DA40: 00 ОО 
DA48: 00 ОО 
DASO: OO FF 
DASS: 00 FF 
DA6GO: FF ОО 
| DA68:FF ОО 
рА70:0ОО FF 
DA78: 00 FF 
| 
| 


Sum: F8 F8 
раво: OO FF 
DA88: 00 ҒҒ 
рА90: 00 FF 
DA98:00 FF 
DAAO:FF FF 
DAA8:FF FF 
DABO: 00 FF 
| DABB: 00 FF 
| расо: оо оо 
| DAC8: оо ОО 
DADO: FF ЕЕ 
1, DODB:s FF ЕЕ 
| DAEO:FF ОО 
| DAEB:FF ОО 
| DAFO:FF FF 
| БрАҒВ:ЕҒ ҒҒ 


рвоо: оо ҒҒ 
рвов: OO FF 
| DE1OsFF ҒҒ 
| DB18:FF ҒҒ 
ОВ2О FF FF 
ОВ2Ө ЕР. FF 
DESOSFF FF 
DB38:FF FF 
DE40: 00 ОО 
DE48: 00 ОО 
| DESO:AA ОО 
DB58:FE 82 
DEGO: 28 ОВ 
DBAS: FE ОЕ 
ОВ7О ЕЕ. ОЕ 
DB78:80 80 


Sum: 56 1E 
DE8O:FE ВО 
DB88:FE 80 
DE9O:FE 02 
DR?98: 7C 44 


DRAO:FE 82 
кз нш 


宮崎 県 く ゎ ぁ ず 
+. Р52 みん な で M5 を 「 よ ょ いしょ 」 


АА ОО FF ОО АА ОО 


50 АВ F8 FC 50 ñ8:D8 


ОО АА ОО ҒҒ OO АА: 52 
Ооо АА ОО FF ОО ñA:52 
АА ОО FF ОО АА 00:52 
AA ОО FF ОО АА 00:52 
АА АА FF ҒҒ АА AA:A4 
АА АА FF ҒҒ АА AA:A4 
АА ОО FF ОО АА 00:52 
АА ОО FF ОО АА 00:52 


оо АА ОО FF ОО АА: 52 
оо АА ОО FF OO АА: 52 
АА 00 ҒҒ ОО АА 00:52 
АА ОО FF ОО АА 00:52 
оо АА ОО FF ОО AA: 52 
оо AA OO FF OO AA: SZ 


ーー ーー ニーー --. ーー م م‎ ““. ーー “-- ーーーー ーーーーーーーーーーーーーーーー 


50 SO_FB ҒВ 50 50:20 


оо АА ОО FF ОО AA: S2 
ОО АА ОО FF OO АА: 52 
оо АА ОО FF ОО AA: 52 
оо АА ОО FF ОО AA: SZ 
AA AA FF ҒҒ АА AA:A4 
AA АА FF FF АА AA:A4 
OO АА ОО FF ОО АА: SZ 
OO АА ОО FF ОО АА: SZ 
оо оо оо OQ ОО оогоо 
оо оо оо ОО ОО ОО: ОО 
АА АА FF ҒҒ АА Ай: А4 
АА АА FF ҒҒ АА AA:A4 
АА ОО FF ОО АА 00:52 
АА ОО FF ОО АА 00:52 
АА АА FF ҒҒ АА АА: А4 
АА АА ҒҒ FF АА AA:A4 


50 ЕВ ЕВ F4 50 F669 


оо АА ОО FF ОО АА: 52 
ОО АА ОО FF ОО АА: 52 
АА АА ҒҒ ҒҒ АА AA:A4 
АА АА FF FF АА AA:A4 
АА АА FF FF АА AA:A4 
АА АА FF ҒҒ АА AA:A4 
АА АА FF ҒҒ АА АА: А4 
АА АА FF FF АА AA:A4 


АА ОО АА ОО AA oOo: QB 
82 E2 E2 E2 FE 00:66 
ов 38 38 58 38 00:28 
ОЕ FE ЕО ЕО FE 00:06 
ОЕ 7Е ОЕ ОЕ FE 00:В2 
С4 C4 FE ІС ІС 00: ВЕ 


10 АА АА 1С Ғ4 50:28 


ӘОЗ-ҒЕ ОЕ ОЕ РЕ も のり 136 
ӨО ҒЕ-Е2 Е2 :ҒЕ OO ВЕ 
04 18 58 58 28 00:С4 
44 FE Е2 EZ FE 00:С4 
82 FE ОЕ ОЕ FE оо: ід 


м2 Z 


52 |] 


——s2XZt⁄r, C4 


リリ スト ク TANK DEFENDER マシ ン 語 リス ト 


DRA8:7C 44 44 FE ES ЕЗ 
рево: ЕС 82 84 FE Е2 E2 FE 00:С4 
DEBEBB:FE 82 SQ ЕО ЕО Е2 FE ОО:АО 
рОВСО:ҒВ 84 82 Е2 ES Е4 ҒВ 00:9Е 
ВВСВ:ҒЕ: 82 80 РС (ЕО Е2 РЕ ООФВС 
рвро: FE 80 80 FC ЕО ЕО ЕО оо: ЗА 
DBDB:FE 82 80 ЕЕ Е2 Ea FE 00:Во 


E2 OO: A8 


ОВЕОТИЎ GL OE FE ES と と ЕХ OO 
DBEBs1O 10 10 ІС ІС ІС ІС оо: АО 


DEFOsFE 10 10 70 70 70 ҒО 00: SE 
DBFBx82 82 ВЕ. ЕВ ЕЕ EA Е2 00:5С 
бот: ЕЕ ЗЕ 44 56 9С 96 B2 ОО:ВА 
рС00:80 Во ВО ЕО ЕО ЕО РЕ 00: 1Е 
DCOB:FE ВА ВА ЕА EA ЕА E2 00: В2 
DC1OsFE 82 82 Е2 Е2 EZ Eg DOLGA 
DC1 ヨ 8:FE BE BE ВЕ 82 82 FE оо: АА 
рС20:ҒЕ 82 82 FE ЕО ЕО ЕО 00: А0 
DC28;:FE 86 86 95 ВА 86 FE ОО: АЕ 
рс20: РС 84 84 FE ES EE EE ОО: АВ 
ӘСЗӨзҒЕ 82 80 FE ОЕ BE FE 00:98 
ОС40: ҒЕ 10 10 ІС ІС ІС 16 00 BE 
DC48: 82 82 82 Е2 Е2 Е2 FE 00:24 
рС50:Е2 E2 E2 Е4 24 24 3 じ О00:ОЕ 
0С58:82 BA ВА EA EA EA FE 00:52 
DOGO 82 EE 56 EE Е2 EZ О0:0С 
рс6Ө:Әг2 82 82 FE ОЕ, ОЕ FE OO RE 
рС70: РЕ 02 ОЕ ЕВ ЕО ЕО FE 00:С4 
рС78:70 7Е 7Ғ 7Е 70 40 40 40:1В 


бот: Со АА 21 42 ЕО 20 ҒО 40:03 
DCBO: 19 92. FE FE FE FE FE 82а1А 
DC88: 00 OO OO OO OO 60 60 OO: CO 
рС90:22 44 88 BB 44 22 22 44:42 
DC?8:00 оо оо OO оо бо оо 00:00 
рСАО: ОО ОО ОО оо ОО ОО ОО ОО: ОО 
DCA8: оо оо оо оо ОО OG ОО ОО: ОО 
DCEO: оо оо оо бо оо оо оо ОО: ОС 
рсвва: 00 оо оо оо OO оо оо оо: оо 
DECO: ОО оо оо ОО оо ОО ОО ОО: ОО 


DCC8: ОО оо оо оо OO ОО ОО ОО: ОО 
Юсро: оо оо оо оо ОО ОО ОО ОО:ОО 
DCD8: 00 оо ОО ОО 00 OO ОО ОО: ОС 
DCEO: OO OO ОО ОО ОО ОО ОО ОО: ОО 
ЮСЕВ: 00 ОО ОО ОО OO ОО ОО ОО: ОО 
DEFOR 00 ОО ОО ОО оо ОО ОО 00: ОО 
рСЕВ:ОО ОО ОО ОО ОО ОО ОО оо: OO 
бит: 22 Dé 86 86 42 80 80 Сө:іс 
ОООО ОР FS bD А АР FF TR FPO ЕЕ 
0008:00 ОА. Sñ 50 00 OF ОҒ FS:C7 
0010:00 А5 АҒ ОО 30 1А: 50% 21 
роте 00 O0 EGR OCCO ES: ñF: FP 7 
DD20saF3 50 55 SB. 50 00 OO ОС:Ер 
DD28:48 C4 АҒ SA FF ОО FS АЕ: В8 
0р0: 5А SO ОО ҒО ОО ОА 71 21:26 
DD3BsQF ОҒ ОО ҒӘ А5 8С 4A FOIE 
рраоеғозҺЕЕЗОЕЧЕРЗЕРКСТОӨК OF QF z 29 
DD48:00 00 ОО ЕО 50 ҒО 50 OF z 4F 
DDSO: OF OF ОС ОЗ ОС OG 20 00:09 
DD58:00 ЕС СО 20 СС ОҒ FF FF:C5 
Бабок SS OÚ CO O000 оо FO: СОГАР 
DD68: 00 ОҒ ОҒ FF OF ОҒ OF 00:4A 


Tr 
` > 


— ii | “ 


ТАУ LL! る 
SABS KÉ 


シャ 


фил | 
279 709 Wa 


いう いち ろ 


0 


DD98: FO 


DD70:FO 00 ҒО ҒО ҒО ҒО"ОҒ- OF5CE 
0078:05 05 ОҒ ОҒ ОО ҒО ҒО BCz 90 


78 1F 05 


Sum: ОВ AS В9 F4 78:01 
DD80r£ 40 ҒО ҒО ОҒ ОҒ ОҒ ОҒ 
DD89:5S5A8 FF ОО 20 ҒО ҒО FS 
DD びす まさ OO に OF OFE OF ЖО し に 
2050-21 ジマ SO ЖЕ 
ррао: сс ос CC CC OO F き うさ 
DDA8: ZB 7% 50 оз OC 48 C4 
ррво: SE оо CO 51 оо од 
DDB8: OF ОС 42 21 А5 8С ОО 
DDCO:F5 8С 4А SA ҒО ОҒ ОҒ 
росе: ОГ. OF: ОҒ ОҒ ОО ҒО ҒО 
ррро: РО ғо ҒО ОҒ ОҒ ОЗ ОЗ 
DDD85 ОҒ 00 30.50 СС СО 30 
РрЕО:СОГОС-ӨЗ:35 OCT EG DS 
ррЕӨ: 50 CO じ O ささ 05-00 ОС 
ОЮЮРО ОО OCG OG OO FO: FO FO: PFPOQ1D8S 
DDF8TFO РО OF OF OS りさ OF ОРТ? 


ОҒ: óB 
25101 
00: 8D 
CC: AF 
50:С6 
AS: ŞE 
50:09 
FO: АЕ 
ОЕ: 42 
FO оС 
OF: O3 
30: SB 
OT: 54 


Оо: FE 


の 
әш 


DEOL: OCG FO FO AC 40 FOFO 
рЕОВ: OF FF OF OF OF OF QO 
рЕТОШООЗҒО ЕОСҒО 350 OF FFP 
DE118: 05 OS OC OO OO うさ GO 30 
DE ZUCO ҒО ОҒ ОС CC ОҒ 33 
БЕ2В:ОО J0 うさ FO FO CU CO 
DESCE ӨР OF ӨР SZ 506 WS 
DEIS: FO FQ РО CO ОС OF OS 
DE40:0F OF ОО ҒО ҒО 8С 40 
DEAS? ЕО 20 ОҒ ОҒ ОҒ ОҒ ОҒ 
рЕбО OO 50:20:50 50 G0 AO 
рЕ58:0С ОС ОС ОС ОС ОО ҒО 
ГЕФОЗҒО ҒО ҒО ҒО ОО ОО ОО 
DE68sOO OO ОО ҒО FO ҒО FO 
DE7COsFO ОҒ ОҒ ОҒ ОҒ OF OF OAA 
DE78: 00 OO OO ОО ОО ОО OF ӨРЕ 


79 7B 86 80 B4 F2 С5 р7:35С 


OQ: 8C 
OO: 4A 
ОЕ: 1D 
ШЕЕ 
оза DO 
OC: DB 
FO: 4F 
05781 
FO: RA 
ОЕ: 7A 
9С: 2С 
ҒО: 1 し 
OO: CO 
FO: BO 


Sum: 


DEBO OST SON QP: QF -OQ FO FO 
DE88:40 ҒО ҒО 04 ОО ОО 7F 
DEO Во ОО 00 ОВ ОЗ ВО 73 
DE98: 00 ОО АО ОО оо ОО SO 
ОЕАО SA 05 АО БА ОБ AG ОБ 
DEAB: SA CS АО SA ОО 5A 05 
DERO: SA 05 АО OS АО 5A 05 
DEBS: SA ОО оо AO 50 O1 
DECO: 09 ОО о1 ао оа оо 
рЕСӨ: 21. 8С 42 55 AO OO 09 
DEDO: 1A 05 20 БА ОО SA 04 
DED8:58 05 AO оо АО 50 ОО 
DEEO:50 ОО БА 07 ВО 7B 05 
DEE8: 05 20 1A 05 20 1А ОО 
DEFOiC4 AO ЕВ C4 ОО 05 АО 
DEF8:00 ОО SA ОО ЗА 05 АО 


BC: CO 
OF : B2 
O4: E? 
ÖÖ: FO 
AG: АЗ 
Ао: 18 
AG: AZ 
Ао: 3D 
SA: SC 
AO: 79 
AO: 97 
Ао: 8D 
Ао: В1 
08:86 
оо:25 
SA: ES 


SB: B7 


е” 
һ х 


cs 
= хл 


сц”) 
А 


бит: 1С 48 АВ 34 "4; Жо 


DFO0:05 АО ОЗ АО 12 01 20 SA: D7 


DFOBiOO_ SA C4 8C 48 CS AO ҒҒ:56 


Sum: 


= どっ ・ 


о 
1%) 
“ 
3 
3 
б 
ге 
Q - 
IL: 
“; 
С. 
т, 
с“ 
(> 
8 
© 


(PiO に は !/O み た い に 厚 く な っ て 欲し く な い 和 群馬 県 人 の お に お ん ) 


OS ҒА C 2С Sa Сё СО 59:2р 


РС-БООО: 


BASIC 十 (マシ ン 語 


жетк 
ыы, ЖҰМА 


РіО の '84 年 12 月 号 に , 
ル と いう の が あり まし た . 
ROM&RAM カ ー ト リッ ジ と EXAS コンパ 
イラ と マシ ン 語 モニ タ が 必要 で し た . そこ 
で 私 が PC-6001 全 ユー ザー が 遊べ る パズル 
を 作っ た の で 発表 し ます . 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


< 1 or 2 
1 
! 


全体 的 に まとまっ て は いま す が , 
だ まだ 工夫 が 必要 か な ? 


мононононононеи нв ta i а а 


= ТОЕ АЛГЕ, あと は ひだ が すら 
リス ト を 入力 し て くだ きる い 。 DATA 文 の 


中 に マシ ン 語 も 含ま れ て いる の で , 
DATA 文 と POKE 文 と EXEC 文 は 絶対 に 
間違え を な いよ うに 


SSE KSA FRED ығы 
RUN す る t, 数 秒 後 に 16K ヵ 32 氏 ヵ : O X 


LA 32K 


NED 27. 16K の よき 


DATA рО,21,80,Ғ08,3А,5Ғ, F9 йш, 
.БВ,З8,й8,11, 18, A44 , DÛ 

DATA 17480,20, 、FB。21 ‚290 ,C2 ЗА, 
‚Ея ,0,04,88,02 99, а? 
DATA 84,81, 69,38,07, 


(Л р) £ س‎ (d N [Л لک — تا‎ 
иле e s а, p ss tp 


.30,28,Ғ%,З4,50,ғй0,04 

DATA 84,Б8,б2,55,07,04,01,Бе, 

,87,11,05,88, 19,30,20 

DATA Ғ”,11,1ғ,080,0Е,04,04,06, 
рр,7Е,08,77,00,23,23,10 


рата F7, 19,0, 20, Ғ1,Сс9,й8,08, 


Уса ПШ 
д 


BB DB, BB. .BB AA, AG 
В DATA 21, 18,C2,11,18,00,DD,21, 
@@,Е2,@Е,1й, 84,й08,00,7Е 
S0 CATA i, 77,00,23,23,10,Е7,19, 
ар, 20 、F1 。 9,29,08,00,00 
эй рата Сй,С8,С8,Сй8,Сй8,Сс8,С8,С8, 
COCO, CO iee COCO, COCO 
169 DATA COo. COSCO CO: се 


p 12 —. 3 月 号 44 ペ ー 


| | 
|. 
| | 


үү” 


ソー ズ 


の と き は | 『2 | を 押し て くだ さい . 

する と 実に カラ フル な 画面 に コマ が きれ 
い に 並 べら れ ま す . そこ で | SPACE | キー 
を 押す と , コマ が バラ バラ に され 数 十 秒 後 
- 音 楽 が 鳴り 。 ゲ ダ ゲーム ・ ス ター ト で す . 

ルー ル は , コマ を カー ソル ・ キ ー で 動か 
し て (スペ ー ス を 動か す の で は な く , ス ペー 
ス の 所 へ コマ を や スラ イド きせ ます ), 1 か G 
15 ま で の コマ を 並べ ます 。 完成 し た か どう 
か は , 自動 的 に 判断 し て くれ ます . な お , 


ギブ プ ・ ア ッ プ の と き は | RETURN | を 押し て 


くだ る きい 。 


BASIC+ ¥ š の レン 語 で す . Ж. УЕ は = = 
マ の 表示 と アト リ ビ ュ ー ト の 書き 変え を や 
っ て いま す . あと は すべ て BASIC が や っ 


て いま す が , 
Ж; 

この ブロ グラ ム で は 別に 難し いこ と は や 
っ て いな い の で , 解読 は 楽 ど と 思い ます が , 
簡単 な 行 番号 マッ プ を 付け て お き 


速 さ は これ で 充分 だ と 思い ま 


a r gE = te 2, про 目 で す 。 最初 


は BASIC の 簡単 な 命令 を 使っ て 単純 な も 
の ば か り 作 っ て いま し た が 。 
Е, 


それ か ら 約 2 
<ЭФТФСОТИУШЕУУРТЫЬРУа»” 
COLOR15 PUZZLE BASIC リ スト 


Зё,30,31,30,30, 2А, 2А, 

118 DATA 15,90,00 ,2А, 284,00, 15,00 
,08,2А,2Сс,0С,0С,0Сс,0С,28 

124 DATA ЗА, 335,33,33,32,2а, 2а, 23 
‚03,03,2А, 2А, 2А, 28,93,93 

139 DATA #2, 2А, 2C ,0C, 0C, OC, BC, 28 
.ЗА,33,33,33,32,2А,.2А,20 

148 DATA 61,03,28,2A,2A,06,03,03 
,2а,2а,2С,8Сс,йС,аС,0С,28 

159 DATA За, 32,30,30,32, 2A, 2А, 28 
„03,03, 2A, 2A, 2A, 00,00, 0 

158 рата 2A, 2A, 2C,0C,0C, 0C ,0C, 28 
,74.78,78,73,72,44,<4.6В 

178 САТА 45,45,42, 5А, 5А, 48,43,43 
5А, 5А, 5С,4С;4С,4С,4С, 58 

188 DATA ?А,73,73,73,72, 5А, óA, 6B 
43,43,62, 5А, 5А; 58,43,43 

199 DATA ФА, 5А, &С, PACs IDIAC, ACA 
32б4,73,73,73,272,<а4,64,68 

гай DATA 40, 49,60, óA, ба, 40,40,40 


TTT いた 奴 . お 前 は 何と いう こと を し て お る ん だ . 
От, 担当 DJ の つ ボ イノ リオ 先生 の こと は 少し も 
は プロ 級 の 腕前 で し か も 4 月 か ら は ラジ オ だ た ん ば で パソ コン 番組 を 拓 当 き 
- ハ イヤ ング KYOTO 水 曜日 


甘い て な いで は な いか >. 


` 
230 рата ga,8s, an AA SA 、BB 、83 83 


248 


ITOK SHKDA 
れる ほど の 人 物 な ん だ を . 
1143KHz22:00 一 1:00 を 聴い て つ ボ イ 先 生 に パソ コン に 関す る 質問 を 出 を う 


マシ ン 語 & コ マデ ー タ 


16K, 32K の 選択 
初期 設定 

メイ ン 

各種 SUB 


残り の 2 列 が い が い と 難し い 


ラム が 作れ る よう 
動き の 速い に リア クシ ョ ン ・ ケ 
まま だ まだ が の よう で す 。 

店 は 変わ り ま す が ,。 コマ を バラ バラ に し 
終わ っ て も , 上 の 1 列 が バラ バラ に な っ て 
いな いと き な ど あり ます が , 単純 に 乱数 で 
や っ て いる の で 。 PRK 
適当 な 値 に 変え た て くだ 

お 一 い / 秩 父 の 宮谷 êê / 飯能 の 高山 晃 
кзн КЫ oy Жасы US тет ерке 


て Еее 
ー ム を 作る に 


ЖАУ; 


.ба,2С,4С,4С,4С,4С,858 
MAN. 94 әм ры 
„óB, 43,43 

2А, ба, óC, 4C, ac, 4С,4С,48 
жа. BS BS 、BS B2. .QA 、 АА „АВ 


шот 
% 


«Аа,аа,аС,8С,8С,8С,8С,А8 
CATA e Ye EG dt le 
AA SB SA АА, АА, АЯ, АВ, 

258 САТА „б АС,ӘС,ВС,ВС 
‚Б^,В2,В@, Bü , 82 , а ‚а, А 
248 DATA в8,6 ей SA ÁA فرق‎ AA, S, ا‎ 

si ЁЁ ,Ас,8С,8Сс,8С,8С.,ғ8 
270 DATA Без, , 82,83,83, 62 ضغ‎ Ана, ضرغ‎ 
23, 33 ضھ,‎ 6 Н AA, , 3 


, EC, AS 


ей рата E2 A „AC „8C, SC, 8C, 8C, A8 
„Ра, F2 。F ヨ 。F ヨ 。F2 Eñ EQ Z EA 
та DATA EB C32, ES, EA, EA, En 、CB 。 ビ 3 


Еа. Ен, EC CC CC Се CU WB 
500 бат з Ға, .Ғ2,Е2 ,FB, .Ғг,Ел,Ел,Ей 


1 ГА y KYOTO i+ nil iv) と 
DRA 先生 は 88mk IIUSER で , ゲー ム 
これ を 読ん で いる 諸君 。 KBS 京 都 の 
何で も 適当 に 答え を て くだ さる は 


PIG 


EB C3, EA, EA, EA EA, C0, Cü 
310 рата Ба,Еа,ЕСс,ССс,ССс.ССс,СС,Е8 
.Ға,.Е2,ҒЗ,ЕЗ,Ғ2,ЕБАа,ЕБа,Ей 

320 рата ЕВ,С2,С2,Еға,Ба,Ба,СВ,СЗ 
EA, EA, ECYC, OCCC OCES | 
339 бата 2A,32,33,33,33,33,32, 2A 
.2а,2і,2Б,88,83,032,82,24 


ч) 
L 


а.8Е,0Сс,8Сс,0С,0С,йа,268 
350 DATA 2А, ЗА, 30,30,30 , 36 , 20 , ه2‎ 
a BALDA, OG, AA, BÀ, дА, 2 
DATA 2A,28,03,03,03,03, 2A, 2A 


С 


L 


- 


LU 


ас,й 

DATA 2A,18,33,33,33,233,02,2A 

ar ar ac aC ac BA, 2A 

DATA 2A, 18,33,33,33,33,02,2A 
š 


bopa 
= 
СІ 


(Cu 
рә 
еш 7] 


сз 
IT T 1 


Ci 
ta O Pa J Pa Ce. O NT 


Cü 


о ә T 


pa 
PKS 
@- 


С 
кч] 

> 
у] 

Сл 
1-- 
r= "= 


T (G ho (Q hj 


С 


,8Е,18,04,08,77,23,1й, 
420 DATA 19,0р,280,Ғ5,С9,00,80,й0й 
BB. Ba GO, aB BB GA, GG, U 

458 CLEAR 1808, ,%wHEFFF:DIH ACS, 3 
440 CONSOLE, ,0,0:SCREEN 1,1,1 
458 CLS:LOCATE 1, 1 PRINT Hait a 
minute." 

дей БОР ІсынҒғйай TO %HF27”F 

470 READ АФ:РОКЕ I YAL "АН" жа) 
488 NEXT І:КЕҮ 1," 1&é"+CHR%< 13) 
490 KEY 2, "32" +СНКЄ ‹ 15) 

500 (ОСАТЕ 1, і: PRINT 1&К.... L PUS 
МСР ЕТИУ, Ba 

510 LDCATE 1,3:РРІМЧТ"32К.....РОЅ 
Н FZI KEY。" skPRINT 

520 INPUT"Which" {Р 

S34 IF Р=14 THEN G=%HÜC2:H=k HCB : G 
ото 579 

54й IF P=32 THEN POKE w*HF80143,#š&H8 
2:РОКЕ &HF062 KKHS2 

558 РОКЕ %š%HF282 “НЭ : 6=%H32 : H=š:H 


і E 
> уа uT т-до ф-т PEA ух а-у? RNB 97° ) 


ず だ . (名 古屋 大 学 能楽 部 生 の 本 山 変人 ) 


ドー ロロ siFUR I=ü ТО 
57а БОБОВ 

444 МЕХТ 

る 19 хай үш; 
82й GUSUE 

る 3 NEXT І 


4. 


+ T с 


mm © р © Uj . —- 
“TOC llm О) l 


ч = jH ú — H n 


|| ここ 


850 A( 2,0 =9:4‹ 


"Жыл 


> 


Ci — w H <= H = oe Dinos ° 


ты ко 


HFASE ,Y 
HF ABB 


S: 


&80 РОКЕ *HF0ŠSF -C +EX 


ын1й58 

228 D=0:S=5TICK(0):0N S GOTO 750 
, 720 ; 760 ,720 ,770 ,720 , 780 , 720 

280 IF ІМКЕҮФ=СНЕФ‹ 13) THEN 12680 
740 GOTO 720 

759 GQ=1:GOSUB 790:GOTO 700 

760 Q=2:GOSUB 790:50Т0 700 

278 0=3:60506 799:GOTO 700 

7280 Q=4:GOSUB 790:00Т0 700 

298 ON О GOSUB 830,849,890 , 920 
800 RETURN 

810 EXEC wH1BB3:PLAY"SOMƏ800C 16" 
820 RETURN 

8Зй IF Y=3 THEN RETURN 

848 C=A(Y+1,X) :GOSUB 670:АСҮ,Хт 
CiY=Y+1:C=0;G0SUB 679 :4<Ү,Х) =й 
858 GOSUB 810:0050в 1910 : КЕТЕМ 


‚840 IF Х=й THEN RETURN 


870 С-АСҮ,Х-12:06050В 670:Аа<Ү,9- 
С:Х-Х-1:С-Й:5050В 670 :А‹Ү,Х =0 
880 650508 810:GOSUB 1919:RETURN 
890 IF Y=ð THEN RETURN 
аа С-Аа(Ү-1,Х2:606508 &70:А(Ү,Х = 
С:Ү=Ү-1:С=0 :60508 &70:АҮ,Х) =9 
210 БОСОВ 10:60508 1010 : РЕТОЕМ 
ゥ 2 IF ※=3 THEN RETURN 
938 С=а‹ү,Х+1) :560508 670:АаСҮ,Х9- 
D :X=X+1:C=0:GOSUB 670:АСҮ,ХӘ-й 
GOSUB 818:G0SUB 1819:RETURN 
EXEC &H1058 
IF STRIG(0)<>1 THEN の る 9 
Х=3:ү=3:0=1:Е0ОВ 1=1 TO 200 
ロ =INTCRNDC 1) %4) +1:60SUB 790 


Z уһ PNT 


COLOR15 PUZZLE BASIC リ スト 


199 GOTO 710 
181й IF D<>g THEN RETURN 

1424 К=К+1:1=0:ҒОВ М-й TO З 

1930 FOR М-й TO 3:1=1+1 

1848 IF I=14 THEN 1=0 

1858 IF А(М,М2<21 THEN RETURN 
1048 NEXT МЕМЕХТ М 

1474 МФл"!,/12Т7200180%ЕҒС5027С4066507 
C40 る 860ZC2R4CDECDE402BOUZD4C4R" 
188 9Ф-"!/10Т72001.404605СЕСбҒА2С2 
04B4B8B05C" 

1990 EXEC &HIBB3:PLAY U$, VE 

1100 IF PEEK¿(%*HFD1B)<>8 THEN 110 
й 

1110 2-1:РЕТИРЫ | 
1128 60506 1210:6050в 1240: 0СсАатТ 
E З,7іРКІМТ Кү" WED し まし に 。" 
1130 LOCATE 4,14:РБІМТ"НІТ [RETU 
RNJ] KEY" :EXEC &H1958 

1140 IF INKEY ま く > う CHR 和 まま ( 13) THEN 11 
40 

115й GOTO 57й 

1149 U 生 =" り 12C2DBE-CG2『 

1178 り ま =" リ 18H3C2DSCGE-6 る 4FS4Eー64F 
る 4E ビ ー さ 4F る 4 ビー る 4F 54" 

1180 EXEC &H1BB3:PLAY LU まり 

1198 IF PEEKX(&HFD1B〉) く っ う 9 THEN 119 
ñ 

1200 RETURN 

1210 POKE &HF281,0 :POKE &HF282,H. 
:РОКЕ ҰНҒ284,8:РОКЕ &HF287 , 32 
1220 POKE %НҒЕ28В,24:ЕХЕС *HF2880: 
POKE ыНҒ282,06:ЕХЕС &HF280 

1238 RETURN 

1240 POKE ыНҒ281,%Н18:РОКЕ &HF28 
2.Н:РОКЕ &HF284,%&H18 

1250 POKE ыНҒ287,%Н62:РОКЕ &HF28 
В,8:ЕХЕС &HF 289 : RETURN 

1260 GOSUB 12108:6505МВ 1240:LOCAT 
Е 7,?7:РКІМТ"Фь. М1! ! " 

1270 FOR 1=1 ТО 30:EXEC %*H1BCD:N 
ЕХТ 1 

1280 LOCATE 4, 14:РРІМТ"НІТ [RETU 
ЕМ1 КЕҮ" 

1298 IF ІМКЕҮФ<>СНЕФ‹ 13) THEN 12 
98 

1300 EXEC ыН1058:060Т0 570 

1310 POKE &HF282,H:RETURN 

1320 РЕМ. ·· · · • • .ТНЕ · ЕЧО • · • • 


чаа TOA ОА | ws un 
INO RI _ LH 


SJ Zi]: 


テン だっ 2 早い T に は 最適 Ce な いか と 思い ます 
1T2 #979-088 6 . ル ー- ア させ れれ ば 
使え ます жа 402 Сог) = 


と し て も U85533, これ は УТ ТА k SET 


た と き に 偶然 ひら ぬい た RAE CT, 


у Жез ® ру 


81 


РС-БООО:/ 


BASIC( コ ン パ イラ ) 


SCORE 1118 AREA 1 


kd 


калар き , RIESE ト ・ サ 
イド シテ ィ に 向かっ て , 愛車 を ぶっ 飛ば し 


て いた . 6351076311138 < 722535. Ж 
か ら 吹 き 込 ん で くる 冷た い 風 が , 俺 の 顔 を 
оч 9 ЧУ 

俺 の 名 は ケン ・ ト モ キ . 地球 防衛 隊 ・ 
銀河 の メン バー で ある . 

彼女 の 家 に 着い た . 俺 は エン ジン を 止め , 
車 か ら 出 た . 門 の プ ザ ー を 押し , その まま 
待っ た . ドア が 開い て 彼女 一 一 ミカ ・ ス ズ 
ノ が 出 て きた . 
「 待 っ て た わ . さ 入 っ て .」 と ミカ は 門 を 開 
けた . 「 久 し ぶり だ な .」 俺 は そう 言い な が 
ら 入 っ た . 俺 は ミカ の 出し て くれ た コー ヒ 
ー を すす りな が ら , ミカ の 顔 を じっと 見 つ 
кг ЖЕЛЕ ЛУСУ eb eh E S SB 
は それ に 気付 いた が 何 も 言 わな か っ た . Ж 
黙 が 5 分 続い た . 突然 ミカ が 「 と うと う 行 
く の ね .」 と つぶ や い た. 俺 は それ に は 答 
えら れ な か っ た . ミカ が 続け て 言う .「 ま 
た 帰っ て 来 て て れる ん で し ょ 7?7」 Шам 
っ て いた 。「 そ う よ ね .」 俺 は ミカ の 目 に 涙 
が た まっ て いる の を 見 た .「 や め よ う , Ж 
の 話 は . それ より 今日 は まだ 自由 の 身 だ . 
そう だ な … よ し ./ お まえ の 好き な 海 に 行こ 


2% Peya САҚ J "сәзіжі 
り だ .」「 私 着 が えて 来る . 少し 待っ て て .」 
そう 言う と ミカ は 部 屋 か ら 出 て いっ た . 
それ か ら 俺 達 は 3 時 間 程 海 で 過ごし た . 
その うち に 日 も 西 に 傾き , 西 の 空 を 真赤 に 


染め て いた .「 き れい .」 ミ カ が 言っ た . й 
も 言っ た .「 そ うだ な .。・……… な が - み šS Z í; 5 


きっ と 帰っ て 来る よ .」 
9 本 当 さ . ノ 
気 を 付け て ね .」 
{& (3 銀 河 ы жоі ааа ашыққа 
た . KE こ な け 
れ ば . 本 当 に 帰っ て 来れ る だ ろう か ?2 U. 
や 帰っ て 来れ る さ . きっ と .」 


「… 本 当 ? ر‎ 
じゃ あ , 俺 行く よ .」 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


。 | スピ ー ド 的 に は 問題 な いよ う で す が 
ЖЕН ゲー ム の 内 容 と し て は も う 一 工夫 ほ 
。 | し いて すね . 


入力 の 説明 


は , 2 を 入力 


Ф “How Many Pages?” に 
ааш CN SL 

② リ スト 1 の デー タ ・ プ ログ ラム を 入力 し 
ます 。 

テー ブ に セ モーグ し ます . 

の ⑳ 次 に リス ト 2 の メイ ン ・ ブ ログ ラム を 入 
2.27. 

これ は , さっき の テー と は 別 の テー ジ 
Б-ҒА бс; 
@CLEAR1OOO,&HDOOO Z íf L š +. 
@⑬EXEC&H4000 を 実行 し , コン パイ ル し 
ます . “STRING LENGTH?” Wl, その 
まま | RETURN | キー を 押し て くだ さい . 
そし て これ を 先ほど の デー タ ・ プ ブロ グラ 
ム の 後に 続け て セー し て くだ る さい 。 

⑥ テ ー プ を 巻き も と ど し , 一 度 電源 を 切っ て 
くだ さい 。 


AO: 
ө 50 


Ç) 


Ф ` ‘How ae Радев? TS 


Ән, ポケ コン の マシ ン 語 プロ グラ ム が 増え て きま し た ね . そこ で 
注文 する と 品切れ だ し, 増員 し だ た ころ に は 金 が な い / 
PCUC に 入ら な い ポ ケ コ ン ・ ユ ー ザ ー な ん て , クリ ー プ を 入れ な い コ ユー ヒー と 同じ で す よ /( を 一 と 一 上 か っ た り し 


748555576075; 
ЕСЫСІС AYSE 


に は 2 を 入力 し 
Ж”; 

OCLOAD| RETURN | として, デー タ ・ プ ロ 
Ри FLS RUN し て (だ お 
指示 に 従っ て |『1| キ ー を 押す と , メイ 
ン ・ プ ログ ラム を 読み ます . 

の Е, TERA Од; 


ーー ム の 説明 


| SPACE | キー を 押す と, 音楽 が 流れ て 
ゲー ム ・ ス ター ト で す 。 あな だ は 8 方 向 自 
由 自 在 に 動け る ファ イタ ー を 操り , 
[SPACE] キー で ミサ イル を 発射 し て , 飛来 
СЕСЕ ТУИТ САБЕ, 

敵 は 12 種 類 あ り , それ ぞ れ 得点 や 動き 方 
な ど が 異な り ま す . 40 匹 打ち 落と す と 面 ク 
Ет; 

4 の 倍数 面 ( い (つも こう だ ーー) は ボー ナ 
ス ・ エ リア で す . 時 間 内 に 画面 中 に ラン ダ 


リー スズ +EXAS コ ン バ イ ラ ROM 


Lu AREA 


ム に 置か れる "|?]" の 中 か ら 3 つ 選び , 7 
ковго Т 
は それ ぞ れ 0--9 の 番号 が あり , 1 つ 目 に 取 
okr "? の 番号 が その まま ボー ナス の 
千 の 位 に な り ま す . 同様 に 2 つ 目 は 百 の 位 , 
3 つ 目 は 十 の 位 に な り ま す . 

ы Ж „шы ое му уер „ЧЫЙ Кы = 
ЕСІКТЕ ча Б, “АЙШҒАСЫ こ あ に は 
な り ま す . また , 0 の 番号 の [O を 取る 
と , その 場 で ファ イタ ー が 1 機 増 えま す . 

5 面 以後 は 後半 に な る L, Бл» 
ます . これ は , 破壊 不可 能 で びす. スコ ユア が 。, 
20.000 点 と 40.000 点 を 越 を た と き と , あと 
は 40.000 点 ご と に ファ イタ ー が 増え ます . 
まだ た スコア は 300.000 点 を 越え る と 0 点 に 戻 
り ま す が 。 それ で も 40.000 点 ご と に ファ アイ 

ПЛАТА Та лы 
あま り い な いで し ょ う ). 面 は 32 面 あり, 
33 面 か ら は 1 面 に 戻り ます . 

ス ア オタ ダー が 無く 《 な る と 。, 
An で У И. р С у. 


ゲー ム ・ オ ー 
7 が 5 位 以内 だ っ 


' だ ら 名 前 を 登録 びき ます . カー ソル の 左右 


で 文字 を 選び , | SPACE | キー で 入力 し ま 
す (10 文 字 ま で ). 


グラ ム の 説明 


例 に よっ て , BASIC と マシ ン 語 サブ ル 
= テン と で 成り 立っ て いま す BASICO 
方 は , 各 ル ー チ ン の 頭 に REM 文 を 付け て 
いま す の で それ を 参考 に し て くだ る 
まだ , GOSUB 文 が 非常 に 多い で す が , {# 
は 合理 主義 (めん どく る が 0 り ? ) な の で 似 た 
所 の ルー チン に も て し ЖЕРІ そ 
の だ め ,。 も て も 理解 じ に 8 а aba уй ча 
ャ し て いる の で 。 あま MA に し な ゆい 方 が 
いい で しょう. マシ ン 語 の 方 は 。 キャ ラク 
表示 の みみ を や ゃ やらせ て いさ ます 


ー ム の コツ 


と に か <, 英 の 弾 を よく 見 て うま くく かわ 
すこ と で す . まだ , 敵 の 飛行 コー ス を 覚え 
る こと も 高 得点 に つなが り ま す . それ か ら , 
敵 は 画面 下 半 分 で は 得点 が 倍 に な る の で , 
引き 寄せ て 射 つ の も いい と 思い ます . 


僕 も 本格 的 に マシ ン 語 を … と 思い 「 ポ ボ ポケ コン ・ マ シン 語 入 門 」 を 買お 
な ん て 不運 な ん だ ろう // P.S. 皆さん , Robin き ん の 


(水上 秀樹 ) 


終わ り に 


Бу о EM ха ҒАС 
意味 の な い 所 が 多い よう で す が , 僕 は 気 に 
入っ て いま す ( 弟 に くる い / と 言わ れ だ り 
も も まし た ぁ る けけ 、 と ころ みや で 、 cO И 
は 隠し キャ ラク タ が 存在 し ます . 出し 方 は 
あり ます が, あえ て 教え を ませ ん . 見 つけ た だ 


ら PiOPiO に で も 出し て くれ れ ば 幸い で す . 


私 事 に な り ま す が , PiO な イラ スト の っ コ 
ー ナ ー で 3 回 載っ た こと が ある イモ 男 と は 


КЕМ 
КЕМ 
КЕМ 
КЕМ 
10 ОШТУН, 2 
20 FORI=%HDØØØTO}HDØZ1 : КЕАрАФ: РО 
КЕІ, VAL ( "ZH" +A%) : NEXT 
50 FUHRI=&HD4 の TUHD の 6Di КЕАРрАФ: FO 
EET, VAL. ("Н'+АФ) : NEXT 
40 FORI=%HD11@TO%HD2EF : READA$: FO 
EEI, VAL ("&H"+A$) : NEXT 
50 FORI=4HDZAOTOLHDZS Е:КЕАрА:РОК 
ЕІ,А: МЕХТ 
60 FORI=%HDZéQTOLHDARF : READA: РОН 
ЕІ,А: МЕХТ 
70 ОШТУН, 2: КЕҮ1, "CLOAD"+CHRS (1 
5) 
80 СІСБЕРКІМТ. "ЕҒ12? オル テグ の TA ГЕМ 
D 
100 DATA 2а,02,41,2с,01,с0,00,21 
099; 02, Sd ca 12.00. 09:65 
110 DATA йа,а80,2а,02,41,4Ғ,06,00 
4109,е5,2а,00,41,54,5сі,е1 
120 DATA 06,0с,с5,01,14,00,1а,77 
1125-25. 16,77815%0%,с%,20 
1:0 DATA ТІ; с? 
140 DATA За,75,40,2с,01,с0,00,21 
;00 e2 SOCIO SA OO OT CS 
150 DATA 4а,а10,5а,72,40,4Ғ,06,00 
‚29 ,е5, га, 70,00,54, 5а,еі 
1560 DATA 06,06,с<85,01,20,00,1а,77 
ピザ 
170 рата 02,00,02:,00,02:,00,02,00 
40Ғ,с0,0Ғ,с0 
180 DATA 35ғ,Ғ0;Ғға,Ғс,Ға,Ғс,Ғғы е 
PY ed 
190 рата 00,00, 2с, +0, 5с, #0, Зе, +0 
„де, сӣ, де, cø 
200 DATA 02,00,02 。 の の 。 の 6 。 40,06,40 
, 06,42,02 , 0 
210 DATA 83,08,a3,28,ab,a8, 2b , a0 
, Ob, の , Øb, 80 
220 DATA 03,00,03, 00,03,00 , 0=, 00 
,07,40,04 , 0 
250 DATA 20,20,а2,28,аҒ,е8,а5,68 
124,ей,05,40 
240 DATA 0ғ,с0,0:,00,02:,00,07,40 
, 07,40,03 , 2 
250 DATA а1,28,а9,аВ,а9?,а8,2%9,а0 
409,062; ай 
260 DATA а1,28,з1,28,а9,аВ,а9,аВ 
481,28,81,08 
270 DATA 08,00,22,20,Ғе,Ғс,16,5с 
(FOZ CENO EY 
280 DATA Зе, +0, бе, сӣ, 02,00,02 ,00 
‚26,40,04, 40 
290 DATA 02,00,02:,00,02:,00,02:,00 
,83,08,ab, ав 


2 REM ххххҰххххххекхжхжженж 
4 КЕМ ж INSECT AREA ж 

6 КЕМ * by Кепісһі.АКітоо * 

B REM жек еже ЗЕ ЗЕ ЭЕ жн 

10 DIMIX(4),IY(4),IF(4),IS(4),IH 
(4),ВХ(10),ВҮ(10),ВМ(10),ЕН(10) 
20 DIMHS (5) ,Н65(4),М%(5),А6(42,Ғ( 
5УҰА%(99:ТХХ97, TYI TACI 

50 CONSOLE, 。 。g: SCREEN4 , 2 。 2: COLOR 
із2:РГАУ"%200658т5000","%200658т20 
oo" 

да SOUND7 ,&HDC: SOUNDS , 20 

50 A1=&%HD1ØØ:A2=%HDØ70: ロコ =%&HD の の の 
:А4=%нра40 

60 ҒОКІ=0т04: Н (1) =1000: МФ (1) =" " 
: NEXT 


僕 の こと で す . 


4? 


5 面 か ら は 攻撃 も は げ し く な る ぞ / 


SCORE 251516 


о Б. ТОРГО Е 


スト を 投稿 し て いき だ いと 思い ます の 


リス ト 1 INSECT AREA デー タ ・ プ ログ ラム 


500 DATA 2Ь,а0,02,00,2Б,ад,аһ,ав 
.87,48,07,40 

510 DATA 80, 08,а5,28,аҒ,28,24,е0 
412Ғ,ей,0ғ, cø 

520 DATA ҒҒ,4с,с4,сс,02,00,02,00 
, 07,40,04,40 

550 DATA 42,5с,Ғ2,3с,Ғ2,35с,Ға,Ы5с 
„Ға, Бс, За, Ьб 

540 DATA За, 0, За ,Ь0, да, 80, 0а , 80 
з іа, Чӣ, іа, аб 

っ の DATA 25,00, 0:,00,025,00,22,20 
 af,eB,b+f,+f8 

560 БАТА bf,f8,bd,f8,bd,fB,95,58 
, 85,48,01 , 00 

570 DATA 40,04,51,14,55,54,55 
4954 аа луда ТӨ 

180 DATA 51,14,51,14,15,50,15,50 
,05,40,01,00 

290 DATA 00,00,00,00,00,00,00,00 
, 00,02, 02, 00 

400 DATA 00,00,00,00,00,00,00,00 
:00,00,00,00 

410 DATA 00,250,20,20,20,00,00,00 
‚20,00, 02 , 00 

420 DATA 04,15,14,14,15,04,00,40 
, 40,40, 4 の, の の 

4:0 DATA 00,00,00,00,00,00,02,00 
әйі,с0,:55,Сс0 

440 DATA 27,с0,0с,00,00,00,00,00 
, 20, 008, 00, 00 

450 DATA 00,00,00,20,00,00,0с,с0 
зда,с0,55,00 

460 DATA 25,с0,27,00,0с,00,с0,00 
,00,с0,00,00 Ў 
470 DATA 0, 0с ,00,00,0+,00,27,са 
;95,с0;95,70 

480 DATA а5,70,25,70,2а,ғ0,0Ғ,с0 
, Oc, Oc, 00,0 

490 DATA да > 00, SS ,40,17, ,50,d5;d0 
‚ 501,94, 75,74 

500 рата 77,74,957,74,17,57,19,70 
105,с0,00,с0 

510 DATA с0,@с, #2, 5с, Ға,Ьс, ға, Бс 
„еа, ас, 2а, ад 

520 DATA 2а,а0,22,20,22,20,2а,а0 
"ба,80,02,00 

550 DATA Ғ3,2с,425,2с,ее,ес,Ға,5с 
,Зза,Һ50,2е,Ғ0 

540 DATA 0е,с0,2е,Ғ0,0Ғ,с0,05,00 
:07,40,04,40 

550 DATA 5, 5с,а5,5с,5+#,04,75,74 
322,74,55,74 

560 DATA 52,44,57,54,57,54,55,54 
387,5с,45,5с 

370 DATA іа, іу, A AS 
Мі Құла ПРЕ Ре 

580 DATA 1,1,:5,4,2,35,4,;5,1,5,5,5 
4,445,6 


| リリ スト ク INSECT AREA メイ ン ソー ス ・ 


72 GOTO 2000 
80 КЕМ жжж GAME STAET +++ 

90 5С=0: 5Н=5: AR=1:W1=1:G=11: Аб=# 
Нр500:Ы2-1:Н-1:51-0 

95 GOSUR1 200 

100 CLS: COLOR 1:PRTNT " SCORE 

0 AREA SH 

110 LOCATEG,@sPRINT SC:LOCATE20, 
@:РКІМТ АК 

120 FOEEA1 , H1Q0: FUEER1+1 を HD 1 : РО 
КЕд1%2,25:РОКЕА1%2,0:ЕХЕСАЗ 

150 Хл15:Үл20:МІсі:55-0:С-0:Ц-20 
:RO=1: J=Q0: SF=0 

140 FOR I=1TO0O10:EM(1) =1:NEXT: EN= 
a 4 

150 КЕМ жжж MAIN жж 


リス ト 


2700 DATA = 


Р, 


書き 忘れ まし だ た だ が,。 DATA プ ログ ラム 
は 絶対 に コン マイ ル し な いで くだ さる い . メ 
イン ・ プ ログ ラム は ソー ス を ロー ド し て コ 
ン バ パパ イル し だ も の を その まま 使う こと が で 
きま せん オプ ジェ グ キ ト を 一 度 セ ー デ し C, 
を た れれ どー ド す る よう に し て て だ ちい 
K3 参 考 文献 
ペー ラッ マー ウェ ア PC-6001。 工学 社 


HO 


590 DATA 2,4;5,7,1,5,0,0,5,6,6,7 
,6,6,7,9 

500 БАТА 5,5,7,8,1,7,8,8,4,6,8,9 
,2,8,8,9 

610 DATA 4,8,9,9,5,9,9,10,2,6,10 
,10,7,8,10,11 

520 БАТА 1,2,2,12,8,9,10,11,1,9, 
12; 12 1151453109. 32 

550 DATA 5,5,5,4,5,5,4,5,5,4,5,4 
КУ Ө. 

540 DATA 5,4,5,5,2,3,2,4,4,4,4,5 
,3,5,5,5 

950 DATA 6,6,0,6,6,6,0 
600 DATA 5,5,5,5,5,4,4 
р ЫРЫҚ. 

570 DATA 5,5,2,2,2,2,2,1,4,1,4:8 
,:8,8,8,7 

580 DATA 7,7,7,6,6,0,6,5,5,5,5,4 
,4,4,4,4 

590 ФАТА 4,4,4,2,4,5,2,4,2,3,2,2 


т.т Р 
4,2,3,3 


710 рата 4 
35,5,6,6 
720 БАТА 7,7,6,7,6,7,6,6,5,5,5,4 
,4,4,2,2 
750 DATA 4 
740 DATA 5 
Е С. 
750 DATA 2,2,2,1,1,1,1,8,8,8,8,8 
,8,8,0 
760 DATA 5,5,5,6,6,7,7,6,5,5,5,4 
تاوت وتو‎ 
270 БАТА 5,5,4,4,4,4,5,5,5,5,6,% 
:6,6,6,5 
780 DATA 5, 
790 DATA 5, 
,4,4,5,5 
800 DATA 5,5,5,5,5,6,6,6,6,7,7,7 
,8,8,8,1 
805 DATA 1,5,5,5,5,5,4,4,5,5,6,6 


4,4,4,5,2,1,8,7,6,5,6,6 
:5,5,4,4,5,5,0 
8530 DATA 5,5,5,5,5,5,5,2,2,06,6,2 
,5,7,7,4 


650 DATA 8В;4,4,1,1,1,1,1,1,1,1,0 
2 
, 


155 IFSS >ЙТНЕМ700 

160 A=STICE (JS) : IFA=OTHENVX =0: VY 
= の 

170 ОМАСО5Ч0В2420,2440,2450,2460, 
2470,2480,2490,2500 

180 FOEEA1 , ZH18:FOEEA1 +1 , Нр: FO 
KEA1+2,X:FOKEA1+3,Y:EXECAZ 

190 IFY+VYEGANDY+VYE 1ТНЕМҮ-УҮ-УҮ 
200 ІРХ+УХ 5-1 АМОХ+УХ < 31 ТНЕМХ=Х+У 


X 

210 FOKEEA1,%H10:FOKEA1+1,%HD1:FO 
КЕА1+2,Х: РОКЕА1+3,Ү: ЕХЕСАЗ 

220 A=STR1G (JS): IFA=1ANDMI=1 THEN 
GOSUE TAO 

250 IFMI=@THENGOSUES20 

255 FORI=1TO010: ON EM(I) +16GO0SUE10 


85 


мо 


ІЛ АКФ INSECT AREA メイ ン 


00,1140:МЕХТ 
Eee IFMI=@THENGOSURZ20Q 

50 IFR0=@THENGOSUB4200 
258 IFD+*OTHENGOSUER1 240: GOTO 150 
260 IFYI +2OANDAR *4ANDRO= 1 ANDRND ( 
1)*1@>STHENG0OSUB4450 
270 FORI=1T04: IFIS(I)=ØTHENFORZ= 
07010:МЕХТ2 ` 
272 IFIS(I) >ЙТНЕМСО0511вВ970 
275 МЕХТІ 
280 IFJ=1THENJ= の gg MT=1gFLRY" ロ 1 ヒ + ミ 
2е+3" 
285 IFSF=1THENGOSUEZS8QQ 
290 GOTO 150 
200 КЕМ жжж MISSILE SUE *** 
510 MX=X:MY=Y-1:MI=Ø:FLAY "о7с+1 
6": RETURN 
320 FOFEA2Z,%HZ6:FOREA2+1,%HD2:FO 
КЕА2+3, МҮ 
ささ の FORZ=QTO1 : РОКЕА2+2,МХ+2 : EXEC 
А4: МЕХТ 
540 МҮ=МҮ-2: IFMYS 2ТНЕММІ =1 : RETUR 
N 
250 РОКЕА2 , HIZO: РОКЕА2+1 , &HDZE: FO 
КЕА2%3,МҮ 
560 ҒОК2-0ТО1:РОКЕА2%2,МХ%7:ЕХЕС 
А4:МЕХТ 
570 RETURN 
580 ІРРХУМХ- 2АМОЕХ: MX+2ANDF Y MX 一 
AANDPFPY4MY+1ANDMI=ATHENJ =1: GOTO 4 
20 
585 ІЕРХ>Х-2АМрРХ<Х-2АМОРҮ >Ү-2АМ 
DF'Y< Y+2ANDSS=ØTHENGOSUE4Ø0: GOTO 
570 
590 RETURN 
400 РОКЕА2 , Н26: РОКЕА2+1 , #%Нр2: РО 
КЕА2425,МҮ 
410 ҒОК2-0Т01: РОКЕА2+2,М Х+2: EXEC 
A4:NEXT:IS(I)= 
420 ОМІР ‹1) GOSUB440, 450,460,470, 
480,470, 500,510,520, 530,540,550 
450 IFIY(I)>12THENFO=FO+FO 
455 60506600: RETURN 
440 ҒО-2: RETURN 
450 F ロ = ミ 』 RETURN 
460 FO=5: RETURN 
470 FO=5: RETURN 
480 FO=8: RETURN 
490 Е0=10: RETURN 
500 FO=12: RETURN 
3% FO=1 5: RETURN 

20 FO=15: RETURN 
530 FO= 20: RETURN 
540 FO=30: RETURN 
550 FO=40: RETURN 
570 SS=1: SOUND12, 10: RETURN 
600 КЕМ жжж ADD SCORE жж 
610 LOCATEG, A: COLOR Ø:FRINT SC 
620 SC=SC+FO: S1=91+F0: IFSC= > さ の の の 
の THENSC=G ビ ー さ の の の の 
625 6=13- (LEN (STR$ (SC) ) ) 』 CDLOR 1 
650 LOCATEG,Ø:FRINT 5С: IFG1=>2 の の 
ФАМОИ 1 = 1 ТНЕМИ1=0: 51 =51--2000: GOSU 
вед 
40 TFS1= ッ >4 の の 9THENS 1 = 51-4000: 605 
0в660 
550 RETURN 
660 PLAY "оЗсеВао4с":1 ОСАТЕ27,0: 
COLOR 0:РКІМТ SH 
670 SH=SH+1: COLOR 1:1 ОСАТЕ27,0:Е 
RINT SH 
680 RETURN 
700 КЕМ *** BONG !! жж 
710 РОКЕА1%2,Х:РОКЕА1-2,Ү:РОКЕА1 
+1 ,*HD2 
720 0М5560650в900,910,920,910,920 
:910,920,910,920,920 
7530 SS= SS+1: IFSS= 5@ТНЕМ75@ 
725 ІҒЕ5б-ФТНЕМ5ОЦММ010,0 
740 GOTO 220 
750 LOCATE2E7 , 0: COLORO: FRINTSH: CO 
LOR1 
760 5Н=5Н- 1:1 ОСАТЕ27,0:РКІМТ SH: 
IFSH=@THEN1500 
78@ GOTO 100 
800 FOFEA1+2,IX(I):FOEEA1+Z, IY (I 
):РОКЕА141,%Нр2 
805 ОМ1І5(1І)-16051/вВ900,910,920,92 
02 
810 IS(I)=IS(I)+1:IFIS(I)=&6THENG 
0506850 
815 IFD:6THENFORZ=1 TO6: NEXT 
815 IFIS(I)=2ØTHENIS(I)=1: BDSUE9 
50 
820 RETURN 
830 YI=YI+1:IS(I)=RND(1)*5+6 
840 IFY1I> さ 6THENTS(T ) = の 
850 IFIS(1)+IS(2)+IS(3)+IS(4)=ØT 
НЕМр=50@: Н=0: SF=0 
860 RETURN 


ソー ス ・ リ スト 


匠 私 の 友人 N 君 は ふざけ た ヤ ロ 


900 РОКЕА1,%Н48:60Т0 940 
910 РОКЕА1,%Н00:650Т0 940 
920 РОКЕА1,%Н78:650Т70 940 
920 РОКЕА1,%Н18 
940 EXECAZ: RETURN 
950 ОМІР (1) GDBUE265 の 2740, 2840,2 
940, 3O80, 3140,3240,2740, 3540 , 364 
2,4540 
960 TFTIF(I)=12THENBDSUB465 の 
965 RETURN 
970 ОМІР (1) GUSUE26 の の 。 2700, 2800 ,2 
900,2000,2100,2200,2200,2500,200 
2,4500 | 
980 ІҒІР(І)-12ТНЕМбО5ЦВ4600 
990 RETURN 

1000 КЕМ *xx БОМБ SUE +++ 

1010 IFSS= の THENPX=EX(T) :PY=BY(1 ) 
: GUSUE 1 090 

1015 IFENM(T)=1THEN1 140 

1020 FOKEAZ ,&HZ36:FOKEA2+1,%HD2: P 
ОКЕА2+2 , BX (1) :FOEEA2+3 , BY (1) :ЕХЕ 
CA4 

1040 EX (1) =ВХ (І) +EH( 1) 』 IFEX (1) > さ 
ØOREX (1) <ØTHENEM (I) =1 : BN=EN- 1 : КЕ 
TURN 

1045 BY (1) =BY (1) +1: IFBY (1) > る 1THE 
NEM (I) =1 : BN=BN-1: RETURN 

1050 РОКЕА2, НІС: РОКЕА2+1 , Нут: P 
ОКЕА2+2, BX (1) :POEEA2+3 ,EY (1) :ЕХЕ 
CA4 

1070 IFSS=QTHENFX=EX (1) sFY=BY (1) 
: 5605081990 

1080 RETURN 

1090 IFXFX-2ANDXSFX+1ANDFYSY+2A 
МОРҮ>Ү-1ТНЕМ1110 

1100 RETURN 

1110 FOKEAZ ,%&H36: РОКЕА2+1 , НЮР: F 
OEEA2+2 , FX: FOEEA2+3 ,PY: EXECA4 
1120 EM(1) =1: BN=BN-1: GOTO 570 
1140 FORZ=1T07:NEXTZ: RETURN 

1200 REM *** SHOEI SUB +++ 

1210 FORI=1T04: IF (1) =РЕЕК (A5) : А5 
=A5+ 1 : NEXT 

1220 ү1=@:В=@:К5=@ 

1220 RETURN 

1240 COLOR1 : IFD=1 ANDH= の THEN 1 400 
1245 IFE= の ANDD: 11ТНЕМ.ОСАТЕ12,6: 
РКІМТ"АКЕА" $ AR 

1250 ІҒС-ФАМОр<11ТНЕМІ.ОСАТЕ12,8: 
FRINT"READY ! " 

1260 р=р-1: IFD= の THENE=1 』 じ =1 』 日 =1 £ 
GOTO 1280 

1270 FORZ=1T ロ 1 の の: NEXT: RETURN 
1280 FDRI=1TD4: IS (I) =RND (1) #5+6: 
NEXT 

1290 COLOR 0:1 0САТЕ12,6:РБІМТ "А 
REA"; AR 

1200 LOCATE13,8:FRINT "READY! "iR 
ETURN 

1400 КЕМ %%% CLEAR !! жж 

1410 LOCATE20,0:COLORQ0:FRINTAR:A 
R=AR+1 

1420 1 ОСАТЕ20,0: СООК: РКІМТАК 
1420 IFA5=&HD35FTHENA5=&HD さ の 
1440 IFAR/W2=4THENW2=W2+1:GOTO 5 
ооо 

1450 GOSUE1 200: GOTO 1245 

1500 КЕМ жжж GAME OVER +++ 

1510 LOCATE11,7:COLOR 1:FRINT"GA 
ME cr RE hoe er 
1520 HS (5) =SC:N$ (5) ="" ェ HN= 

1540 FORI=4TOQ@STEF-1:A=Q 

1550 IFHS (1) 4HS (1+1) THENH=HS (1+1 
JsHS(I+1) =HS (1) 2 HS (19 =H: A=1 

1560 IFA=1THENH$=N$ (1+1) NS (1+1) 
=N$ (І): МФ (I1) =НФ: HN= I 

1570 NEXT: IFHN: THENGBDSUE 1 600 
1580 GOTO 2200 

1600 КЕМ жжж INFUT МАМЕ +++ 

1610 CLS: A=32: T=800: LOCATE12,1:F 
RINT "TIME": 605081900 

1620 LINE (39, 6O+HN#24) – (45, 72+HN 
ж24),1,В 

15520 LOCATE16,1:COLOR 0:РБІМТ Т/ 
10: T=T-1 
1540 LHCATE16。1: COLOR. 1:FRINT T/ 
10 
1550 B=STICK (JS) : IFE= の THEN ド =g 
166 IFE= さ THENEG= 1 
1665 IFE=7THENKS=-1 
16702 LOCATE17,5+2*HN:FRINT МФ (HN 
); COLOR Ø:FRINT CHR$(A) 
1680 A=A+KS: IFA=64THENA=32 
1590 IFA=47THENA=32 
1700 IFA=91THENA=46 
1710 ІҒА-45ТНЕМА-90 
1720 IFA=ZZTHENA=65 
1720 TFA= さ 1THENA=46 
1740 E=STRIG (JS) : IFB= ロ THEN177 の 
1750 N$ (HN) =N$ (HN) +CHR$ (A) : A=32 


ー な の で す .ZN 君 は 60/mkII を 買っ て 2 年 近く に な ろう と し て いる 奴 な の だ が , 
(雑誌 掲載 ) の 数 は 5 つ 程 で , 人 の 苦心 し て 入力 し た プロ グラ ム や ゲー ムツ ソ フト ば っ か り で 遊ぶ の で す 。 自分 で 入力 し よう と し な い の だ ノ 
が ,「 何 故 自 分 で 入力 し な い の か ? 」 と 聞く と ,、「 デ ログ ラム が 長い 」 と 言う し まつ . まっ だ て (3 
欲し い な ど Ë 7: ДҮ» と を 言っ て い >, 


1700 IFSTRIG (JS) =1THEN1 760 
1770 COLOR 1:LOCATE17,5+2#HN: FRI 
NT N$ (HN) +СНКФ (A) 
1780 IFLEN(N$ (HN) ) =10ТНЕМ1810 
1790 IFT=0THEN1810 
1800 GOTO 1630 
1810 FLAY "rr": GOTO 5060 
1900 КЕМ жжж HIGH SCORE +++ 
1910 FORI=ØT04:HG(I)=14-LEN(STR$ 
(HS (1)) ) s NEXT 
1920 (0САТЕ10,2:РКІМТ "SCORE 
АМЕ" 
1920 РКІМТ: РКІМТ" 1ST 
"+N$ (0) 
1935 LUCATEHG (0) ,5:РКІМТ HS (@) 
1940 РКІМТ:РБІМТ" 2ND 
"+N$ (1) 
1945 LOCATEHG(1),7:FRINT HS(1) 
1950 FRINT:PRINT" ZRD 
"+N$ (2) 
1955 LOCATEHG(2) ,9: FRINT HS(2) 
1960 PRINT: PRINT" 4TH Ø 
"МФ (3) 
1965 LOCATEHG(3),11:PRINT Н6(2) 
1970 FRINT:FRINT" STH 0 
"+N$ (4) 
1975 LOCATEHG (4) ‚1: 
RETURN 
2000 REM жжж DEMO 1 +++ 
2010 CLS:POKE*HFD92,2:RESTORE510 
0:ҒОКІ-1704 
2020 READA,B,C,D:LINE(A,B)—ü(C,D) 
е 
2025 READA В: IFA=ØTHENREADA, B: Ра 
ІМТ (A,B) ,2,2: МЕХТ: GOTO 2040 
2050 ГІМЕ (А,В) ,2:GOTO 2025 
2040 LOCATES,3:COLOR 5: РКІМТ "IN 
SECT" 
2050 РОКЕ%НҒр92, 5 
2050 FOKEA1,%H10:POKEA1+1,%HD1: F 
ОКЕА1%2,15:РОКЕА1%2,18:ЕХЕСАЗ 
2070 LOCATEB,11:COLOR 1:РБІМТ "P 
USH CSFACE] ВЕК" 
2080 LOCATE13,13:PRINT "AKINDO": 
A=@ 
2090 А-Ағ1:ІҒА-4000ТНЕМ2200 
2100 IFSTRIG (0) =1THENJS=0: GOTO 
700 
2110 IFSTRIG(1)=1THENJS=1 : GOTO 
700 
2120 GOTO 2090 
2200 КЕМ жжж DEMO 2 +++ 
2210 CLS:LOCATE10,1:FRINT "SCORE 
BEST 5":GDSUB19 の の : = の 
2220 А=А+1: IFA=3Ø0ØTHEN2Ø0Ø 
220 IFSTRIG(Ø)=1THENJS=Ø:GOTO 2 
“әс 
2240 IFSTRIG(1)=1THENJS=1:GOTO 3 
700 
2250 GOTO 2220 
2200 КЕМ жжж MOVE SUB +++ 
2210 IFIS(I)=1THENFX=IX(I):PY=IY 
(I): GOSUBZ80Q 
2520 ІҒІ5(І)>1ТНЕМ605МВ800: 12-2: 
RETURN 
2520 GOSUB2510:IFIJ=1THENRETURN 
2240 A=FEEK(A6(I)):ONAGOSUB24ZQ, 
2440,2450,2450,2470,2480,2490,25 
の の 
2550 A6(I)=A6(I)+1:IX(I)=IX(I)+V 
X*E*IH(I): IY(I)=IY(I)+VY*E 
2360 РХ=ІХ (І) sgFY=IY(1) 』 А=0: БОБОВ 
2400 
2365 IFA=1THENIS (1) =RND(1 ) ж5+6:6 
ETURN 
2270 FOKEA1,F1:POKEA1+1,F2:FOKEA 
1%2,ІХ(І):РОКЕА1%2,ІҮСІ):ЕХЕСАЗ 
2580 IFIS(I)=1THENGOSUEZ8Ø 
2590 RETURN 
2400 IFFX ぶ の ORFX > さ の THENA=1 
2410 IFPYX2HRPY> さ の THENA= 1 
2420 RETURN 
2420 VX= の : ソ Y=ー1 : RETURN 
2440 УХ=1:УҮ=-1: RETURN 
2450 VX=1:VY=0: RETURN 
2460 VX=1:VY=1: RETURN 
2470 VX=Q: УҮ=1: RETURN 
2480 VX=-1:VY=1 : RETURN 
2490 УХ--1:УҮ-0:БЕТМЕМ 
2500 ух--1:Уү--1:КЕТИКМ 
510 РОКЕА1,%Н18:РОКЕА1%1,%Нр2 
OKEA1+2, IX (1) 4 POKEA1+3 уч 
САЗ 
2520 RETURN 
2600 КЕМ жжж INSECT 1 SUR xx 
2610 E=1l:;:IJ=0:Fl=%H28:P2=%HD1:60 
вив2200 
2615 IFIJ 


РКІМТ Н5(49: 


“2ТНЕМКЕТЦКМ 
2620 IFBN<26NDIY(I)<19ANDRND (1) + 
10< 5ТНЕМ<5560 


今 ま で 入力 し な デ ロ グ ラム 


私 


ま の 持ち 腐れ で ある . 現在 彼 は 、 66/mkIISR が 


( 胡 人 N 君 に あき れる アザ ワ 建 人 ) 
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2620 RETURN 

2650 IX (1) =RND( 1 ) * さ の 』 IY (1) 
І)-%Нр260 

2655 IFIX (І) 215ТНЕМІН(СІ) =-1:RETU 
RN 

2660 TH(1)=1: RETURN 

2700 КЕМ жжж INSECT 2 SUB жж 


= A6 ( 


2710 1Ј=1: 605062500 

2715 IFIJ=2THENRETURN 

2720 IX(1)=IX(I)+IH(I)sIY(I)=IY( 
I)+2:F'1=%H40:F 2=%HD1: 605082260 


2750 RETURN 

2740 IX(I)=RND(1)#25+3:IY(I)=2:I 
FIX(I)=XTHENIH(I)=@0@ 

2750 IFIX(I)2>XTHENIH(I)=—1 

2760 IFIX(I)<XTHENIH(I)=1 

2770 RETURN 

2800 КЕМ жжж INSECT 2 SUE +++ 
2810 E=1: IJ=0:F1=%&H58:F2=%HD1 : GO 
5062100 

2815 IFIJ=2THENRETURN 

2820 IFBNS ЗАМОТҮ (І) < 19АМОКМО (1) ж 
10<4ТНЕМ2560 

2850 RETURN 

2840 ІХ (І) =КМр (1) ж350:1Ү(І 
І) =%$HD287 
2845 ІҒІХ (І) 
RN 

2850 IH(I)=1:RETURN 

2900 КЕМ жжж INSECT 4 SUE жж 
2910 E=l: IJ=@:Fl1=%H70@; Р2=%Нр1: 60 
5062100 

2915 IFIJ=2THENRETLIRN 

2920 ІРЕМ: 4ANDIY (1) < 19ANDRND (1) ж 
10“ 4ТНЕМ5560 

2950 RETURN 

2940 IX(I)=RND(1)*%Q: IY (I) 
І) =%HDIDZ 


=2: A6 ( 


+15THENIH(I)=-1sRETU 


шо: A6 ( 


2945 IFIX(I)>15THENIH(I)=-1:RETU 
RN 
2950 ІН(І) =1: RETURN 


2000 КЕМ жжж INSECT 5 SUB +++ 
IJ=1: GOSUEET3AQ 
IFTJmETHENREETURN 

5020 ОМІН (1) GOSUEZ43O , 2440,2450, 
2460,2470,2480,2490,2500 

5020 IX(I)=IX(I)+VX:IY(I)=IY(I)+ 
VY 

5040 IFRND(1)#1Ø>6ANDIY(1i)>»İi 
NIH(I)=RND(1)*8+1 

5050 Fl=%H88:F2=%HD1:GOSURB2SZ6SQ 
2060 ІРЕМ: 4АМОІҮ (1) < 19АМОКМР (1) + 
10% 4ТНЕМ2560 

2070 RETURN 

5080 ІХ (І) =RND(1 ) ж25+5:1Ү(1) =2:1 
H(I)=RND(1)*3+4 

2090 RETURN 

2100 КЕМ XXX INSECT 6 SUE +++ 
2110 Ес2; lJ=@0:F1=%&Hñ0Q:; F 2=%HD1: GO 
SUEZ 3A0 

5115 IFIJ=2THENRETURN 

5120 IFENS 4ANDIY (І) < 19ANDRND (1) ж 
10<5ЭТНЕМ2560 


2ТНЕ 


5120 RETURN 

5140 ІХ (І) =КМр (1) #3O: IY (1) =2: 66 ( 
І) =%НОЗҒЕ 

5145 IFIX (І) >1ЗТНЕМІН(І) = テー1 』 КЕТО 
RN 


2150 IH(1I)=1:RETURN 
5200 КЕМ *** INSECT 7 SUE ##* 
5210 Е=1:1Ј=0: Р1-%НБӨ: F2=%HD1 : GO 
SUB2300 
5215 IFIJ=2THENRETURN 
3220 1ТЕВМ<5АМОТҮ‹1)<19АМОКМРО (1) + 
10% 6ТНЕМ2560 
Зер RETURN 

240 IX(I)=RND(1)*ZQ@; ТҮССІЗ -2  А6( 
I) =&HD41A 
345 IFIX(I)>“1STHENIH(I)=—1:RETU 
ІН (І) =1: RETURN 
2200 КЕМ жжж INSECT 8 SUB жжж 
1Ј=1: 605082700 
2215 IFIJ=2THENRETURN 
ІХ (І) =1ІХ (І) +ІН(І) ТҮСІ» =1Ү‹ 


: ІЕІҮ (І) =100КІҮ (1) 
СЕЗ280 
2520 Fl1=%HDQ0@:F2:=:SHD1:GOSUR2Z2ZSQ 
2260 ІЕВМеЗ SANDIY (1) < 19ANDRND (1) * 
10<ӨТНЕМ2560 

2270 RETURN 


=22THENGOS 


2580 ІҒІХ (І) =ХТНЕМІН (І) =0 
2290 ІРІХ (І) >ХТНЕМІН(1) «-1 
5400 IFIX(I)<XTHENIH(I)=1 


5410 RETURN 

2500 КЕМ жжж INSECT 9 SUB +++ 
5510 E=1:IJ=Q0:F1=%HE8:F 2=%HD1:06G0 
5062100 

2515 IFIJ=2THENRETURN 


2520 ІРҒЕМ:5АМрІҮ (І) < 
10<«ТНЕМ2560 

55220 RETURN 

5540 ІХ(Із-КМр(1)ж20: ІУ(І»-2: А6( 
І) =#нр441 

3545 ІҒІХ (І) 15THENTH(T ) =-1: КЕТО 
ЕМ 

35550 IH(I)=1:RETURN 

5260 А=1: ҒОК2=1Т010: IFEM (Z) =1 AND 
A= 1 THENEM (2) =0: А=0: E=7Z 

5565 NEXT:BX(E)=IX(I):BY(E)=IY(I 
) +2: EN=EN+1: IFIX (І) =XTHENBH (Е) =@ 
5570 IFIX (1) *XTHENBH (Е) =ー1 

5580 IFIX(I) < ХТНЕМЕН (E) =1 

5590 RETURN 

2600 КЕМ жжж INSECT 10 SUE жж 
610 E=2:; IJ=0:F1=%š$H@00:; P'2=%HD2: GO 
SUB2300 

56185 IFIJ=2THENRETURN 

2620 IFENEGSRNDTY(T) < 19АМОКМр (1) ж 
10<7ТНЕМ2560 

5650 RETURN 

5640 IX(I)=RND(1)*ZQ@;IY(I)=2: A6 ( 
1) = を HD471 
5645 IFIX(I) > 
RN 

5650 ІН(І) =1: RETURN 

5700 КЕМ tt MUSIC +++ 

5710 FLAY "оЗааааво. әба2сісіссе1"," 
oseeeef2f2?o4bbabosc1" 

3720 CLS: COLOR 1:LOCATE4,7:FRINT 
"IST BONUS FOR 20000 FTS." 


19ANDRND (1) ж 


1ЎТНЕМІН (І) =-1: КЕТО 


2730 (ОСАТЕ4,9:РКІМТ "2ND BONUS 
FOR 40000 FTS." 
3740 LOCATE4,11:FRINT "AND FOR E 


VERY 40000 FTS." 
3750 605065020: 60Т0 80 

5800 REM 

3B1 FOKEA2,%2H42:FOKEA2+1 , HDT: F 
OKEA2+2 , SX: POKEA2+3,SY:EXECA4 
3820 IFXSX-2ANDX<SX+1ANDSY< Y+2A 
NDSY >Y—1THENGOSUBZƏ40 

5820 RETURN 

2840 SF=0: GUSUB66@: RETURN 

4200 КЕМ жжж КОСК SUB +++ 

4310 IFRX>X-2ANDRX:X+2ANDRY 26AN 
DRY“ ZØANDSS=ØTHENGOSUES70 

4515 IFRX >MX-2ANDRXSMX+2ANDRY +MY 
—-2ANDRYZMY+2ANDMI=@THENGOSUE4Z8Q 
45220 РОКЕА1‚,®%Н18:РОКЕА1+1,&НО2:Е 
ОКЕА1%2,КХ:РОКЕА1%2,КҮ:ЕХЕСАС 
4220 RY=RY+2: IFRY>3ØTHENRO=1:RET 
URN 

4340 РОКЕА1 , „H9O: FOEEA1 +1 , HDZ: P 
OEEA1+2, RX: FOEEA1+3, RY: EXECAS 
4250 ІЕКХ>Х-ФАМОКХ< X+2ANDRY *26AN 
DRY< ZØANDSS=ØTHENGOSURS7Ø 

4260 IFRX>MX-2ANDRX:MX+2ANDRY +MY 
ー2ANDRYS MY+2ANDMT = の THENBDSUB4 さ Bg 
4270 RETURN 

4580 МІ=1:РОКЕА2, 
HD2: FOEEAZ+3 , MY 
4290 FORI=@TO1:POEEA2+2,MX+I:EXE 
CA4:NEXT:FLAY "оВаз2" 

4400 IFRS=1@ANDSF=@THENGOSUB442@ 
4410 RETURN 

4420 SY=RND (1) #12+19: SX=RND (1) #3 
1: SFP= 1: RETURN 

4450 RO=Q: RY=2: RS=RS+1 4 RX=RND (1) 
*Z1: RETURN 

4500 КЕМ *xx INSECT 11 SUE *xx 
4510 E=2;IJ=0@:Fl=%&HA8:F2=%HD2:60 
SUB2 さ の 0 

4515 TFTJ=2THENRETURN 

4520 1ЕВМ<7АМОТҮ (1) 4 19ANDRND (1 ) ж 
10<7ТНЕМ5500 

4520 RETURN 

4540 IX(I)=RND(1)*%Z@:IVY(I)=2:A6( 
1)-%Нр494 
4545 IFIX(I) 


Но: РОКЕА2+1, & 


>15ТНЕМІН(І) テー1 』 RETU 


ІН (І) =1: RETURN 


4600 КЕМ жжж INSECT 12 SLE жж 


4610 17Ј=1: 605062700 

4615 IFIJ=2THENRETURN 

4620 IX(I)=IX(I)+IH(I):IY(I)=IY( 
I) +2:F'1=%#HC0: P2=%HD2:G0OSUB2Z60 


4620 IFIY(I)< 19ANDIVY (І) >12ANDRND 
(1) +10 АМЮЕМ: ВТНЕМ4690 
4640 RETURN 

4650 IX(I)=RND(1)#25+3:; 
РІХ (І) =ХТНЕМІН (1) =0 
4660 ІҒІХ (І) УХТНЕМІН (1) =ー1 

4670 ІҒІХ (І) < ХТНЕМІН (І) =1 

4680 RETURN 

4690 A=0:FORZ=1T010: IFEM (2) =1AND 
А: ЗТНЕМЕМ (2 )-=0: А=А+1:Ғ (A) =2 

4692 МЕХТ 

46953 FORZ=1TOZ:BX(F(Z))=IX(I):BY 
(F(Z))=IY(I)+2:BH(F(Z))=(Z—2):NE 


ІҮ(І) =2:1 


リス ト 2 INSECT AREA メイ ン 


XT 
4695 EN=BN+Z: RETURN 


4700 КЕМ w** BONUS AREA ++ 

4710 A=STICE (JS) 

4720 ONAGOTO4730, 4792,4740,4790, 
4750,4790,4760: GOTO 4790 

4730 VX=0:VY=-1:GOTO 4770 

4740 VX=1:VY=0: GOTO 4770 

4750 VX=Ø:VY=1:GOTO 4770 

4760 Ух--1:УҮ-0 

4770 РОКЕА1,%Н18:РОКЕА1%1,%Нр2:Р 
OEEA1+2, X: FOEEA1+3 , Y: EXECAZ 

4775 IFX+VX >ー1ANDX+VX< 31 THENX =X + 
VX 

4780 ITFY+VY:1ANDY+VYE ミ 1THENY=Y+V 
Y 

4790 POKEA1,%H10:FOKEEA1+1,%HD1: Р 
ОКЕА1+2,Х: FOEEA1+3 ,Y: EXECAZ 

4800 LOCATE1 1 , 4: COLOR 1:FRINT "B 
ONUS "+А% (0) +A$ (1) +АФ (2) + "О" 
4805 IFD>Q@THENQNAGOTO 4970, 4980 
4810 LOCATE16,2:COLOR の :FRINT Т: 
T=T-1:COLOR 1 

4820 LOCATE12,2:PRINT "ТІМЕ";Т 
4820 ІҒТ-ФТНЕМ4940 

4840 ҒОБІ-0Т09:ІҒТА(1) =OTHEN4870 
4850 FOKEA1,%HDB8:FOEEA1+1 ,%HD2: F 
OKEA1+2,TX(I):POKEA1+3,TY(I):EXE 
CAZ 

4860 IFTX(I)>X-2ANDTX(I)<£X+2ANDT 
Ү(19>Ү-?АМОТҮ(1)<Ү%2ТНЕМАВВО 
4870 NEXT:GOTO 4700 

4880 TA(I)=Ø 

4885 РОКЕА1, НІВ: РОКЕА1+1 „Нр: Р 
ОКЕА1+2,ТХ (1) :РОКЕА1+5 ,TY (I) :ЕХЕ 
саз 

4890 GOTO 4930 

4900 TI=TI+1:COLOR1:LOCATETX (1), 
ТҮ(І) /2:РКІМТ I 

4910 IFTI=ZTHENPLAY"rrrr":GOSUES 
060: A=2: GOTO 4950 

4920 БОТО 4870 

4920 і ОСАТЕ17+ТІ, 4: СООКО: РКІМТ" 
э":АФ (ТІ) =СНКФ (1+48) 

4925 IFI=@THENGOSUE6&&Q 

4937 GOTO 4900 

4940 LOCATE11 , 7: COLOR1:FRINT"TIM 
E OVER": PLAY"rFrrr" : 608065050: A= 1 
4945 GOTO 4940 

4950 FO=VAL (АФ (0) +А% (1) +АФ ( 
овивоао 

4950 р-26:60Т0 4750 

4970 LOCATE12,9:FRINT"NO BONUS" 
4980 D=D-1:1IFD:@THEN475Q 

4990 COLDRQ:LOCATE12,2:FPRINT "TI 
ME"; T:LOCATE11,4 


2)):65 


4992 РКІМТ "BONUS "+A% (0) +A% (1) + 
АФ (2) "а" 
4993 ҒОНІ-0Т09 


4994 FOEEA1, 4H18: РОКЕА1 +1, Нр: Е 
ОКЕА1+2,ТХ (І) : РОКЕА1+3,ТҮ(І) : ЕХЕ 
саз 

4995 МЕХТ:Н-0 0: D=50 

4997 (ОСАТЕ11,7:РКІМТ"ТІМЕ OVER" 
:ЦОСАТЕ 12,9: РКІМТ "МО BONLIS"; GOTO 
1240 

5000 ІРМІ-ОТНЕМРОКЕА1,%Н1В8:РОКЕА 
1+1, &HD2: POEKEA1+2, MX: FOEEA1 +3 , MY 
:ЕХЕСАЗ 

5005 МІ=1 

5010 LOCATE11,7:COLOR1: FRINT "EON 
US AREA" FLAY "rrr "s GOSUES@6Q 
5020 LOCATE11,7:COLORØ:FRINT"BON 
US AREA" 

5020 T=20@Q@:FORI=@TO2:A*$(I)="?", N 
EXT: D=øØ:TI=Ø 

5040 FORI=@TO9:TA(I)=1:TX(I)=RND 
(1) ж29+1:ТҮ(І) = (КМО (1)*14+1)*2; N 
ЕХТ 

5050 GOTO 4700 

5060 ІҒРЕЕЕ (НЕЮр1Е) <> 
5070 RETURN 

5100 КЕМ жжж LINE DATA +++ 

5110 DATA 66,26,46,79,58,79,60,7 
2,75,72,77,79,89,79,69,56,66,356 
5115 DATA 0,0,70,60 

5120 DATA 96,48,96, 79,106,795, 102 
,72,115,72,115,79,125,79,120,71, 
125,66 

5125 DATA 125,52,120,48,96,48,0, 
0,110,060 

5150 DATA 122,48,152,79,157,79,1 
57,725,150,73,150,67,155,67,155,6 
a 

5155 DATA 150,60,150,54,157,54,1 
57,48,152,48,0,0,140,60 

5140 DATA 186,26,166,79,178,79,1 
80,72,195,72,197,79,209,79,189,23 
© 


ОТНЕМ5060 


5145 БАТА 186,26,0,0,190,50 


ソー ス ・ リ スト 


87 


РС-ВООТтКП 


Nas0-BASIC 十 マシン 語 


8 8 が な ん だ ノ 7 が な ん だ ノ どう せ 
mkII は 320 X200 の 4 色 だ ./ СЬ, グラ フ 
ィ ッ ク 画 面 を 消す 速 さ は 88 に 負け ん ぞ . メ / 
それ に , 7 みた い に キ ー 入 力 の こと で 悩ん 
だ り し な い ぞ / ノ 

な ど と 思っ て 其 局 の 元祖 〇 " ッ 〇 リ 〇 メ 
〇 を 見 て いた ら , スロ ッ ト マ シン が 出 て き 
た で は な いか . その 瞬間 , ぼく は mk II で 
スロ ッ ト マ シン が で きる よう に も し よう も を 決 
4 も て いた 。 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


Na0-BASIC 
マシ ン 語 D900 一 DC4F 


絵 の 変わ り 方 が あま り に 速い の で 編 
集 部 で は , USR 命 令 の 後に ウエ イト ・ 
ルー チン を 入れ て 遊ん で み ま し た . 

本 当 は 絵 が スク ロー ル す る と いい の 
で す が …. (O) 


СЗС сои, кыраш 
た いし た フロー チャ ー ト も 書 ヵ ず に 作り 
まし だ の で 。, む ちゃ くち ゃ と 言っ て いい ほど 
Те әл СТ, AA РУЕВАЗКОСО-ТТ 
シン 語 は キャ ラク タ を 描く こと だ け や っ て い 
£ T. マシ ン 語 の マッ プ グ を 購 い て おおい だ の 
С, キャ ラク タ の 気に入ら な い 人 は 直し て 
くだ るい (16X16 ド ッ ト で す )、. 

まだ, 行 番 けり マ ッ プ も 較 せ て お きま し た 
が , 770 行 一 780 行 まで の デー タ は 機械 を 描 
く 〈 く とき の デー タ で 。 790 行 一 810 行 まで の 3 


行 の デー タ は 。 行 の 短い 方 か ら 諾 。 ШАА, 


生 の キャ ラク タ の 出る 順番 で す 。 そし て 最 
後 の 820 行 >~830 行 まで の デー タタ は , いろ い 
ろ そ を そろ えた だ と き 。, ЖҰРЫП? ЬЕ Э 


100 7 HHH HH FF ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ -Е ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЗЕ 

29 7# SLOT MACHINE * 

ЗӨ "ж (&HD900—-—%HDC4F) ж 

до "ж by キヤ ワウ ウジ イー チッ + 

50 "+* 1985Ж 1 月 6 日 ж 

ORE E EEEE EEEE EEEE EEE EE EE 

70 CLEARZOĞ ,%HD8FF : DEFUSR=&HDCGO9 

89 CMD 5СКЕЕМ2,0,6:СМр CLSZ:DEFINTA-Z 


190 GOSUB620:CDLOR7 
119 ВІМ8І(11),52%11),65<11),85(15,:5) 


пей 6. А 


90 CONSOLE, 25,6, 1: WIDTH89, 25: КЕЅТОКЕ77@ 


プリ ンタ が ぶっ 壊れ た . ノ / と ゆー わけ で , 


ウー ン . 形 は 同じ な ん だ けど ナー 


だ と えば “PiO" が 3 つ そ を そろっ た 


デー タタ で. 
き に 掛け 金 を 3 倍 に し だ か っ だ ら , 6, 
6、 6, ТЕМ АДЫ Ра ああ 
それ ぞ れ 自由 に 変え て も ら っ て 結構 で す 
が 。 デー タ の 数 を 変え る と 他 に 上 直す 所 が だ 
くる ん 出 て くる の で , 数 は 変え な い ほ う が 
いい と 思い ます よ 。. 


ЖЕ 0179 


ФОВО sozu 

プロ グラ ム の 中 で 説明 し て いる の で 。 省 
きま す . СУ, 掛け 金 を 入力 する と き は 
500 円 以内 で , 1001 4/7, 23), 
100111220011, 30011, 40011, 50011025 
ちの どれ か で す .。 


| 


オォ オシ イノ あと 1 つ PiO が くれ ば -… 


ЈАЛ スロ ッ ト マ シン BASIC リ スト 


120 RESTURE 799』FHRT= の TO1 1』RERDS1(T) : МЕХТ 
zFORI=@TO11:READS2(I):NEXT:FORI=@TO11:RE 
АП525(1):МЕХТ:біт7180:52-109508:52-125В0:А 
D=%HF 2FF 

130 RESTORES2Z0: FORI=OTO1 3:FORII=0TO03: REA 
DSS(I, II) :МЕХТІІ,І 

140 PRINT "セリ メイ シマ マカ " 


150 ІМФ-ІМКЕУ%:ІҒІМФ-""ТНЕМ150 

160 IFIN$="y"ORIN$="Y"THEN1 79ELSE33O 

179 CMD Сі 55: МІртТН40,20:1 ОСАТЕ10,0:РКІМТ 
"SLOT MACHINE" 


221214 


この ゲー ム は キャ ラク タ が 多い の で ,。 な 
か な が そろえ られ な 《。 上 難 じ いと 思い ます 


(15 < 15, まだ 2.,000 円 以上 に 持ち 金 が な っ 


だ ここ と が あり ひま せん } け 本 者 は この ゲー ババ 
を 作る とき に ,。 機械 を セリ アル に 描く と か , 


ы н в 
Т ぼく ぐに は まつ た で どき きつ で いい は ほど 


終 の 才能 が な い の で や め ま し だ た だ. 


PiOS5 年 1 月 号 の スネ ー ク ・ ワ ー ル ド 
を 発表 る れ た だ イリ 上 達也 氏 の 書い た と お 0, 
ê айн ме о Сф Эа +. ОС 

も と どん どん 投稿 し まし ょ 


m Jo т.к» ту 


“りん ご " の キャ ラク タ ・ 
“みか ん "の キャ ラク タ ・ 
"хп" の キャ ラク タ ・ 


"爆弾 "の キャ ラク タ ・ 

4/0" の キャ ラク クタ: デー タ 
PIO の キャ ラオ タダ + ポー タ 

が ホー ム ・ ペ ベ ペース" の キャ ラク タ ・ デ ー タ 
ЖА ОФ? 9 
“ЕН” の キャ ラク タ ・ デ ー タ 
っ の キャ ラダ タタ ュ デー タ 
“Ж. Фа 
キャ ラク タ を 描く 


初期 設定 

ゲー ム の 説明 

メイ ン 

ゲー ム ・ オ ー バ ー の 処理 
各 サ プ ブ プルー チン 
各 デ ー タ 


180 RESTORE840:FORI=2T011:READA$:LOCATEĞ 
.ІІРКІМТ А%$: МЕХТ 

199 1 ОСАТЕВ, 18:РКІМТ "Hit return key" 
200 IFINEEY$< >CHR$ (13) ТНЕМ2ӘФ 

219 CMD CLS:WIDTH, 25:1 ОСАТЕФ, @: РКІМТ "k7 


с эе) ЙА. эд カケ キー 


220 FORDI =L TOTS FOR 6042 :FOFE%SHF2FF, SS (І 
I,1):ON 1+1 GOSUB 500,2 
.256+II%*24):NEXTI: ( ОСАТЕ22,11+1 sFRINT SS< 
53 :NEXTII 

250 (.ОСАТЕВ,24:РБКІМТ "Hit return key": : I 


320: AA=USR (HX* 


うち の 1500 君 は いま 修理 に 出さ れ て いま すす (本体 も も っ て か れ た ). これ が 載る ころ に は 直っ て いる 
P.S. 看 休 み は 皆 さん 何 し て まし だ ただ? 僕 は バイ ト し た か っ た ん だ けど クラ ブ で 結局 で き МАРАЛ た 
次 タス は つる な で 
けど 。 だ れ か 教え て くだ る さい. 


クラ ブ の バカ / シー 


Р.5.2 1500 の ニモ ニッ ク に LDX メ と か ST メメ て の が ある で し ょ . これ の 働き が わか ら な いん だ 


(lsland Field is good summer) 


419, 


FINEEY$4 >CHR$ (15) THEN2ZƏ 

240 CMD CLS2:FORII=8B8TO1Z:FORI=OTO2:FDKEs 
HF2FF,SS(II,I):ONI+1 GOSUB 200,510,229:А 
A=USR (HX*2S56+(II-7)*24):NEXTI:LOCATE22, ( 
II—-7)*Z:PRINT SS(II,Z):NEXTII 
250 (0ОСАТЕ25,21:РКІМТ " " 

260 1.0САТЕВ,24:РБІМТ "447° zh 
=TNEEY$ 

279 ІБАФ-"у"ОКАФ-"Ү"ТНЕМСМр CLSZ:RESTORE 
. 779: 60506620: MIDTHB@。 25: GOTO 220 

280 IFA$="n" ORA$="N"THEN170 

299 GOTO 260 

300 HX=2: RETURN 

310 HX=14:RETURN 

320 HX=26: RETURN | 

550 M1=@:M2=@:MZ=@:MKE= 

540 CO=@:MM=0: CMD “Ы BODSUE フ 69 

550 LOCATEO, 3: TNFUT "カケ キン リョ ドド 

580 IFRIGBHT ま (STR ま (ER) „ 2) < * "40" THENFRINT 
"100 エン タンゴ テス "BEEF: GOTO ミコ 49ELSEE ド = ドド / 
100 

570 IFEK? 
ЕМРКІМТ "500 гу 77“ 
580 МК=МК-КК:бО5бИВ 760 

590 COLOR1:LOCATEZ6, 12: FRINT "PUSH f.1" 
400 CMD 1.ІМЕ(270,0)-(299,29),9,.ЕҒ:СМО LI 
NE (280, 40) — (289, 89) ,@, BF: CMD LINE (270, 65 
)-(299,105) ,3, BF 

419 ІЕММ=ФТНЕМРОКЕАР, 51 (M1) 
1=М1+1: IFM1 >11THENM1 = の 

429 ІЕММ<>?ТНЕМРОКЕАр, 52 (M2) : AA=USR (52) : 
М2-М2%1:1ІЕМ2>11ТНЕММ?2-Ф 

450 FOKEAD, S3 (M3) : AA=USR (S3) : M3=M3+1 : IFM 

*1 1 THENM マ = の 

440 BEEP1:BEEFO:CO=CO+1: TFCO=1THENCMD LI 
NE (279, 65) - (299, 105) , ©, ВЕ: RESTORE780: GOS 
UB62@ 

452 ОМ MM+1 GOTO 679。 
469 GOTO 410 

472 FORI=@TO13: IFSS(I, 
‘SENEXT: GOTO 500 

480 IFSS (I, 1) =52 (М2) ТНЕМА9ФЕІ ЅЕМЕХТ : GOTO 


(Y/N) "SA 


METHENBEEF : GOTO 349ELSETFEE STH 
F 2": BEEP: GOTO 540 


:АА=05К (S1) :M 


700,730 


9) =51 (М1) THEN4B9EL 


Ааа жа +] +2 +3 +4 +5 +& +7 +8 
рооо оо оо вә бо ТА ФА AÖ AB 26 
р910 АВ ER AA АА BF FE АА АБ 
П920 СӘ ЗЕ FE АВ FO ҒҒ ЕА 2А 
09:6 АА АА 80 00 99 9A до ос 
0940 оо өс во оо ра ØA ño АВ 26 
р995@ АЕ ЕА АА АА EF FE AA AB 
096@ ЕС ӨЗ FE АВ ҒҒ ОҒ EA 2А 
D97 АА АА во оо AG 66 の 9 оо 
0989 00 өр во OO 2А OA АО AB 26 
р990 RE Eñ АА 
DAG FO OF FE АВ ҒӘ OF EA: 28 BC 
р9Ео әс да AA во оо 99 SA оо бф 
D の CO ёб OL во бө 2А OA AÖ АВ 26 
рор АЕ EA АА AA EC 
D?9EQ@ BF ЕС ЗЕ FE АВ FF ҒҒ EA 2А 
D9Fo 02 AA АА во оо 99 FA оо 00 
о4 EG AĞ 


Sum ЕС 70 68 ЕФ EC 


+4 +5 +6 キア +8 
SF р4 90:11 FF 7D 09 OF 
ЖЕ ЖР БЕРЫ yD: 1 RO: EE 
CS ҒҒ СӨ ӨР リア FF 60 @3 
EF ЕВ CO ӨЗ ЭС Fi бө од 
17 ЕС 10 G0 7D FF 44 ӨЗ 
FD FD FC SB F4 74 7Ғ 3E 
PEGS FE 
ЕЕ FE FO 
Право GF Fe 40 
DAŞO SF- ҒҒ FF FC 
DAAG OF 5С うじ Fo 90 БЕ FE 00 ӨЗ 
Браво ¢ SÜ 55 FO OS SP Fz GO 00 
DACO OF Fo 40 094 7F FD 19 ос 
DADO ZF 47 рі ЕС ЕР DF F7 FF FF 


昆虫 採集 


PiO4 月 号 の こめ ん な さ 


PIESA p.97 


Ааа 
DAE 
DALIG ЗЕ 
DAZE 
DATO 
DA4G 
DASS 2 
Право 

Dñ 79 


+1 +2 + る 


әд CF IC СӨ өө 
94 7F Ер 10 ӨЗ 
ЕЕ DF F7 FF FF 


“гар a 
Pe 4 ي‎ 


DF B7 


SS ら に : る る 


本 文中 お よび BASIC リ スト 中 に 間違い が 


жо 443. 

まず ,p.97 遊 び 方 の 項 で , コマ の 位置 は , 
“ө” の カー ソル … と な っ て いま す が , カ 
ー ソ ン ソル は $87 の キャ ラク タ が 正しく 。 $950 
キャ ラク タ で は あり ませ ん . 

まだ た だ, リス ト 2 の 160 行 の 最後 に あ 2 P- 


+9 +A +E +C +D +E +F 
AA AA 98 
ҒӘ FF EA BF СО : 
EF FE А8 GR AB ЕА ño :0E 
EA АБ оо ӨЗ š 

AA AA 98 
FF OF :EA ВЕ FC ӨЗ FE f! 
BF FE АВ ОА AB EA Аб :2 
EA АЕ оо ӘЗ FO OF Ce 
AA АА 98 
АА EF FE АА АВ FF FF Eñ БЕ ЕС 
ЗЕ АВ GR АВ EA ño :5B 
EA АВ оо өз 
AA AA 98 
ЗЕ АА АВ Fö OF EA БЕ ҒО OF FE :87 
ВЕ FE АВ Фа АВ EA АФ 
ЕА АВ оо өз 


27 Ав А8 DB ЕС ІС 18 


+9 +A +E +C +D +E +F Sum 
FË FP СӨ 
7F 7F BC ЕР FF FF FO :С4 
FF ғо оо оо CF 5С бб AS 
СЕ СС оо оо 
FF EF F@ OF FF ЕВ ЕС :С9 
FD FD FF @F FF FF FF :99 
99 FF D7 ғо ӨӨ ФЕ РЕ СО 00 
оо оо ØC СС ос 
СӨ OF FE FF ҒӘ 
47 РЇ РЕ 
ЕЗ СЕ ECO ӨЗ SF EC СО 
әд OO 3F ЕС ӨӨ :F5 
FF ВЕ CO OF DE F7 ҒӘ 
FF ЕЕ ҒҒ 


соо 
490 IFSS(I, 2) =53 (M3) ТНЕММЕ=МЕ+ККж95 (І, 3) 
:НФ=5ТКФ (95 (І, 2) ) : 60508618: БОТО Z4OELSEN 
EXT: БОТО 500 
909 ІЕ51 (M1) =52 (M2) THENSSOELSES 1 4 
510 ІР52 (М2) =95 (М) ТНЕММК=МК+ЕК#2:Н%=" 
"gs GHSUE619』 GOTO 240Е1 5Е5290 
520 ITFS1(M1 ) -52(М2) ТНЕММЕ 
":GOSUR616:GOTO 240Е( 5Е54% 
55Ө IFS2(M2)=SZ (М5) ТНЕММЕ- 
": 560506219: БОТО E409ELSEME 
": BOBSUB619』 GOTO 240 
549 ІЕМЕ< >ӘТНЕМ254Ә 
5509 CMD CLSZ:WIDTH40, 20: FRINT 
"sFRINT :FRINT sFRINT :РБІМТ 
(YAN " 
560 ІМФ-ІМКЕҮ%Ф:ІҒІМФ-""ТНЕМ56О 
570 ІРІМФ= "Ү"ОКІМФ= "у" ТНЕМКЕЅТОКЕ?779: GOS 
UB6é2Ə:WIDTH809, 25: GOTO 520 
280 ІРІМФ= "М"ОКІМФ= "п" THENEND 
590 GOTO 570 
6090 END 
619 РКІМТ :FRINT :PRINT :РБІМТ "カカ キシ <" 
H$: BEEF: FORI I=0T01000: NEXT: RETURN 
424 READX. Y. ХХ, YY. C. B$: IFC=-1THENRETURN 
620 ІЕВФ-"В"ТНЕМСМО LINE (Х,У) – (KX, YY), C. 
Е 
442 
a BF 
650 CMD LINE(X,Y) )-(XX;YY),C 
669 GOTO 620 
679 IFINF (9) «25ЭТНЕМММ>1:1.0САТЕ26,12:С0І. 
OR3kFRTINT "FUSH + - 2" : 6050889: БОТО 469EL 
GE469 
680 IFM1=9THENM1 =11ELSEM1=M1-1 
690 RETURN 
700 IFINF(9)=251THENMM=2:LOCATEZ4, 12: COL 
OR2:FRINT "FUSH f۰3": COLOR7: 50508719: GOT 
О 469ELSE46@9 
719 IFM2=@THENM2=11ELSEM2=M2-1 
720 RETURN 
730 IFINF (9) =247THENGOSUE740: GOTO 479ELS 


| リリ スト の スロ ッ ト マ シン 


=ME+EFEE 2: НФ= " 


ME+EF 32: H$= " 
=МК+ЕК#+#2:Н%=" 


"GAME OVER 
"Try again? 


ТЕВ%="ВЕ"ТНЕМСМО LINE(X.Y)—-(XX,YY),C 


SLUT 
2А АА AA АВ 
SF FE 


FO r. БӨ 
2A АА AA AB :3 


s 59 
:26 
ЗЕ FE :85 


та аа аа АӨ 


Fo OF СО 
2А ға AA АӨ 


s 69 
さら 


:59 
Fo OF CO :60 


s BF 


DBD@ 
DEEG 


SFE CFE FOr FOA DEF © 


55 ШО ӨӨ :Б9 


さじ ЕЗ 99 84 
: А9 


ғыс 
š < 


ЗЕ DD 77 FC :B2 
: B7 


:24 


SF .FD 7F FÜ БА 


RINT“, lk, $7C の キャ ラク タ (右向き 矢 
ЕП): OSE 

同じ く リ スト 2 の 1680 行 最後 は , 
($8C と $8SE の キャ ラク タ ) で は な く , 
($8D と $8F の キャ ラク タ ) CF. 


Se 
I 


Pi05 月 号 の ご めん な さい 


FIRE CRACKER p.63 
BASIC リ スト 中 に バグ が あり まし だ . 
IJ R F 1600 行 の 


ІЛ АКА スロ ッ ト マ シン BASIC リ スト 


E469 
740 IFM さ =9THENM エ =1 1ELSEM さ =M マ ー1 
750 RETURN 
760 _ОСАТЕФ, 9: РКІМТ USING 
; МК: RETURN 

779 DATA 100,0,239,199,2,BF,110, 140,229 
189,0,ВҒ,119,189,129,179, 1,,229,189,219, 
179,1,,219,179,129,179,1.,219,179.219,14 
9,1,.120,179,120,160,1,,1109,109,129,29,0, 
ВЕ,229,10,210,29,0,БҒ,1062,10,181,29,0,БҒ 
.210,50,220,100,0,.ВҒ 

780 рата 249,80,279,89,1,ВҒ,280,40,289,8 
9,1,ВҒ,270,0,299,59,2,ВБҒ,-1,-1,-1,-1,-і, 
-1 

790 БАТА 0,1,2,5,4,5,0,7,8,9,19,11 

вод DATA 6,2,11,9,7,8,1,5,109,0,2,4 

819 БАТА 11,10,9,8,7,6,5,4,2,2,1,0 

820 DATA 5,6,5,6, 6,5,6,5, 5,5,6,4, 6 
Тов “6,44 ы а 

зө БАТА 8,11,9,4, 9,11,8,4, 5,5,5,7, 6 
6,6,7, 4,19,11,4,8,8,9,4, %9,9,8,4 
846 DATA" 1 カケ キン N 1 の の エー AF" カケ マズ " 
850 DATA" 2 カケ キー ñ イチ ト " ニニ 5одіу 297 カケ ラレコ 
А” 
860 рата" : 
"уз" 
870 DATA" 
880 DATA" 
8970 рата" 
оде рата" 
トイ 24-1 
919 рата" 
4 Fa" 
920 DATA" 9 и", モチ キン с 2°5Zz サレ コス" 

зө ПАТА"10 77 YF" ) ヨウ ナ YOINI Ж アリ 72" 


"EFF #####00" 


カケ キン Э イレ ルト スス ロット マシ ンー Л“ OF 
アァ フフ ラジ ション キー / AW 7 1093" 
ファ ンション キー / QA U ラ オシ マス " 
ファ ンク ショ ン キ ー / 3\0 Э オシ マズ " 
テー テイ 見 І 0 U. ミ フ ナオ ナシ” ナラ 力 ケ キン ンタ) 


F” AW I N 293475" FI PITIN 


マシ ン 語 リス ト üg 


IF R=R2 
IF R>R2 
に 直し て くだ 多め 。 
FLY プ デビ Y プ p.160 
原稿 中 の 入力 前 の 変更 点 に お な いて, 一 部 
間違い が あり まし ただ. 変更 は 次 の 手順 で 行 
Аче бе ӨШ ға ЧЁ 
ФӨ101:2А- &2037 > A = &F837 
@15 行 の …&2005 &Е805 
930 行 を FOR L=-45 ТО 0 STEP 
15 : I=L+A 
@551т 2 CALL4576 : 
5: GOTO 20 


МЕХТІ,:Н-Н- 


に) 今月 の PiO な ゲー ム 


マシ ン 語 (N-BASIC モ ー ド ) 


BACIERIA 


bI8SINFECTOR 


oPC-8000 シ ジ シリーズ 


LAND 


FRIA 


バク テリ ア ・ ラ ンド 


園 復 活 の PC 


1985 年 月 日 の 夜 , 東京 に 1 WORA 
DMR FL, 人 々 に 甚大 な 被害 を も た らし た . 
し か し , 本 当 の 恐怖 は その 後に 始ま っ た の 
だ っ た . 防 石 の 中 で 眠っ て いた 宇宙 バク テ 


リア が 蘇り , МӘЖ 707-07. この 
バク テリ ア に は 火 も 水 も 効か ず , 養分 を 吸 
収 し て は 分 裂 ・ 変 態 し て 限り な 〈 く 増え て ゆ 
зе, 

そこ で , 我々 は 対 バ ク テ リ ア 毒 入り まん 
じゅ う 「 ズ ライ コネ 」 を 開発 し , バク テリ 
ア 退 治 に 乗り 出し た の だ っ た . 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


マシ ン 語 9000--А143 
スタ ー ト 9СІ6 


スピ ー ド も 早く 〈, 動き も な か な か ス 
ムー ズ に 出来 て まず ね 、 ゲ ー ム と し 
て は , あと バク テリ ア の いる 方 向 を 
示す レー ダー な ど を 付け て みて も 。, 
面白 いか も し れ ま せん ね . (O) 


w 


モニ タ ・ モ ー ド で ., マシ ン 語 の 9000Hー 
A143H を 入力 し て カセ モッ ト に セー ググ し だ た だ 


後 、 @9C16| RETURN | し する と プロ グラ 


ム が 走り ます . 


この ゲー ム は 迷路 の 中 に いる バク テリ アデ 
е, ЛОЛА СЮ Э 154 алу СЕ 
治す る と いう スク ロー ル ・ ゲ ー ム で す . 

バク テリ ア は ズラ イコ ネ を 食べ る と 分 
RA‘ ЖЕП 82387», これ を 4 個 食べ 
た だ とき 体内 に 蓄積 きれ だ た 考 の 量 が 致死 量 に 


達し , バク テリ ア は 分 像 で きず に 消 減 し て 
し まい ます 。 で すか ら , あな だ は バク テリ 
ア が 通り そう な 所 に ズラ イコ ネ を 置い て , 
バク テリ ア を 分 裂 ・ 消 減る きせ れ ば よい わけ 
%-Ж; 

殺菌 者 (DISINFECTOR) は 初め 3 人 いて , 
EIN СІЛИ, ЖХ>?ТУТЕЖЕ5” 
TIME が ゼロ に な る と 死ん で し まい ます . 
まだ , ズラ イコ ネ は 同時 に 5 個 ま で 置く こ 
と が で き , バク テリ ア は 初め 迷路 の 一 番 上 
に 2 匹 現われ ます . 

スコ ア は バク テリ ア を 消 減 き せる と 1 匹 
に つき 10 点 , まだ ボー ナス 点 と し て 各 面 終 
了 時 に 残っ て いる TIME※10 点 が スコ ア に 
加算 きれ ます . 

E gO 移動 は テン ・ キ ー の [2][4][e| 
(8|с, ズラ イコ ネ の 設置 ・ 回 収 お よび 壁 
の 徹 去 は | SPACE |C +. また だ , | カナ | で 音 
の ON-OFF, | ESC | で 一 時 停止 が で š, 
|sToP| で ゲー ム 開 始 待ち の 状態 に 移る こと 
が で きま す . な お , ゲー ム の 開始 は |IRETU 


RN| で す . 


スク ロー ル お よび バク テリ ア の 移動 は 3 
分 の 1 キャ ラク タタ 単位 で 行なっ て いる の で , 
ホー ラ , お いし い オ マン ジュ ウ だ ぞ 


RAIKONE 


РБІБІНРЕСІӘЕ 


動き は だ いだい 滑ら か に 見 えま す . 
1 キャ ラク タ は 12X12 ド ッ ト で す . 

それ か ら , 画面 の 表示 は まず 仮想 V- 
RAM に 画面 を 描き , それ を V-RAM に 転 
送 も で 行なっ て いい まず: こう すず する さと で 
画面 の 端 で 少し だ け 見 えて いる バク テリ ア 
の 処理 が 簡単 に な り ま す . 

迷路 の 大 きる は 29※X29 で , 各 面 ご と に 違 
う も の を 作る よう に な っ て いま す . 

る て , この 迷路 を 作る と き や バ パク テリ ア 
を 動か す と き の 乱 数 で す が , ど う や っ て 作っ 
て いる と 思い ます か ? 実 を 言い ます と , 
0000Hー5FFFH に 入っ て いる ROM 内 の マ で て 
シン 語 を 使っ て いる の で す 。 と いっ て も サ 
プルー チン と いう 意味 で は な く , その マシ 
ン 語 の 数 値 を その も の を 乱数 の 維 列 と みな し 
て 利用 し て いる わけ で す . この 方 法 を 使う 
と 簡単 に し か も スピ ー デ ィ に 乱数 を 得る こ 
と が で き て 大 変 便利 と いう わけ で , 私 は よさ 
《 く この 方 法 を 使っ て いま す . 


ハイ ・ ス コア を 出し だ と き に か か る 曲 は , 
聞き 覚え を の ある 人 も 多い の で は な いか と 思 
いま す . まず は 聞い て の おぉ 楽し みろ. 

それ か ら , 画面 に 表示 きれ て いる タイ ト 
ル は 読み に くい (読め な い ?) か も 知れ ませ 
An, これ は 筆記 体 の つも ITI. 

PSI 2 03 S 29 X wM N 
は 結構 楽し め ま し だ た . この ゲー ム で 私 は , 
プリ ン セ ス に 鉄 の よろ いと ゴー ルド ・ ソ ー 
ド を 買い 与え て 和 鳥 の 中 を 練り 歩く と いう 非 
常識 な こと を し て 喜ん で いま し た . 

Р.52 ゲー ム の 感想 を お 聞か せく だ る 
с, それ で は まだ た だ ただ, いつ の 日 か (PiOPiO 
みた だ た だい に な っ つ で し まっ た )。 


な お , 


Add 


9000 2 


+E +F 9990 ВЕ FF 1€ з Эр 20 0511 の 2 до 18 OB Зр 20 
2 つう 36 95 25 10 ЕВ Ор 20 F6 21 Fs Qono 42 90 18 9 11 FE FF 22 7E 21 ӨӨ ӨӨ А7 С 
920910 «С DO LISOA 00 OEE OOF 1D 556 の の LST IO FB {90C aR өре FOOT SEAS 21 ED 07 i 7; Øi 2А ОО 
9020 209 FS 21 99 DO ZA 69 ЕФ 57 SF GE ФЕ 096 GE ES 7E : 2 өсө DS | 18 ӨӨ * 01 ES 21 SE DO IT EB Et 35 
9030 А7 20 28 26 04 TPA- 12 05 E6 ӨЗ 20 05 11 DD. FF 18 ЗЕ опре Сә 2А と 42 оз öz A7 E の な 5А 99 
9040 1 3D 29 95 11 01 90 18 OB SD 29 05 11 22 99 18 :58 ŞOE ФЕ 07 06 07 СЕ CD 94 91 СІ 22 ES 21 06 ӨӨ 
7050 93-11 FF : | 9 1 22 22 19 CE :40 FIFE EI 10 F 3 iC өө 19 р 7 00 15 E 
9969 05 11 24 90 19 Di Ор 20. СЗ С9 45 6С 26 ӨС 11 DC :77 ーーーー・ - ーーー ーーー- 
“9070 CF 19 11 25 00 19 10 FD C? ЗЕ ӨЗ の 1 06 ӨӨ ED BO sF@ 
9080 ЕБ 2 А 20. ra UD TE OSE 


Sum TO CC 327 70 QE F9 AD 77 98-20-00 ВЕ DO ДЕ. $ 


©) ©) ゆう ーー ん GLIDE は すご いっ // СБА ОТЕ 5 L, ADAL, H, あの みな みり ょ ー こ さき さん, 問 上 ら ば きん , Маккеу зд, 快 人 き 
©, HD iran ゆー で は あり ませ ん か /( は っ きり いっ て お どろ いか た ) PS.1 GLIDE を 知ら な い 人 は 3 月 の p.172 を 見 まし ょ う . P.S.2 を 
Za > 2 覧 の 護 、1/O の こと を 「 イ オォ 」 と 読ん で いた アホ は ぼく で す (FUJITU-MICRO7 を 宮上 上 通 ミ クロ 7 と 読ん で ひん し ょ く を か っ た こと も ある ぜ 
ога "ро", 
“ a ーー 


PS.3 や っ ぱり 1255 は 最高 きっ . グ (OVERLAP) 


оо 


BACTERIA АМО マシ ン 語 リス ト 


9619 18 ҒВ ED SE E? Ед 75 25 72 18 1А 26 90 21 74 Еб s@6 
9629 34 Ер SE E? ЕО 21 F4 EO 7E 2B 92 20 04 7E 92 28 ір? 
9550 ӨЗ 2B 18 F4 77 CD 57 98 2А E? EQ 11 аё 96 19 ED :83 
9640 SE GF Еб А7 ED 52 44 4D CD АҒ 91 ЕВ 2A 76 EO CD :96 
9650 04 91 21 63 96 16 01 Ср АС 91 21 72 Еб 26 18 CD StF 
9660: В5-90 С9 FO 52-21-89 96 ЗЕ 06 56-23 SE 23-01 1E CB 
9670 OO Ер BO SD 20 F4 ОЕ 07 46 23 56 22 ЗЕ 22 7E 12 sF6 
9680 25 15 13 10 F9 Өр 20 FO C? ЕЗ 39 28 АС СӘ ВА АС :2р 
96599 CB BA AC СВ ВА АС CB ва 48 4A А4 84 AB 8C CA AB :AE 
зде BC CA ав BC са Ав BC СА 82 FS АВ 94 SF өг 21 19 :95 
96BO 02 21 10 02 21 1 の 9 92:21 10 12 21 01 12 29 01.12 :12 
RELO 2Ө の 91 12 29 91 12 20 F4 +20 42 2Ғ 99 20 QF 11 
96D9 65 оо 88 ов осо 88 бо 46 47 дө ав 098 во ов оо :AÖ 
96Е0 OO A OO OO 88 98 90 Е2 24 F4 98 29 ОҒ 04 24 44 :A6 
96F 65 52 24 45 72 44 45 24 51 44 44 62 45 12 709 44 』66 


чш че ГГ“. ーー‏ سے س ی ی س س م م س م س س س مت م س س م م س س аана menee st‏ س س س م م س س س م م smee‏ ع م م م moman та att тана sem‏ و не samme samme‏ ا 


DE АҒ 07 7F 90 D8 6 25 07 СА 01 99 08 БӨ FC 7Ғ S2 


Add +© +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F Sum 
9190 Өр 20 DF C9 ES DS 7Е Eé 97 5С 21 BE 9С 11 12 90 sa4 
9110 47 19 19 FD D1 р5 CD 79 90 рі Е! С? CS E5 р5 CD BO 
9120 ВВ 90 D1 19 E5 21 óD ЕФ CD BE 99 ЕВ El А7 ED 52 :F2 
9150 44 4D Di 1А 13 ZC ЕІ 05 11 26 90 19 3D 29 ЕС D1 :@B 
9149 1A SC 11 12 90 19 SD 20 ЕС 5@ 59 CD 79 90 C9 21 :54 
9150 89 05 11 06 бө 19 109 FD 41 11 Сё 90 19 10 Ер C9 :A2 
9169 96 10 11 7B EG CS 05 2A 6F EQ 1А А7 28 24 15 1А :DF 
9179 Сё O5 95 58 2D АҒ ӨС Dé OB 20 27 12 1А C6 05 94 :Е4 
9180 58 20 47 ©4 Dó OBE Зө 1A 1B 1B 1A 21 C4 9C 11 D8 :88 
9190 00 19 30 29 ЕС ЕЗ CD АҒ 91 Сі рі D5 ІВ ІВ EE Ср :59 
91 人 9 1С 91 Di 21 97 @@ 19 ЕВ Сі 19 БА C9 DB ©8 E& 20 :E7 
91В0 1E 20 20 ӨЛ 1E ӨӨ 4E 22 7B 05 40 46 19 FE АҒ DZ :52 
91С9 40 46 19 FE Фр 20 Fi 25 15 20 ЕВ С9 96 10 11 7B :60 
91009 ЕО CS 05 2А 6F EQ 1A А7 28 ЗВ 15 1А C6 95 95 28 DC 
91Е0 54 АҒ ӨС рё OB 50 2E 15 1А C6 95 94 58 27 47 04 :04 
91F の 9 рё OB 30 21 CD АҒ 91 D1 DS 1B ІВ ЕВ DS CD BB 90 :63 


ЗЕ BE EF 2A 06 ВС F5 56 40 ЗА FS 49 Fé 1D B7 67 :C8 


Add жо +1 +2 +3 +4 +5 +9 +А +B +C +D +E +Е Sum 


9700 24 71 44 52 24 45 49 F? 92 F5 10 94 CF СА AB BC :C5 
971@ СА AB BC 00 44 SE ӨЗ оо BB ÖB ÖÖ 88 ов BÖ BB 07 :D2 
9729 өө CB ВА АС CB ВА АС FC 49 Ғ5 88 @1 12 20 01 12 :04 
9720 20 ді 12 20 35 42 52 24 45 12 07 47 43 36 44 :Eó 
9740 02 21 10 92 21 10 ©2 21 10 OB Fé 78 48 49 2D 55 :20 
9759 42 4F 52 45 ӨЗ F7 52 42 4F 52 45 04 FB 58 54 :В1 
9760 49 4р 45 @5 F? 48 52 42 45 4E 45 ӘБ ҒА 28 42 41 :4С 
9779 42 54 45 52 49 41 ЕВ 28 SA 55 52 41 49 АВ АҒ :09 
9780 4E 45 OB FC 18 44 52 49 ДЕ 46 45 43 54 АҒ 52 :ЕС 
9799 11 50 ЕЗ ЗЕ 17 21 97 ді ОС 90 ED BÖ 21 6C ÖÖ :8@ 
97АӘ 19 ЕВ ZD 20 F@ 11 F4 21 F4 97 Е5 ді 94 бө C5 :F9 
97В0 ED BÖ 11 СӨ ҒА C1 El С5 ED BÒ 11 SB F5 21 ЕВ 97 :54 
97C0 C1 ES C5 ED БӨ 11 БӨ Ғ5 C1 El ED BÒ ЗЕ 98 52 7B :80 
9700 ЕВ 22 ЕЗ F8 52 óB F? ЗЕ 28 096 97 21 9F Fé 11 ҒӘ :D5 
97Е@ ӨӨ 77 Cé 20 19 10 ҒА C9 од BB 16 ВВ 1С BB 2E 98 :49 
97ҒФ 3© OO 4E бө 33 78 4E 98 28 DB 46 98 АҒ CD 21 98 :2Е 


Sum 2D Ві 79 ОВ ӨЕ ЗА 41 59 CO АВ СА АВ 48 ІС BE 29 :4D 


Add +0 +1 +2 +3 +4 +5 же +7 +8 +9 +A +B +C +D +E +F Sum 
9200 01 19-Е5 21 р Еб CD BB 90 ЕВ El А7 ED 52 EB 21 :ЕЗ 
9210 AO 9С Ср 79 99 Di 21 @7 90 19 ЕВ С1 19 BZ С9 21 :7р 
9220 D3 DC 11 15 DD ЗЕ 14 91 2А 90 ES ED BO 11 94 FF :55 
9230 19 D1 SD 20 F2 2А 6F Еб CD óA 90 ZA 6E EQ А7 29 : СЕ 
92409 99 11 94 FF 19:11 ED р7 18:11:11 71 ҒҒ 19 ЕЗ 21:64 
9250 27 07 11 42 90 19 3D 20 ЕС ЕВ El 06 97 CS CD 94 :22 
9260 91 25 ES 21 06 09 19 ЕВ El Сі 10 Fl С9 21 2F 08 :58 
9270 11 ED D7 ЗЕ 14 91 2A ӨО ЕЗ Ер BO 11 18 90 19 Di :E7 
9280 3D 20 F2 2А éF ЕО CD bA 909 ЗА 6E ЕӨ А7 20 99 11 :F8 
9290 66 99 19 11 91 DC 18 11 11 89 90 19 ES 21 57 DD :15 
9280 11 ВЕ ҒҒ 19 SD 20 ЕС ЕВ Ei 06 07 CS CD 04 91 23 #45 
92BO ES 21 06 99 19 ЕВ E1 Сі 10 Fi С9 21 ЕЕ D7 11 ED 』61 
92C9 D7 ЗЕ 15 Ol 28 00 ED BO 11 1А 90 19 54 SD 1B 1B :1В 
92ре 3D 209 FO ТА 6F Eð CD 6А 90 ЗА 6E ЕО А7 2 の 09 11 :Fó 
FEO 9А FF 19 11 11 08 18 ОС 11 ЭВО ҒҒ 19 11 17 DB 1B TAF 
EFO 1B JD 20 FB 86 07 CS CD 94 91 DS 11 22 99 19 Di 』9a 


Sum 91 ҒЗ АҒ ҒА ӨЗ СА 27 6F А9 52 72 QA 79 А5 @@ 45 :7B 


Add EOE +2 EI BA CHS EG キア 、 EP a a tB SECT D: a M a SQ 

9800 ЗЕ ӨР AS: GD 21. 98 ЗЕ FO AS OF OF の F QF: SD: 21 9 төр 
Әсі +0 +1 +2 +Z +4 +5 +6 +7 +8 +9 +A +E +C +D +E +F Sum 
7300 ES 21 Сё 00 19 ЕВ E1 Сі 19 ЕС C9 21 14 DB 11 16 15В 
9510 DB ЗЕ 15 01 28 Фо ED BB 11 6 90 19 54 5р 13 13 :64 
9220 ID 29 FO ТА OF ЕФ CD bA 90 ЗА GE EQ А7 20 99 11 :F6 
550 94 PF 19 11 Ер 07 18 ӨС 11 95 ҒҒ 39 11 ET ру 15 345 
9540 15 SD 29 ЕВ 96 97 CS CD 94 91 05 11 25 99 19 Di :92 
9350 ЕЗ 21 Сё 99 19 ЕВ Е1 С1:10 ЕС C9 21 «С ЕО 7Е А7 :С9 
9560 28 Өл 55 C9 21 Аб 9С 11 51 DA CD 79 90 21 GE ЕО :06 
9570 7E А7 20 40 DB の 1 FE FE 20 96 11 ҒҒ ҒҒ АҒ 18 21 :7A 
9580 DB %0 FE ВЕ. 20 97 11 00 91 ЗЕ 91 18 14 FE FB 29 :55 
9590 Ө7 11 01 @Q ЗЕ Ө2 18 99 FE EF 20 АҒ 11 Oð FF ЗЕ :24 


9810 ЗЕ OF А4 CD 21 98 ЗЕ ҒӘ А4 OF ӨР. ӨР 9F CD 21 98 : ӨБ 
9820 C9 Сөездесі2 в 18 СӨ 26:65 EQ 11 95-F& CD FU .97 159 
9830-28 67 EQ 11 288 Е7 БО. FCcç 97  S8- 79 ЕФ 47, FI 75 FB: ЗИЛ 
9840 CD 19 98 ЗА 69 Её 67 11 65 F9 CD 10 98 ЗА 6А Её :С7 
9850 67 11 55 Ға Ср 10 98 3 74 Еб 11.45 FB Ср 21 98 tal 
9860 C? 8F 27 BF DO 84 SC 27 67 C9 2A 67:Е0:2Е- @1 DD 1AB 
9870 61 98:22 67 EQ C9? ЗА 6B ЕӨ-А7 CB 11 Аб FC 47 СЗ 1:60 
9880 -21 AE TO ED SF. 90 21 92 FE 19 EB Б1 106 Fi U9. E: ОЕ 
9899: ӨЗ の 1 96:99 ED Во: ЕЗ 21:72. 0017 EB-E1 SD: 2 の F1 DR 
FBAG С9 ЗЕ 04 52 91 F7 52 Ві ЕВ CD 6A 98 21 DA 98 16 FEB 
988008: Ср-ас-91-Ср-Све;98:21.75-ЕБөсЛЕ SD 27 ツナ ЕЩ, БП] GE 


озае ӨЗ 2B 77 та GF Еб 19 ES CD «А 99 7E E6 97 El 20 :4F 98C0 27 98 F1 20 E4 C9 21 ОҒ Fé 11 ҒО Өө 7E 06 97 Cé :85 
93BO ЗА 22 71 Ед 21 5С EQ 26 ФВ 25 22 7E ES ZC FE ӨЗ :52 98D の сө зе өт Сь 20 77 19 19 F6 С9 15 8 18 59 1C 4E :ЕЕ 
93C0 20 97 AF 2A 71 Еб 22 6F EQ El 77 2B 7E А7 CC 1F :55 9860 1E 4 21 42 25 ЗВ 29 55 2С 2? CD ЕВ 92 ФЕ 20 21 :81 
93D の 92 3D СС ВВ 92 ZD СС 6D 92 3D СС OB 93 21 ОВ 94 :57 98FƏ 7B ЕВ 11 78 Өө 7E 06 ӨЗ Có 20 50 Ө? Сь 20 77 19 :11 
збо 16 ср Ас St GD. ов а рау м Qi CA ӨС ED AD А: [М Чэ u S aa. бк алі нк а ER ООО НАЕ ВАНН Жиле а 
9ZF@ 6D ЕФ 11 12 Өө 94 ӨС 19 10 Ер 41 11 26 90 19 10 :5 Sum А2 Ар 97 F7 СВ 70 СӘ 1F 20 73 2 20 ВЕ CS Bó 29 Al 


бит 80 08 SF АС ЗА 78 éF 56 БА FC 9Е АВ 29 91 D7 55 :8С 
Add ФО E ES 5 А0 +6 +7. ФВ kS +Ñ es E e Жш 
9900:-10-Е6:21 00 10:11 01 09. ED 52 20 FC. OD  2@ EQ 21-02 


Add +0 +1 +2 +3 +4 +5 +6 47 +8 +9 +A +E +C +D +E +F Sum 9910 18 99 16 98 CD AC 91 C9 FF 32 FO 35 D8 3B Сі 42 «ФЕ 
9400 FD 11 51 DA CD 79 909 CD BS 90 С9 OB ҒҒ 21 78 EO : 6 日 9929 АС 4A АЗ АЕ ВЕ 59 7А 68 21 12 F7 11 76 00 бё @2 Ба 
9410 35 Со 36 98 CD СС 91 CD FE 94 21 7B EO 06 109 CS :13 9950 26 OB 22 26 58 23 26 27 19 19 F5 21 CD 99 11 CB ЕЗ 
9420 ES 7E А7 28 70 2B 7E А7 20 52 2А 62 ЕО 46 22 ЗЕ :78 9940 Fé 91 ІС од СЕ ED BO C1 11 42 F7 ED BO 2А 65 ЕО :8D 
9430 69 ВС 20 ӨЗ 21 00 00 22 63 ЕО 78 Е6 ӨЗ 20 ӨЗ 11 :5C 9950 ED SB 67 EO А7 Ер 52 DO Ер 55 65 EQ CD 27 98 ЗЕ :94 
94409 ЕЕ FF 18 18 ZD 20 06 11 090 01 IC 18 OF ZD 20 07 :6A 9960 094 22 А1 Fé 32 91 F7 21 BD 99 22 E9 ЕО 96 20 C5 sa4 
9459 11 @1 OU СЕ 92 18 95 11 90 FF ЗЕ ©3 El ES 05 2В :86 9979 96 өз С5 CD Cé 98 2A E? Еб 16 @1 CD АС 91 C1 19 :DD 
9460 тв 77 25 22 25 SE 25 56 El 19 ES CD БА 90 7E FE :04 9980 Fi 2A Е9 Eó 22 25 22 ЕЎ ЕФ СІ 10 EZ С9 АВ 28 А2 :17 
9470 02: 01 20 В6 Е1 ES 23 23 22 73 25 72 El ES 2B 7E 』5F 9999 ЭН АВ 28 CB 3© CO 22 АВ IB 9А СЕ 89 46 81 4A SA :F7 
9480 さじ FE ӨЗ 20 ОҒ АҒ 23 23 25 23 23 56 2B SE 2B 72 :46 9949 ЗЕ СӘ 52 АВ 38 АВ 58 АВ 58 АВ 38 АВ 58 АВ 58 А2 :24 
9490 2B 72 2B 2B 77 Е1 11 07 90 19 C1 10 82 CD А7 94 :D8 99H ZE Ав 78 C8 29 СӨ 22 BS 25 СӨ 22 9A ZE C8 20 CB :7С 
94A@ CD б 91 CD BZ 90 C? 21 7B Еб 06 19 CS ES 7E А7 :ҒВ 99со зә Co 22 CB 209 СВ Ө C8 сө СВ Zo CB со оо 2C AA gsD@9 
94660 28 АЗ 2% ЗЕ 25 56 2А éF EQ Ер 52 20 15 El ES 25 :43 9900 OA АС АА OC 4E 48 GE АЕ AA 42 00 бо СӨ 22 С? EO :ЕЕ 
94C0 ЗА 6E ЕФ БЕ 20 ОҒ А7 28 27 2B ЗА 6D ЕО БЕ 28 20 1:43 99ЕО бо ЕО ЕО AA 2A ЕО AA 4А бо ОО 42 44 07 @7 OO @7 :04 
94ро 18 22 2A 71 ЕО А7 Ер 52 29 ІВ El ES 2B ЗА 6E EQ :50 осо 07 GO 07 47 44 04 бо оо зо 44 24 10 42 12 70 44 SD 
94ЕӨ ЕЕ ӨЗ БЕ 29 19 2E ZA 6D EQ Св 42 E6 ӨЗ BE 20 OS :25 eS RI ri аерди се н тоет тетт тте е теа е а ватон те то ет н тсс e ER 
94F@ ЗЕ ЕЕ 32 5С ЕФ El 11 97 Өө 19 C1 10 АҒ C9 21 ЕВ :22 Sum DD の 9 34 ӨР CF 7E ӨН А7 29 BF DA BZ EF Во DE 9E :АС 


Sum BE ҒА 95 р ВА 42 Fé Aó DD 10 28 04 41 54 SA ФА :D5 
Add +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +R +C +D +E +F Sum 
одоо 44 70 109 42 OO CD 19 9А CO CD 19 FA 28 ЕВ CD 19 :CF 


даа +O +1 +2 +3 +4 +5 +6 +7 48 49 +A +B +C +D +E +F Sum 9n19 9A 20 ЕВ CD 19 SA 28 FE C? 96 @8 DE @?9 Её BO CB :41 
9500 EQ Ө& 95 22 E9 EO C5 7E А7 СА BB 95 SE 22 56 21 :А2 9А20 19 F? C9 GE BÖ 18 Ө2 ФЕ FF 11 01 өө DE @1 Al CB :DE 
9519 7E ЕО до 10 C5 ES 7E А7 28 67 2B 7E А7 20 62 22 :С4 АТО Øb өө 10 FE Ер 52 20 F4 С? 21 F5 ЕФ 25 CO 26 EQ :21 
9520 2% 4E 25 46 80 69 ED 52 20 57 2А ЕЎ EO 36 ӨӨ CS :47 9049 21 75 Еб 7E SD 27 77 20 094 3D 22 6C ЕФ FE 10 209 sDC 
9520 ЕВ CD bA 90 56 Өд C1 21 74 EQ 24 El ES 25 20 12 :7F ФА5ЗӘ Әр 21 62 9А 16 @1 CD АС 91 ЗЕ 94 22 81 F8 CD 27 :2С 
9540 21 94 95 16 94 CD АС 91 CD 6A 98 21 ФА EQ 7E SD :45 JALO 98 C? 80 Еб 21 80 JA Ob 22 22 Е9 EQ СУ GD Сё 98 :090 
9550 18 26 7Е Ғ5 21 7В Еб 11 07 @@ 7Е А7 28 ӨЗ 19 18 sC6 9470 2A E? ЕФ 16 91 ES CD АС 91 El 23 22 Сі 19 EA C9 :A4 
95609 F? Fl 2B 26 OO 25 77 22 71 25 70 21 9Е 95 16 94 :7А завә рі 52 Ва 58 рі 52 py 522 D1 22 рі 22 рі 52 рі 22 :97 
9579 CD АС 91 21 6А E の 7Е ЗС 27 77 El Сі CD 27 98 18 :12 999 D1 52 рі 52 D1 52 D1 52 рі 52 ВА 28 АВ ЗЕ А0 41 :С8 
9580 ФА Е1 01 0700 99 C1 095 С2 14 95 2А ET Еб Сі 25 104 одао 8D 4а 84 АҒ 84 АҒ 84 АЕ 84 АҒ 84 АҒ 84 4F 84 АҒ :9С 
9590 22 65 C2 ©3 95 C9 54 68 79 4E 85 42 BO 22 BO 52 :50 IAEG 84 4F 84 АҒ 8D 4A BD 4A BD да вр 4A BD да BD 4A : во 
95089 54 68 БО 22 54 68 ЗА ФЕ Eð А7 28 ӨЗ АҒ 52 73 Ед :ЕА SACO вр да вр 4а вр 4A 21 18 9B 11 ОС ҒА 01 2A дө C5 :60 
7560 C9 21 75 EQ 7E А7 28 @2 55 C9 рв 99 Eó 40 СӨ ЗА :8E заре ED БӨ Сі 11 84 ҒА Ер Во 21 БАҒА 11 76 бө 06 92 :8Е 
о5се éD EO А7 20 @5 11 FF FF 18 15 SD 20 95 11 90 01 :С7 ЗАЕО 26 Өр 23 23 56 25 19 10 F7 21 59 ҒА 11 76 @9 7E :7D 
95рӘ 18 OB ZD 20 ӨЗ 11 ©1 00 18 ӨЗ 11 00 FF 2A ФЕ EQ :2В зағо ов өз со 20 зө өз Cé 40 77 22 22 19 БУ 19 06 Өз : ОВ 
95ЕФ 19-22 Eq EQ CI ЖА 90 922 76 ЕБ. ?Е-ҒЕ ӘБ DO FE 92 ЖЕР TEE Rae ee 


9SFƏ 38 08 ID SD 28 @1 ЗС 77 18 ЗЕ А7 20 1E 11 74 Еб :26 Sum 4D D8 50 CF 25 Cé АЕ 2A 77 2F 77 ӨЕ 2F 27 ЗЕ 85 :5С 
Sum 88 DE 57 EZ 29 E7 BS ФЕ D4 72 ОВ SF 1C ES A2 ВЕ :74 

| Add +Q +1 +2 +3 +4 +5 +6 +7 +B +9 +A +E +C +D +E +F Sum 
эво Cé 20 зе өт Со 40 77 2В 2B 10 F5 21 20 де CD 23 :31 


Add +0 +1 +2 45 +4 +5 +4 +7 +8 49 +A +B +C +D +E +F Sum 9B10 9A DB 21 Eé Во CB 18 рі EÔ BB ЕВ 00 Е2 @2 20 Е? 1C3 


9609 1% А7 CB SD 12 56 の 1 21 ЕВ EQ ZE А7 28 04 25 25 :92 


91 


Де, 


BACTERIA LAND マシ ン 語 リス ト 


9BGO 22 ӘӘ 1F 91 АЕ АА ©4 АЕ AA @2 22 2Е O2 OE 99 ӨЕ :66 ЕО бө 89 ЕС BC 90 ӨӨ 80 ЕС СВ ЕВ 8C бо 70 の の TO: ral 

овто АЕ АА 94 4E GB ФЕ 11 ОҒ 00 ОЕ 48 @2 АЕ AA OL 86:18 9E69 71 90 の 9 89 ЕС BC 99 90 Во FC СВ РВ BC 090 79 11 ер2 

орда вә оо 70 оо 70 оо 74 094 90 79 ОС бе BF ÖB Ө7 21 :Өр 9E79 әс 10 15 оо бо BO ЕС BC до до 80 ЕС СВ F ЕС өө IES 

9B5O од 47 44 04 бо @7 бо 42 44 ӨЗ 97 21 ФА 07 10 07 : ФЕ 9EB9 19 12 90 19 71 09 до бб СВ ЕС E @2 90 ЕС АҒ BB :ЕЕ 

9B69 BB ӨЕ дө 17 21 94 47 44 094 20 07 бо 21 79 9B CD :6B 9E99 СЕ оо 70 22 91 19 52 07 ӨӨ 00 СВ ЕС 6E @2 ӘӘ ЕС : СП 

овуо 84 68 21 82 9B CD 42 OB С9 IO 2С 22 55 2С 509 2С Fe 9EAO АҒ 88 СЕ дс бө 72 05 10 52 @7 оо до C8 ЕС 6E ӘЗ :EC 

9BBO 51 @@ 58 50 2С 52 55 ӨО 21 98 9В 11 67 EQ 01 ӨЗ :DE IEEG GO ЕС АҒ 88 СЕ бө 70 33 01 5@ 27 Ө] оо во 88 BB :AE 

ороо оо Ер ЕО 21 Fó ЕО 70 C9 00 00 01 092 ӨЗ 21 6C EQ :3F ОЕСӨ QB ӨӨ Eð FF FF FF FF ӨЕ 78 75 27 72 57 Ө7 ӨӨ C8 :85 

ORAO оо Ва 26 до 23 19 ЕВ 21 D5 9B 11 С EQ OE 1B ED :F8 9EDƏ СС СС 8С 00 FO FF FF FF FF ӨР 70 37 7 

OBRE BG ТА ZF 9A 22 FS EQ ЗЕ Ф? 22 bA EO CD SA 04 CD :7Е 9ЕЕФ 80 EC ЕЕ EE СЕ ӨӨ ҒО FF FF FF ҒҒ OF 20 

9BCO өө 99 CD 9@ 97 CD 5 96 CD 27 98 CD 76 98 CD рі :51 9EF@ 77 ӨЗ оо BB BB BB 08 Фо ҒО FF АВ ВЕ FA 

9BDO 90 CD ЕВ 92 СЭ 01 90 OO 2@ 12 00 GO 01 05 99 @@ :76 nm em mm - 

DBEG до 91 осо оо од о4 10 оо оо оо оо 94 ©4 14 QQ OO :75 Sum 22 59 СВ 52 08 26 ЕЗ 1E 52 7А DF 67 ЕС ЕВ 98 ОС :40 

9ВЕФ Ер 5B 67 ЕО 21 99 90 А7 ED 52 DO 21 Fé EQ 7E A7 :1B 

Sum 24 75 A5 C2 24 1А 97 Bi 98 3B 90 F5 22 68 41 01 ЕВ Add +0 +1 +2 +3 +4 +5 +6 +7 +B 49 +A +B +C - ФЕ-ЖҒ Sum 
орао 26 76 72 Әб 9 СС 44 АС 84 00 Fe F7 D4 C7 ҒЗ 97 :02 
9F19 20 76 72 26 76 02 CO ЕЕ А? 2E CA ӨВ FO 72 62 63 3E 

жо +7 +8 +9 +A +E +C +D +E +F Sum орга 72 өз 70 26 76 72 36 об оо Bö 88 88 08 90 EQ SF :46 

аа ТӘ астар Ере ED 7G: ив FIO ЕА АҒ ЕВ ӨЕ 20 67 62 27 67 ӨХ оо 48 C4 4C 84 бо :06 

ә CD Сс `9B 21 од 01 22 65 Еб CD :Ар оғдо 70 4F 7р SF 7С OF 60 27 07 67 63 97 80 2C ЕА АЕ :29 

j CD 9р се эа Ср BB 9Е CD 90 ОБ 21 90 16B 9F5 の C2 ӨӨ 30 27 36 27 26 97 60 62 27 63 27 Ө7 ӨӨ Во 

27 9а СЮ а JA 21 од ӨЗ CD 27 9А CD Аё 95 :16 оғво 88 88 88 20 EQ АҒ F8 ВА FF GF 60 27 57 63-27 97 

SB 9: ср әр 94 CD 29 9А CD ҒО 9B ЗА 6С EO SC ES 9F70 до АВ C4 44 СС 08 70 SF 7С 4D 7F ОҒ 7 eg 

1C CD Еа 98 21 оо 04 Ср 27 9А 21 В EO 7E 55 :50 FERO 67 OS BO AC E2- -2A EE COC 50-527 3626 37 ЭЕ 69 63 

оо CB CD 28 99 21 до өз CD 22 9А 18 В7 ЗА GA sSE 9F9 の 27 67 62 07 СО 26 ӨЕ EO 62 OC СО FE FF ҒҒ EF 

А7 29 і 71 00 G4 CD 27 9A CD А1 98 21 00 OA TAS FFAG 40 75715 51 57 104 20 45 ӨС СӨ 64 02 СО FE FF FF 

3 7Е ІС 27 77 18 9F DB 99 E6 д1 :02 9FEO EF ӨС 29 5212 51 57 04 20 46 OC CO 64 02 СО FE 
од ао CD 27 9A 18 АӨ оо оо оо :92 ОЕСӨ ЕЕ FF EF ӨС 40 75 15 31 55 02 00 26 OE 26 ФЕ 00 


Add. жос +2 
сөбө СӨ 24 21 6B 
тө УЙ A3 


9Ce зә CD 
осо 28 


САО оо оо оо оо оо со оз оо әз оо оо оо оо оо оо бё 00 9FD の GO СӨ 1Е FS ІҒ ЕБ ӨС ӨӨ 75 55 51 57 04 090 62 ОС 62 
DCEG оо оз оо CB EA AE BC өө Fo Fé 26 64 GF ФЕ ОФ 21 :0B 9FEG ӨС да СӨ 1E FS 1F ES ОС 00 75 55 31 55 92 бо 62 
occo 75 57 13 OO оо оо оз оз оо оо OO оо оо оо до од DF 9FF の 9 ӨС 62 ӨС 90 СӨ 1Е ҒӘ 1F ES OC 60 57 11 

сре CD CD сі CD CD сі өө бо оо до өө оо За БА BB ЗА :9С жартылық の まい ACE 
оско ва вв CD DD рі CD DD D1 @6 66 66 @6 66 66 IB BE :02 быт 20 ОҒ Өр 57 FD 85 ҒА E4 1D GA өс # :7 


SEFO BB СЕ EE EB CD DD рі CD DD OLES АЗ ЕЗ SF 2Б АҒ тре 


зим OF 74 С: DC 9р ЕЕ FC 10 5C ЕН 97 70 С7 Е9 19 95 :р5 Add: ао F 553544 ED よら 6 HP 196 нета +В 9С +E +Е 
аоәоо CO 26 ӨЕ EQ 62 ӨС СӨЛЕ FS SF Еі ӨС 40 75 15 51 
A10 57 04 20 46 ӨС CO 64 02 СӘ 1Е FS SF Еі ӨС 40 75 
Add +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F Sum, Р : ささ O2 20 46 ӨС CO 64 02 СӨ 1Е FS SF Ei ӨС 
Өйдө Es Do ЕС ФЕ ФЕ АҒ FS Ғ4 F7 С7 С5 А7 BO ЕС ЕЕ ЕЕ :49 2 15 51:57:04 の の EO 62 EQ 62 00 CO SE Fl SF 
9010 СЕ 08 80 7D FF FF D7 @8 бө 64 27 72 46 GO Во ЕС :79 дәдә Е1 әс 4ДӨ 75 15 55 57 00 00 СӨ 26 СО 26 00 СӨ SE 
9D2@ ЕЕ ЕЕ СЕ Ө8 89 7D FF FF D7 @8 00 66 57 52 62 бб ; SE 4050 РА SF Е1 ӨС 20 35 15 55 57 00 00 CO 26 CO 26 90 
9D30 Во ЕС EE ЕЕ СЕ @8 80 7D FF FF D7 ов 00 29 52 73 :ВЕ A60 СӨ БЕ БА SF Et ӨС 40 75 15 11 75 06 EG ЕС ЕС СЕ 
ораз 66 оз BO 2C EA ?2Е СА 98 Bö áD FE EF Dó 98 090 60:14 A070 СЕ ӨЕ 30 77 FF FF 77 ӨЗ 60 76 96 60 67 96 EQ ЕС 
эро 57 71 46 00 80 2С EA 2E СА ӨВ 80 6D FE EF Dé 98 :5С A980 ЕС СЕ СЕ ФЕ 30 77 FF FF 77 ОЗ 60 76 096 20 52 өз 
9D&Q оо й 57 11 22 OO Во 2С EA ZE СА 08 80 6р FE EF :óB A090 EQ ЕС ЕС СЕ СЕ QE 36 77 FF ЕЕ 77 ӨЗ 30 55 ӨЗ 29 
орто Dé ФВ оо 27 11 71 46 Өө BE 2С Eñ AE CE 98 80 6р s 08 AOAC 67 096 ЕФ ЕС 64 СЕ 46 OE 250 77 DC FF 54 3 ао 76 
oODBG FE EF Dé 08 40 64 27 75 46 QQ 89 2С En AE C2 Ə8 2D AGBO 66 60 87 06 EQ ЕС 64 СЕ 46 GE 30 77 DC 54 өз 
роо 80 6D ЕЕ EF 06 о8 од 66 27 55 03 00 Во 2С Eñ AE :СЕ AGCO до 76 66 IÇ ‚ E@ ЕС 64 СЕ 46 OE ВО -DE -FF 
9DAĞG с> 98 Bö 6D FE EF Dé ов оо 20 33 72 66 ӨӨ 80 AC :DA , адре 54 әз 709 17 ӨӨ 60 47 06 ЕО «ЯС E4 АЕ Cé GE 20 47 
9DEO Е? AE С? 08 80 6D FE EF Dé OB оо 64 17 75 06 00 :08 АӘЕӨ Ер DF 74 ӨЗ 60 76 96 60 67 96 EO bC E4 4E Сё OE 
эрсо во АС Е? АЕ C2 48 Во 6D FE EF Dé 08 00 52 11 75 :Ғ? АЕО 50 47 Ер DF 74 05 50 53 03 60 67 06 EQ «С E4 4E 
орро ос GO 80 АС E2 АЕ С? 08 80 6D FE EF Dó 098 0909 64 :A8 r E ӨТӨ Ha aE ЙА co E E E OT e ау оаа ааа аа 222 
9DE@ 17 11 73 до оо Во ЕС ЕС 00 00 80 FC FF FF BC ос :99 Sum Cé 24 FE C7 43 C4 А7 64 E1 CD Ер 2C 99 2-9 АХ? 
оррғо 79 11 од 19 71 90 ӨӨ Во ЕС BC GO 90 Во FC FF ҒҒ :74 


-- 


Sum F3 B 40 СС DZ ЕС FE ОВ ЗЕ 44 ӨЕ 90 АҒ 30 С5 4B :11 пБ: “о EU #2 «5 «б әб ак ж? жа 9 А ЖЫ ЭС «ВЕ FF 
алоо Со GE 50 47 ЕЮ DF 74 ӨЗ 60 76 96 50 535 ӨЗ EQ 84 
4110 ЕС 46 СЕ ӨЕ 50 45 ҒҒ CD 77 ӨЗ 69 76 © 67 до 

даа + の +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F Sum А120 ЕО 64 ЕС 46 СЕ ОЕ 30 45 FF CD 77 ӨЗ ЗӨ 535 ӨЗ 66 

осоо BC оо 79 11 90 10 12 00 009 Во ЕС BC до 00 80 FC :A4 ALSO 67 ӨЗ ЕО 64 ЕС 46 СЕ ФЕ 20 45 FF CD FZ eE Ф 76 

ОЕ1© FF FF BC 09 10 13 90 10 71 ӨӨ 20 Eó СЕ BC 99 ӨӨ :ВЕ A140 96 99 71 97 OO дө оо өө до оо өө до со оо ос оо 

OE20 бо ЕС 88 ҒА СЕ 00 70 52 91 19 52 07 20 E6 СЕ BC :9А МН ТН ТАТ Зе ЕТ ҰЛТАНЫ АТТА ТТГ ХА ЕПТІ ТУТИ 

осо оо осо 00 FC BB ҒА СЕ 99 79 22 91 50 37 90 20 Eó :7D бит ҒҒ BB JB 06 Е7 78 71 25 96 86 DC 76 ёб А7 АА 40 


9E49 СЕ BC ©0 Ор әд ЕС 88 ҒА СЕ ` ӨӨ 10 72 Ө5 10 55 97 :78 


РС-1245 


BENTENE 


PC-1245 な ど で は , PRINT 文 な ど で 長 い 動か し て みて くだ る さい. 放 字 が スク ロー ル 
文字 列 を 表示 させ よう と し て も , 16 文 字 目 | する の が わか ' る と 思い ます . 
以降 は 無視 され て し まい ます . そこ て , PB 使い 方 は 簡単 で PRINT 文 を 実行 し た 後 , 
や FX の よう に 文字 を スク ロー ル で きる よう | 先頭 番地 を CALL す る だ け で す . 


し て あみ まし た 、 スク ロー ル の 速 き は WAIT 文 で 自由 に 設 

_ 信 力 方 法 定 す る こと が で きま す . また , 実行 中 に 

ёс дырды — | RK | キー を 押す と , 実行 後に BREAK が か 
&C500 ~ &C522 4 TZ POKE ETAJI | か り ま す . 

ON 

ー タ ブル で すか ら , 35 バ イト 確保 で きれ ば _ 最後 に 


どこ に 置い て も 構い ませ ん . この ブロ グラ ム は PC-1245 用 で す が ,。 3 


Шии reyes 


а ж SA 
サン プル の BASIC プ ログ ラム を 入力 し て 


4 


` ы 
ез кї] 
LN кз 

аш 


ылып 


ーー 

им 

бы トー 
Жыя Fo 

ІМ ізі 


Е 
ЖІ 
кю 
а Жаз 
ча 
ы 
LION 
1” 


CA CN 
I к= 
эл G 
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Q (O) Q ©) PPiO 1 周年 お めで と う ご ざ いま す . 1 回目 の 手紙 は ボツ に な っ た らし い ZOMBIE で す . 編集 後記 を 見 た の で す が 、key き ん クオ ジン っ て こ 
(о) О と は な いで し ょ う ? ぼく は 高 2 で す が 。 プラント ・ ペ イジ ・ ベ ペッ ク は も ちろ ん クラ プ ト ン と か も 聞い て まし た だ.。 PiO の 読者 に は H・M や ハ 
ー ド ロッ ク を 聞く 人 は いな い の だ ろう か ? それ で は この へ ん で Bye. ん ( 〇 取 〇 吾 の き らい な ZOMBIE ) 

92 ©, | 支 10 代 の 人 だ た ち は 知 ら な い の で は な いか と 思っ て い だ の で す が , や っ ぱり 知っ て いる ん で すね . オジ ン 呼 ば わり し て ご めん な る い . [Р] 
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Í 
I 
Í 
1 
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ee 


あな た は 宝 を 拾 お うと 思っ て 工場 に 忍び 
込み まし た . し か し ドー ナッ ツ を 池 の 中 に 
落と し て し まっ た か ら , さあ 大 変 . 


レー ザー は 狙っ て くる し , 池 の 中 に は 人 
喰い 魚 が う よう よ . あな た は 生き 延び る こ 
と が で きる な か. 

圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


| や は り ス ピー ド が いま いち で すね . 
| (O) 


リス ト ど お り に 
問 違い の な いよ うに 打ち 込ん で 《 く だ きい. 


ォ ー ル BASIC な の で, 


変数 表 (R1) と 行 番号 マッ プ (#2) を 
示し て きま す . その 他 詳 し いこ と は リス 
ト を 見 て くだ さい. 


あな だ は 左上 に いる 人 間 を 動か し て , F 
ー ナ ッ ツ と コイ ン を 回 収 し て くだ さい 、。 

人 間 は [1 は 上 [|| っ | で 上 下 左右 に 移動 し , 
[z][€] で 左右 に ジャ ンプ し ます 。 た だ だ し 
同じ 方 向 に 2 度 続 け て ジャ ンプ する こと 
は で きま せん . また 水 の 上 で ジャ ンプ する 
ょ 死ん で し まい ます . 

ドー ナッ ツ は ドー ナッ ツ の ある 未 の 上 に 
立っ て |』| を 押せ ば 回 収 で きま す . た だ し, 


10 BUSUB3000』 GOTO1 360 
20 ОМ G GOTO 140 
ЗО РОКЕРҒМР,М 


40 АФ-ІМКЕУ%(О):ІҒАФ-"2"ТНЕМІҒ JI<: 1THENI 


FB$<>"Z"THENJ=1:K=0:A=-1:B$="Z" 


SO IFA$="C"THENIFJ<> 1THENIFB ま > "C"THENJ= 
1:K=0:A=1:B$="C" 
60 ON J 60Т0180 
70 ІҒАФ-" "ТНЕМІЕРЕЕК(ЕМР-1)<>?ОТНЕМХ-Х- 


この 途中 で サビ ラメ ア に 食べ られ だ り , м 
ー ザ ー に 当 だ な っ だ りす る も 死ん で "し ま いま 
す . 

e UT, コル が も も の の の: 才 (た な 
る と 1 ラウ ンド クリ ア で , TIME に 応じ て 
ボ ポー ナス が 得 6 れ ます 。 LCF ENS 
面 か ら レ ー ザ ー ガ ン の 動き が 速く な り , 7 
面 か ら エ レベ ー タ の 速度 が 速く な り ま す . 
を と し て 4 面 ご と に C 古 ALLENGING 


STAGE が あり ます . 
CHALLENGING STAGE で て は 


| SPACE キー で 人 間 を ジャ ンプ きせ , 

| っ | で 左右 に 動か し て 紫 の ドー ナッ ツ (50 

ー100pts.) と , 黄色 の ドー ナッ ツ (20 一 
表 1 変数 表 


人 の X, Y 座 標 

サビ ラメ ア の X, Y 座 標 
エレ ベー タ (1) の Y 座標 
エレ ベー タ (2) の Y 座標 
レー ザー ガン (1) の X 座 標 
レー ザー ガン (2) の Y 座標 
HI-SCORE( 1--10%) 
HI-SCORE 保 持 者 の NAME(14 文 字 ) 


ドー ナッ ツ と コイ ン の 数 

ドー ナッ ツ の 数 
V-RAM 先 頭 番地 

カラ ーV-RAM 先 頭 番地 

人 の V-RAM ア ド レス 

人 の 今 の 位置 の キャ ラク タ (DISPLY CODE) 
人 の 1 2 下 の 位 置 の キャ ラク 9 (DISPLY CODE) 
人 の 2 2 下位 置 の キャ ラク 9 (DISPLY CODE) 
人 の 今 の 位置 の カラ ー コ ー ド 
JUMP し て いる と き 1, それ 以外 は 0 
ドー ナッ ツ を 回 収 し て いる と き 1, そ れ 以外 は 0 

レー ザー が 出 て いる と き 2. 反応 し た と き |, НИНА) 
ボー ナス 
紫色 の ドー ナッ ツ の 数 
黄色 の ドー ナッ ツ の 数 


その 他 


DOUGHNUT FISHING BASIC リ スト 


1: GOTO1 20 

ВО ІҒРА$= "Е" ТНЕМІҒРЕЕК (ЕМЕ +1 ) < ОТНЕМХ=Х+ 
1:650Т70120 

90 ІҒАФ-"Ш "ТНЕМІҒРЕЕК(ҒЕМР) “ӨТНЕМҮ-У-1:60 
Т0120 

100 IFA ま =" 本 "THENIFFEEE(FNF+40) =8 THENY=Y 
%1:60Т70120 

110 IFA$=" 本 "THENIFFEEE(FNF+40 ) -227ТНЕМб- 
1:Р-15:Е-1:75--1:С-М:65070140 


ノン ビリ し て る と レー ザー 砲 が … 


ROUND 
81 
меч 
ХХХ 3 


> 
7; 
E p= е 


40pts.) を 回 収 し て くだ さい. 40 秒 だ つか, 
U ま の O や べ へ ぜ に 当 だ る と 導 お あお "です. まだ た, 
ジャ ンプ し た と きた “一 " に 当 だ る と 反対 
方 向 に は ね 返さ きれ て し まい ます . 

п, すべ で て の ドー ナッ ツ を 取っ だ た 場合 
に は , MAN が 1 人 増え РЕК FECT 
BONUS が 得 ら れ ま す . 


原作 に 比べ , か な り 速 度 が 遅く な っ て し 
まい まし ただ. 次 回 か ら は も う 少 し 動き の 速 
いも の を 作り た いと 思い ます . 
3 参考 文献 
MUSASHI: "DOUGHNUT FISHING”, 
РіО, 2% Б 


表 2 行 番号 マッ プ 


HI-SCORE RANK 表 示 
TITLE 表 示 

1 面 の 画面 表示 
2 面 の 画面 表示 
3 面 の 画面 表示 
SCORE 等 の 表示 
ドー ナッ ツ 表 示 
CHALLENGING STAGE 


面 ク リア 処理 初期 設定 


120 ІРЕМЕ-2ТНЕМО-0%1:ІҒО-ООТНЕМО-О:650Т025 
0 

150 60Т0520 

140 IF F=1 ТНЕМТ5-Т5Ж%-1:Ғ-О 

150 РОКЕМ+Х+РЖ40, С: РОКЕУ1+640+Х , Во: F=F+T 
5:С=РЕЕК (М+Х+РЖ40):ІР С-72 ТНЕМ_ОСАТЕХ, Р 
ІРКІМТ" ":SC=SC+2XAZ:PLAY"+COAFC'" : СА=СА+ 
1:Е=1:С=0:6050В640 ELSEIF С=122 ТНЕМР-Р- 
1:Ғ-1:С-О 
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“Де, 


` DOUGHNUT FISHING BASIC! Z F 


160 IF Р-Ү THEN G=0 ELSE IF C=81 OR C=87 
THENPLAY"T-C3":C=0:G0T0660 
170 РОКЕМ+Х+ЕЖ40, 202:POEEV1+X+PX40, 112:6 
070440 
X=X+ñA:Y=Y+D(K)š:K=K+1:IF К-4 ТНЕМА-О 
С=РЕЕК (ЕМР ) : р=РЕЕК (ЕМР+40) 
IF С=90 ТНЕММ-С:650Т0660 
IF C=8 THENT=Q 
IF р=90 ОК р=8 THEN J=0 
ІЕМЕ-2ТНЕМО-0%1:ІҒО-ООТНЕМО-О: 607025 


6070520 
LOCATE7 ,Ү(7):С010ОБК7:РБІМТ" | "w 
LOCATE19,Y(8):PRINT" | " 
Y(7)=Y(7)+1:zIF Y(7)>14 THENY(7)=5 
Y(8)=Y(8)-1:IF Y(8)<5 THENY(8)=14 
LOCATE7 ,Y(7):COLOR7:PRINT "E": LOCA 
ТЕ19,Ү(8) : РКІМТ" E": ON J 5070520 
ЗОО IF РЕЕК(ҒМР) «90 THENIF J<>1THENY=Y-1 
ELSEIF PEEK(FNF+40)=0 ОК РЕЕК (ЕМР+40) =1 
21 THENY=Y+1 
510 IF РЕЕК(ҒМР+40) =0 ОК FEEK(FNF'+40)=12 
・1 THENY=Y+1 
520 N=PFEEK(FNP):D=F'EEK(FNF'+40):E=F'EEK (FN 
Р%ВО):РОКЕРМР, 202: РОКЕЕМР+2048, 112 
ささ 0 IF №85 ТНЕММ=0: РЫ АҮ" +СОАЕ+Е" : SC=SC+ 
AZ: СА=СА+1: 5050840 ELSE IF №9 THEN660 
540 IF СА=8+00 ТНЕМ710 
550 IF р=121 ОК D=O THENIF Е=121 OR Е=0 
THENIF Ј4>1 AND б-О THEN さ 9O 
560 IF р=121 ОК D=O THENIF JE 1 AND б-О 
ТНЕМРОКЕРҒМР,М:Ү-Үж1:б50Т03520 
570 IF D=9 ТНЕМІҒ JE 1THEN Y=Y+1:N=9:GOT 


IF К>5 THENT=OIE=OI GUTUS9O ELSE440 
РОКЕЕМР»М 
Y=Y+1iN=FEEE(FNF ) : р=РЕЕК (ЕМЕ +40 ) 
COLOR7 :_ОСАТЕХ, Ү:РКІМТСНК® (102) 
IF (04>121)ж(0<>0) THEN660 
РОКЕЕМР, М: 5070400 
0=0+1:ІҒ О>М. THEN ロ =O ELSES70 
: IF L<1 ТНЕМ(ОСАТЕІ1,0:РКІМТ" ":LOCAT 
E29, С2:РКІМТ" " 
460 IF (X=L1)kK(Y=L2)*(G=O) THENL=L+1 
470 IF L>OTHEN L=L+1:COLOR2:LOCATEL1,0:F 
RINT"V":LOCATE29,L2:PRINT"<":G0TO0S00 
480 (ізі 1%56М(Х-11):12-і 2-56М(Ү-1 2) 
490 L=0:GOTOSSO ` 
S00 IF L>2THENFORI=2TOL2-1:L1(I)=FEEK (FN 
Р1) :РОКЕҒМР 1, 121:NEXT:FORI=28TOL1+1STEP- 
1:12(1) =РҒЕЕК(ЕМҒ2 ) : РОКЕҒМР2, 120: NEXTELSE 
350 
510 FORI=2TOL2-1:POKEFNFi.L1i(I):IF 11(1) 
=83THENPOKEFNF 1+2048, 96 
520 NEXT:FORI=28TOL1+1STEF-1 
530 POKEFNF2.,L2(I):IFL2(I)=83THENFOKEFNF 
2+2048, 96 
540 МЕХТ:_=0:1ІЕ (б=0) ж (Х=1 1) ж(Ү=1_ 2) THEN66 
о 
220 COLORS: ОСАТЕ(1.0:РКІМТ"У":І ОСАТЕ29. 
2: РКІМТ "<" 
560 COLOR7:GOTO600 
270 FORI=1TO4:LOCATEX(I),Y(I)sPRINT" " 
580 X(I)=X(I)+1:IFX(I)>27THENX(I)=1 
290 COLOR1:LOCATEX(I),Y(I):PRINT"<":NEXT 
:50Т020 
600 ҒОКІ-5Т706:1 ОСАТЕХ (І), Ү(І):РКІМТ" " 
610 Х(І)=Х(1)-1:ІРХ(І)< 1ТНЕМХ (І) =27 
620 СОЦОК1 :_ОСАТЕХ (І), Ү(І): РКІМТ" >" 
650 NEXT: БОТО20 
640 СОЦОК7: ОСАТЕЗО, 13: РКІ МТОЅСІМС"#####0 
"+ SC 
650 RETURN 
660 FLAY7, "RO": OF=-1:FORI =1T012: ОР=0Р+1: 
ІҒОР><ТНЕМОР-О 
670 РКАҮМІр%( "СбЕЕ6ОСЕЕббЕ".1.1) 
80 COLOR7:LOCATEX, Ү: РКІМТОФ (ОР ) : МЕХТ: РО 
КЕРМЕ, №: N=0: МА=МА-1 : IFMQ=OTHENB ミ O 
690 Х-3:Ү-4:б-О:Е-1:7Т75--1:.1-0: МВ-МА: IF М 
А>7ТНЕММВ-7 
700 COLOR7:LOCATE3SO, 21: PRINTSPC(7—-MB) 』 КІ 
БНТФ ("клх ", Ма-1) :МА--1: 60Т020 
710 MI =VAL (М1ІрФ (ТІМЕФ, 4,2) ) SE=VAL (RIGHT 
Ф(ТІМЕФ, 2) ): В5=0: ҒОКІ =OTO4:TF SE SE (І, МЕ 
) AND МІ = МІ (І, МЕ) THENBS=BS (1) 
720 МЕХТ: ME=ME+ 1 : W=W+1: СА=0: DO=DO+1: р=0: 
X=3: Y=4:Q1i=0:G6=0: J=0:F=1:TS=-1 
730 B$="":IF 007 25ТНЕМ00=25 
740 COLOR7:FW=FW+1:IFFW=10THENFW=1 
750 LOCATE12,10:PRINT "ROUND" Ы: "CLEAR 
760 COLOR2:LOCATE11:,12:FRINT МІ:"МІМ ";5 
: "SEC. ":1_ОСАТЕ 12, 14 
770 ІҒВб-ОТНЕМРКІМТ"МО BONUS": GOTO790 
780 FRINT"BONUS "%В5Ж10:5С-5С%В5 
790 FLAYMU(FW),MU$(FW)., 7: N=0: PAUSE2O 
IFW: STHENM=1: AZ=2ELSEIFW> 6THENQO= 1 
IFME=3THENME=0: GOTO 2500 
ОМ МЕ%1 GOTO 1630, 1840, 2050 
FORI=OTO9:IF 5С>Н(І) ТНЕМ910 
МЕХТ:СІ 5 
COLOR6: LOCATE10, 20: FRINT "GAME OVER 
LOCATE10, 22: PRINT"SCORE" 5 SC*10 


LOCATE10, 24: FRINT"TRY AGAIN ?(Y OR N 


АФ=І МКЕҮФ: IFA$="Y"THENGOSUEZ 140: GOTO 
890 IFA$="N"THENCLS:END ELSEIFA$="G"THEN 


MA=3: CA=0: Q1=0: X=3: Y=4:G=0:.J=O:G0T0820 
900 TI=TI+1:IFTI<SOOTHENB88OELSE1200 


だ ろう か ? 


ちな み に 私 は , 今年 生業 し た ば か り の 18 才 で す . 


910 ҒОБК2-9Т01%15ТЕР-1:Н(7)-Н(2-1):М%(20- 
N$(Z-1):NEXT:H(I)=SC:N$(I)="": XN=7: YN=Z: 
NN=O 

920 CLS:COLOR4: РКІМТТАВ (12) ; "LEET’S ANGA 
MING! ! 5": COLOR7 

930 LOCATES8,4:FRINT"A B C D E F 6 H I J" 
zLOCATEB,6:PRINT"K L MN O P O R 8 T 

940 LOCATEB.B:PRINT"U VWXYZ. : 

CHR$ (34) 

950 LOCATES,10:PRINT & ? а Ф # @ + 

Ев" 

960 А1%=" г —-Ю жЕ!!! 1з ":А2%-=" 

E кш 7 

970 СО 0ОК7:1 ОСАТЕ10, 12: РКІМТ "МАМЕ. " 

980 LOCATE10, 15: РКІМТУТКІМБФ (19, "=" ) 

990 _ОСАТЕ16, 15: РКІМТ"ТІМЕ 60 

1000 РГАҮ7."ҒЗЕОҒАФАЗОЯААрОҒЗЕСОҒ А?АЗОЯАА 
DIG5FAGF7":TIME$="00: 00:00" 

1010 АФ-ІМКЕҮ%(О):ІҒАФ-""ТНЕМ1150 

1020 IFA$%$="ğ" ТНЕМБОЅОВ1 110: XN=XN+2: IF XN> 
2STHENXN=7: YN=YN+2: IFYN>9THENYN=3 

1030 IFA$="G"THENGOSUB1 110: XN=XN-2: IFXN< 
7THENXN=25: YN=YN-2: IFYN< STHENYN=9 

1040 IFA$="Ri"THENIFYN>ZTHENGOSUB1110O: ҮМ 
YN-2 

1050 IFA*$=" 本 "THENIFYN<9THENGUSUE 1 110: YN= 
YN+2 

1060 C ま =CHARACTER ま (XN+ 1 、YN+1 ) 

1070 IF XN=25 AND YN=9 THENC ま =" " 

1080 IF XN=23 AND YN=9 ТНЕМСФ-" " 

1090 COLORS: LOCATE15+NN, 12: РКІМТСФ 

1100 ІҒА%Ф“>" "ТНЕМ1150 Е 5Е1120 

1110 Іі ОСАТЕХМ, ҮМ: РКІМТА2%Ф: RETURN 

1120 IF ХМ-25 AND YN=9 ТНЕМ1190 

1120 IF XN=23 AND YN=9 ТНЕМІРММ>ОТНЕМІ ОС 
АТЕ15%ММ,12:ММ-ММ-1:РКІМТ" ":MUSIC"-C1": 
50701150 

1140 FLAY"+BOR":NN=NN+1: TFNN: 1 さ THEN1 190 
1150 COLOR6:LOCATEXN, YN: РКІМТА1 Ф 

1160 T=60-VAL (RIGHTS (TIME%, 2) ) : CURSUR21 。 
15:zCOLOR7:PRINTRIGHT$("OO"U+RIGHT$(STR$(T 
),LEN(STR$(T))-1),2) 

1170 IF TIME$< "00:01:00" THEN1O10 

1180 (0САТЕ21.15:РКІМТ"ОО" 

1190 М%(1)-5СНМ%(15,12.14):50Т0850 

1200 Кі-і:б0Т01260 

1210 СЦИК5ОН5.12:РКІМТ"НІ-5СОКЕ RANKING" 
1220 COLOR3:LOCATES, 15:РЕ1МТИ51Мб"Т@ОР. 
#####Ою" НСО) :LOCATE23, 15: РКІМТМФ (О) 
1250 СО ОК4:1 ОСАТЕВ, 17: FRINTUSING" 25ND. 
H#H#HHHOE", НСІ) З ОСАТЕ25, 17: РКІМТМФ (1) 
1240 СО ОК5:1 ОСАТЕВ, 19: PRINTUST NG "2Кр. 
#####Ою" „Н (2):1 ОСАТЕ27, 19: РКІМТМФ (2) 
1250 COLUR6: ОСАТЕВ, 21: РКІМТОЅІ МБ "46ТН. 
#####ой",Н(5):1 ОСАТЕ25, 21: РКІМТМФ (3) 
1260 СО 07:1 ОСАТЕВ, 225: FRINTUSTNG "5@TH. 
#####Ов" „ H( 4) : LOCATE23, 25: РКІМТМФ (4) 
1270 (ОСАТЕ12,24:РБІМТ"НӨІТ ӨАӨМҮ KgEY 
:8г.% 

1280 Тіз1000:ТІ-0:б05МБ1220:ІҒТІ-ОТНЕМОӘО 
5МВ2140:50701620 

1290 CONSOLE15,9:CLS:CONSOLE 

1500 FORI=0T04: COLORI +3: ОСАТЕ7, 15+1 #2: FP 
RINTUSING"##";6+I;:PRINTUSING"6 TH. ##### 
OB" H(I+5):LOCATE23, 15+I£2:PRINTN$(I+5): 
NEXT: T1=600: TI =0: GOSUB1 330 

1310 ІҒТІ-ОТНЕМб505МВ2140:650701620 

1320 СОМЅ01Е15,9:С1 5: CONSOLE : GOTO1 220 
1330 TI=TI+1:IF TI>T1 THENRETURN 

1240 АФ-ІМКЕҮ%:ІҒАФ-""ТНЕМІЗ2О 

1550 ТІ=0: RETURN 
1360 CLS: COLORS: PRI 
1370 PRINT" 
1380 PRINT" 
1390 PRINT" 
1400 FRINT" 
1410 PRINT" 
1420 PRINT: CULOR6 
1430 PRINT" 

| dh 

1440 FRINT" 

пип 

1450 PRINT" 
K. 

1460 PRINT" 

| ú = 

1470 FRINT" Ë 

Ш WPI ':IFEL=1THEN121 
1480 COLDR7:PRINT" 
1490 PRINT" KEY FUNCTION 
1500 FRINT" 

1510 PRINT" 


z 
-4 


w 
BIE 
= 
m 
к 
Б 
о 


10-20РӨТ5 


1520 FRINT" لہا‎ 
1530 PRINT" 
1540 РКІМТ" 
1550 PRINT" 


г | テー ロ =DOUUGHNUT 
Є は 3 1 
し | ヒコ JUNF 20-40P@TS 
1560 FRINT" aa 
1570 PRINT" ТАДА к 
1580 FRINT" кы ш 
11590 PRINT" V=LASER GUN 
1600 FLAY6。"E35+C" 。"+CR+C6E35+C" 。"+CR+ じ 6 
EZG+C", "+CR+C6BZABE7",7 

1610 LOCATE10,24:FRINT"HSIT mAGNY ӨКӨЕҮ! 
а " Н 

1520 А%-ІМКЕҮ%:ІҒА%Ф-""ТНЕМ1620 

1630 COLOR7, O0: CLS: PRINT" 


£ a > =SAPI RAMEA 


ән, 私 は うれ し い / 皆さん も 一 緒 に ハー ドロ 
жь тС, ハー ドロ ッ ク し まし ょ う . 


жаз” 


IP AI VYVlUKLYYÉRƏMƏlOO TT — 
1650 РКІМТ"І 

1660 FRINT"I 

1670 РБІМТ"І е % 

1680 РКІМТ"ІЖН БНЕ БИМЫЕНЕВН ЕН БЕНЕТ 
1690 РКІМТ"І H H H H H I 
1700 FRINT"I H H H H I 
1710 РКІМТ"І ЯН НЕН БЯНЕ БЕБЕ ӘНЕ БІ 
1720 РКІМТ"І н Нн H H I 
1750 РКІМТ"І ӨН H H % H vI 
1740 РКІМТ"ІН SEHH ШЕНЕ ЕНӘН НЕ 
1750 РКІМТ"ІН H H H H I 
1760 РКІМТ"ІН H H НӨ” НІ 
1770 РКІМТ"ІНЕЗНЕ SHS ВНЕ НВ ê НЕНІ 
1780 FRINT"IH H WV H H H НІ 
1790 РОКЕ=5420!, 96: РОКЕ55471!, 96 

1800 РОКЕ55599!.,96:РОКЕ55698!.,96 

1810 РОКЕ55711!,96:РОКЕ55725!.96 

1820 РОКЕ558359!,96:РОКЕ55902!,96 

1850 650702250 

1840 COLOR7,O:CLS:PRINT" 

ҮА а РЕТ Г amamasnmaenannamrancummuqmnnaqrasoymstuwsqayssuuninippuwnisqwancnqunounamn 
1860 FRINT"1 

1870 РКІМТ"І 

1880 РКІМТ"І ° 

1890 РКІМТ"ІЗНЕ ЕН Е БИН 

1900 РКІМТ"І H H 

1910 РБІМТ"ІЗЯН H е 

1920 PRINT"I H © 

1950 РКІМТ"ІЗ Н 5H 8 2 H 

1940 РКІМТ"І H H БЕН 

1950 PRINT"I НЕ % H ННІ 
1960 РКІМТ"ІН H БІН БИР H Hš HWI 
1970 РКІМТ"ІН Ө H H н. M ЕНІ 
1980 РКІМТ"ІН Н ЖЕНЕ ê НЕЕ HI 
1990 PRINT"IH H H H ° H ФНІ 
2000 РОКЕ55469!,96:РОКЕ55590!.96 

2010 РОКЕ=5599!, 596: РОКЕ55220!, 96 

2020 РОКЕ55749!.96:РОКЕ55ВОЗ!.,96 

2030 РОКЕ55819!, 96: РОКЕ55922!, 96 

2040 БОТО2250 

2050 СОЦОК7, 0: CLS: PRINT 

2060 РКІ МТ!" оннан 
2070 РКІМТ"І 

2080 РКІМТ"І 

2090 РКІМТ"І І 
2100 РКІМТ"ІЗЗНЕНЕ | 
2110 PRINT"I HH | 
2120 РКІМТ"І H H | 
2150 РКІМТ"І НФ ЯН | 
2140 РКІМТ"І H H | 
2150 PRINT"I@H I H | 
2160 РКІМТ"ІН Е | 
2170 РКІМТ"ІН | 
2180 FRINT"IH І Ө | 
2190 РКІМТ"ІЗН ЖИН | 
2200 РКІМТ"І H H I ا‎ ҚОН. П | 

2210 РОКЕЗ5482!.,96:РОКЕ55621!.96 

2220 РОКЕ550697!,96:РОКЕ55706!.96 

2250 РОКЕ55720!.96:РОКЕ55822!.96 

2240 РОКЕ55858!, 92: Р0ОКЕ55910!, 92 

2250 ҒОКІ-0Т05 š 

2260 РКІМТ"І ";5РС(279:71":МЕХТ 

2270 РКІМТ5ТКІМС%(29,""") 

2280 ҒОКІ-ОТ026:РОКЕУ%І +641. 227: РОКЕМ 1 +1 
+641, 80: NEXT 

2290 ( ОСАТЕЗО.1:РКІМТ"ХХХЖЖХХЯХХХЖЖ 

2500 І ОСАТЕЗО, 2: PRINT " *DOUGHNUT * 

2510 LOCATESO, 3: FRINT"*FISHING Ж 

2520 LOCATESO, 4: PRINT ЖЖЖЖЖЖЖЖЖЖ 

2330 LOCATES1,5:FRINT"HIGH 

2540 LOCATE31,6:PRINT"SCORE 

2550 LOCATES1,10: FRINT"YOUR 

2560 LOCATEZ1,11:PRINT"SCORE 

2570 LOCATE ミ 1 。 15: FRINT "ROUND 

2580 LUCATE32。19:PRINT "МАМ 

2390 1 ОСАТЕЗ4.17:РБІМТКІСНТ%( "Оо" +КІБНТФ 
(STR$(W+1),LEN(STR$(W+1))-1),2) 

2400 LOCATEZÖ.,8:FRINTUSING"#####0";H(0): 
LOCATESO, 13:PRINTUSING" #####0" 5 5С 

2410 MB=MA:IF МА>7ТНЕММВ-7 

2420 СО ОК7:1 ОСАТЕЗО, 21: РКІМТБРС (7 -МВ) :К 
ІбБНТФ ("хня " , МА-1) $ МА-- 1 

2430 0=кмр (1) ж27+1:ІЕ (0=8) + (0=20) THEN2 4 
O 5 

2440 ІҒСНАКАСТЕК%Ф (0. 21 ) = "о" THENCOLORG:LO 
САТЕО, 21:РКІМТ" ":01=01+1 

2450 IF 01<р0 THEN 2420 

2460 PLAY "C+C" : ТІМЕФ= "о0о: ОО: о0о" : БОТО20 
2500 бХ=5:6Ғ=1: X=20: Y=23: GU=0: J=0: RA= ニ Os К 
В-О:Вб-О:БісО:ІҒ W+ 7THENFV=2ELSEFV=1 
2510 CLS:COLOR4:LOCATEO, 24: 'RINTSTRING$( 
59."Ң")::ғРОКЕСО4247!.67:РОКЕ56295!,64:бЕт 
5:ОР-О: W=W+1 

2520 LOCATEZE4,24:COLOR7.4:FRINT"'RD, "sRIG 
HT$("OQO"+RIGHT$(STR$(W).LEN(STR$(W))-1), 
2) 5: COLOR7., O 

2530 ҒОКІ-ОТО5:ІҒ І-ОоТНЕМСЕ-2 ELSEGE=6 
2540 FORII=OTO04:GOSUB2980:COLORGE:LOCATE 
GD.GC(1):PRINT".":IFI=0 AND 11=4ТНЕМ ОСА 
TEGD。GC(O)EPRTINT" " 

2550 МЕХТІІ,1:1=4 

2560 СО 0К7 :1_ОСАТЕ20, 235: РКІМТ "х": ҒОКІІ =0 
7015: 6505082980 :1 ОСАТЕБрЮ, 6С (4) : РКІМТ".." : № 
ЕХТІІ:СЕ=10:6Р=0 

2570 ( ОСАТЕ10, 12: РКІМТ "СНА ЕМБІ NG STAGE 
I'I":PLAY"C4FA+C2AR+C+C+C4A2RAAA4F AF CSC4F A 
+CAR+C+C+C4+CAFC2ZRCCC4F 8RO" 

2580 LOCATE10,12:PRINTSPC(19)5:TIME$=" OO 


I 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


p 4 月 号 の 編集 後記 の key さ ん の 所 を 見 て , 私 は 思っ た . ジェ フ ・ ベ ペック や ジミ ー ペ イジ の ファ ン で ある 私 は ,. も し か する と か な り の オジ ン 
いや ー し か し マイ コン や っ て る 人 で ハー ドロ ッ ク 好 き の 人 が いる と は 思わ な か 
(最近 は ラウ ド ネ ス の CRAZY NIGHT が 気に入っ て いる Mr.Tortoise ) 


[Р] 


: 00: 00" 

2590 А%=1МКЕҮ%(О):1Е J=0 AND А%=" " THEN 
J=1: GU=—-1 :GE=10 

2600 IFJ=0THENGA=0 

2610 IFA$="B" THENGA=-—1:GL=O0: 1ІЕВФ= "ЩЩ" THEN 
GA=0 

2620 ІҒАФ-"Е "ТНЕМбАт1:бі -О:ІҒВФ-" "THENG 
А=0 

2630 ІҒА%%>""ТНЕМВФ-А% 

2640 РОКЕҒМР, БЕ 

2650 X=X+GA: Ү=Ү+БЕ (GE ) ЖБО 

2660 ІҒКХ>29ТНЕМХ-О 

2670 ІҒХ“<ОТНЕМХ-29 

2680 IFY=23THENGU=0:GE=0: J=0 

2690 БО=РЕЕК (FNF+2048) :GF=FEEK (FNF ) : COLO 
R7:POEEFNP , 202: РОКЕҒМР+2048, 112 

2700 GE=GE+GU:IF бЕ-ОТНЕМ GU=1:GE=GE+GU 
2710 IF 50-48 AND БР=72 ТНЕМКА=КА+1: PLAY 
"+CO+B+F ":БЕ=0 

2720 IF 50-96 AND GF=72 ТНЕМКА=КВ+1: PLAY 
"-5-#В+С": БР=0 

27520 IF КВ=15 AND RA=4 THEN 2830 

2740 IFGF=120THENGU=-GU: GE=GE+GU: BEEP 1 : Е 
EEF1: EEEFO: BEEF 1 : BEEFO 

2750 IF бР-199ТНЕМ2830 

2760 IF BF=22 さ THEN2B3O 

2770 1.0САТЕ29-б5Х.22:РБІМТ" "skLUCATEGX 。 1 
4*FRINT" "sgGX=BX+5F ITFGEX1THENGF=1ELSETF 
GX» S8THENGF=-1 

2780 ІҒҒЕЕК(У+480+6Х ) =202ТтНнЕМ2830 

2790 ІЕРЕЕК (У+920+29-65Х )=202THEN2850 
2800 COLORZ:LOCATEGX 14: FRINT" 4" 

2810 СО ОКо: І ОСАТЕ29--6Х, 25: РКІМТ "ж"; 
2820 IFTIME$=< "OO: 00: 40" THENZS90 

2820 COLUR7 1 ОСАТЕ 10, 10: РКІМТ "ЕАКМІ М5" 
2840 LOCATE12, 12: COLOR4: FRINT "о". ; : COLOR7 
:FRINTUSING" ## SX ## = оа", PVK2O0, RB 
2850 LOCATE12. 14: COLORS: РКІМТ "о" $: COLOR7 
:FRINTUSING"### ӨХ # = он", PVXKSO, RA 
2840 LOCATE10,16: FRINT"TOTAL BONUS = O 


в 


"аты 
V ` 
Ё WI リハ 


b > 
a. „аё À 
У КУХ КУ УК 


2870 РАО5БЕ1О:ІРКЕ-ОТНЕМ2910 
2880 ҒОКІ-КВ-1Т005ТЕР-1:1.ОСАТЕ19.12:РКІМ 
TUSING"##" I: В5=85+2ЖРУ: BEEF1 

2890 LOCATEZ4, 12:PRINTUSING"##O" ; В5 :1 ОСА 
ТЕ24, 16: РКІМТОБІМС"##0" IESI EEEFO 

2900 МЕХТ 

2910 ІҒКА-ОТНЕМ2970 

2920 ҒОКІ-КА-1Т005ТЕР-1:1 ОСАТЕ19,14:РКІМ 
ТІ::Вб-В6-5ЖРУ:Ві-Ві-ЭЖРУ: BEEF 1 

2950 _ОСАТЕ24, 14: РКІ МТОЅІ МС" ##0" sB1:L OCA 
ТЕ235, 16: FRINTUSI МБ "###0" § BS: ВЕЕРО 

2940 МЕХТ:ІЕ КА<4 ОК КВ: 1=5ТНЕМ2970 

2950 LOCATES, 18: РКІ МТОЅІ МБ"РАКҒЕСТ BONUS 
=###0" ;SOkKFV:BS=BS+50xF'V 

2960 ОСАТЕ 10, 20: РКІ МТОЅІ МБ "GRAND TOTAL 
=###0" ; BS: МА=МА+1 

2970 .SC=SC+BS: PAUSE 3O: ВЕЕР: 1=0: X= 3: Y=4: 6 
OTO1630 

2980 GD=RND (1) *39: ІҒРЕЕК (М+650+6С (І) ж40) = 
OTHENRE TURNEL SE 2980 

5000 CONSOLE: COLOR7,0: CLS: DEFINTA-Z: V=&H 
Dooo: Vi=&HD800 i 
5010 рІМХ (6), Ү(8), М(9) ,Н(9) 1050) ,12(5 
0),D(5),0%(3),GC(4),GB(10), Е (4,2), МІ (4, 
2), В5(4), МО(9), МОФ (9) 

5020 ҒОКІ-О0Т05 : КЕАрр (І) : NEXT: PLAY7 

5050 ҒОКІ-ОТОЗ : КЕА”В: 0% (І ) =СНКФ (В) : МЕХТ 
5040 ҒОКІ=1Тт010: КЕАРбВ (І) : МЕХТ 

5050 ҒОКІ-ОТ04 : КЕАРбС (І): МЕХТ 

5060 РОКІ =0Тт02: FORI I =0Т704: READSE (11,1), М 
І(1І1.І):МЕХТІІ.І 

5070 ҒОКІ-ОТ04 :КЕАрВ5(1І1):МЕХТ 

3080 ҒОКІ-1709 :READMU(I),MU$(I):NEXT 
5090 Y(1)=18:Y(2)=18:Y(3)=20:Y(4)=20:Y(5 
)=19:Ү(6)=19 

5100 ҒОКІ =0Тт09: № (І) ="":Н(І) =0: МЕХТ 

5110 DEFFNP = ソリ +X+Y※X40 

5120 DEFFNF 1 = ソリ +L 1+ エ *※40 

5150 DEFFNFS=V+ エ +LS*40 

3140 X=3:Y=4: DN=0: AZ=1: TI=0: BS=0: CA=0 


“Де, 


DOUGHNUT FISHING BASIC リ スト 


5150 Х(191:Х(29-15:Х(29)-10:Х(40-24: Х(5) 
=7: X (6)=23:FW=0:L1=1:L2=1 

3160 L=0:6=0:F=1: TS=-1: 00=5: MA=5: МЕ=0 
3170 MI =0: 5Е=0:01=0: M=2: W=0: SC=0: 00-2 
3180 Y(7)=5:Y(8)=14: J=0: ВФ=" ": RETURN 
5190 ПАТА-1.0.1.1.1.1.99.101.102,100.0 
5200 DATA 1.1.1.2.2.5,2,4,5,1.5,6.8,11 
5210 DATA 40, 1.20, 1,.60,0,50,0,40,0 

5220 DATA 60, 1,30, 1,10,1,60,.0,50,0 

5250 DATA 50,2, 60,1, 40,1, 20.1.10, 1 

5240 DATA 10,50,50, 100,200 

5250 рата 7。CSRFRRRDRGRRRRCDEFGA5F3RO 
5260 DATA 5。G3E1EFEDCG3E 1EDSE 1EBGAA さ 1+C 
さ E1E555G15EEFEDCG さ E 1ED5G さ EARG1GQREB+C5RO 
5270 DATA ó,C1+C+E+C+G+E+C+ECA+DA+F+DA+D 
GB+B+A+G+#F+DB+C+E+CBGFDR1C1+C+E+C+G+E+C 
+ECA+DA+F+DA+DGB+B+A+G+#F+DB+C+E+CBGFDC- 


ЕЗС5-ӨЗЕСбЕЗС5ККО 
5280 DATA 4,AS5A1IGZAZAIGIEZRI#A3#A1#A1+D3 
#AIAI#ALAIGIGIAZRZ#AL#A1L1#A1#A1L1R+D#AA#AAG 


GAZRFR1FA3F1EFEDDEZRF 1F 3F і AAFEFEDDE 3R 
5290 DATA 7,C2FA+C7+D+CRS5A2+CA+FS+E+D7+C 
RS5SA2+CA+G7+F+G+A+G5+F+E+D+C#AAG+C7+D+#DR 
S#A2G#A+#D5+D3+#D+#D5+C3I+#D+#DR#A7+C5+D7 
+E+#FRSAS+D+#F5S+EZ+D+E6+#F3RO+#F8 

2200 DATA 7,A4+D+F+E+D+F+D+E+D#A+CABSR4ñ4 
+D+F+E+D+F+D+E+D#AAG8R4 

5210 DATA 7,-~CZ3CEG--DDFAG1GGZAB+CBO#AA#GG 
#FFE#DD#CCR2-C3ZCEG-DDFAGZIGAB+C3 

5520 DATA 7,C1DEFGR4E1FGABR4G1AB+C+D+ERZ3 
+C1BAGFEDRZC-DE-FG6G-AB-C+C 

5550 DATA 7。E6F4FFEFBR6B+C+TDE4EDEBRE 4EAA 
A#GASR6B+C+D+C4+CB+C8 


AA NAA AA NAA NA NA NA AANA NS SS AAA A AA 


MOSS OS OSO SOOO ODO OSO DO DO TAA NNNSNN SNN SAA SAA 


а” 


PC-1350 用 ペイ ント 8 反転 ルー チン 


この プロ グラ ム は 画面 を 塗り つぶ す ル ー 
チン と , 白黒 反転 させ る ルー チン の 書き 込 
み 部 と ,。 この 2 つの ルー チン を 使っ た お 遊 
び プ ログ ラム と て 構成 され て いま す . 


入力 方 法 


62-72 行 の マシ ン 語 デー タ Е,РОКЕХ, 
CALL 文 は 絶対 に 問 違 わな いよ うに し て < 
だ さい . 病 走 する お それ が あり ます . な お , 
リス ト 中 の “ーーー" t “===” は , リ 
スト を 見 や すく する だ め だ け の も の な の で 
入力 し な く て も 構い ませ ん . 


使い 方 
まず | pgF [А と し て くだ さい . し ば らく 


し て 画面 が 真っ 黒 に な っ た だ た だら, マシ ン 語 の 


書き 込み 完了 で す . あと は 定義 付け し て あ 
る プロ グラ ム を 適当 に 実行 し て みて くだ る 
い . 


解説 

СОҒУЫН ҒИ Ж 
13 &6500 38): 5, 反転 アー チン は &6600 
番地 か ら 書 き 込 まれ ます が , 両方 と も リロ 
ケー タプ ブル で す 。 

ペイ ント ルー チン は , &650E 番 地 の デ ー 
タ を 0 一 255 の 男 囲 内 で 変化 きせ る こと に よ 
), デー タ に 応じ だ パタ ー ン を 表示 きせ る 
ЖБМ БЛАС С E PE 
た 場合 は CLS ル シー チン に な り ま す . 

まだ , ペイ ント ・ ル ー チ ン に は &6507 番 
地 を , 反転 ルー チン は &660B 番 地 を 0 一 4 


@ 有 光義 城 
の 範囲 内 で 変化 きせ る こと に よっ て , ペイ 
ук, 反転 の 範囲 を 変 を る こと が で きま す . 
お 遊び ゲロ グラ ム は これ ら の 性 質 を 利用 し 
だ も の で す . 簡単 な ゲロ グラ ム な の で すぐ 
に 解析 で きる と 思い ます 。 


最後 に 


最初 は GPRINT ル ー チ ン を 作ろ うと し て 
ぃ いな の で すず が に 柏 折 し で も まい の いま も も た) が 
れ か 作っ て くれ ませ ん が か? 

それ か ú, PC-1350 で マシ ン 語 ゲー ム を 
作る ときには, ぜひ この ルー チン も 使っ て 
ーー ジン SE с 0 
参考 文献 
“PC-1350 用 グラ フィ ッ ク SUB" , 
“PC-1350 の 解析 ”" , РіО, 84 年 11 月 号 


ョ PC-1350 用 ペイ ント & 反 転 ル ー チ ン BASIC U スト masa 


DIB: 202,204: E34 i34 


HB ,ЕЙ2зЕЙІ 
ñ=R+1: 
:%511,%4й.%9 


5йіРЕАП B: POKE BB 
6Й:1Е B<>55 LET ñ=ñ+1: ィ 9: DAT 241,229,509,588 


* &FF | 845 


5070" 
62:ПАТА $00: RSE SES, 402 
sATA DBs SB2 684. 234 
694 EBA ЙІ ШЕ  SB2 72: 


900, 3B 


РЕ, Й5 220, 585,670. $02, 548 
B4 DATA &1Е,211,440, 41Р :548,%2Ғ»62Е»%37 


1880,6 70, 502, 2F | SAF 


537 IAA: "2" POKE 865й7»4: 
POKE &650Е› 255 
119iEHLL 66500: WAIT 


6З: АТА EDE SHS 2С, A3 
7,019,040 
0591.599, 68 400, &61 


665,502, 238 285 511 
'®4Й,&2С,&Й3,&11,®&ЙЙ 


PRINT : END 250: "D" 
4 

150:"5” POKE %655й7»4 

16Й:ҒОВ I=ñ TÜ 255: 
POKE %65ЙЕ,1І 

TIEHLL 26500: NEXT I: 
GOTO 168 


500: °С" 


200: YRV WAIT 5: POKE %65 I: 
ЙЕ, 255 

210:РОКЕ %650Е,й: CALL š 
6500: POKE &650Е› 255 

220:FOR 1=0 TD 4: POKE & 
6507,1 

239iEHLL &6500: DPRINT : 
NEXT I: GOTO 210 I: 


CLS : POKE %66ЙБ 


Z6A:CALL š66808: GOTO 260 


PRINT 


PRINT 


660E, I 
389i ERHLL 26600: GPRINT 
CALL %66й00: GPRINT 
ы NEXT I: GOTO 370 


CLS : WAIT B: 
POKE š66BB:4 

318:FOR Ізі TO 24: 

"АААЙ" 5: NEXT 

WAIT 10 

Z2Ø:CALL 6600: GPRINT 
GOTO 320 


400: "ү" CLS : WAIT 0: 
POKE &660В› 4 

410:11МЕ (й0,йЙ)-(149,519, 
&FƏF0 BF: WAIT 5 

420:CARLL %660й: DPRINT : 
GOTO 420 


350: F” CLS : WAIT © 
369iFUR Ізі TD 24: 
“ЕВЕВ?”:: NEXT 
WAIT 20 

570:ҒОВ I=0 TU 4: POKE & 


95 


м2-700/1200-ВОК/С 


マン シン 


バッ ティ ング 


3D ゲ ー ム が 人 気 あ る よう で すか ら , 
私 な り に アニ メー ショ ン 風 3 D の 野球 ゲー 
ム を 作り まし た . 
プロ グラ ム ・ イ ン フ ォ メ ーション 


MZ で これ だ け の 3 ピロ 画 面 は , 前 作 
の ハセ ル 以 来 で すね . と に か く , 7 
ば らし い の 一 言 で す . (O) 


テー プ か ソノ シー ト に な ら な い 限 り 。 їй] 
当 な マシ ン 語 モニ タ を 使っ て コツ ュ コツ 入力 
する だ け で す . 

な お , MZ-700 で マシ ン 語 モニ タ の な い 
人 は , PiO'84 年 8 月 号 「BALOON WOR- 
LD」 の 「MZ-700W コ マン ド 」 を 使っ て 


ыр ха 


遊び 方 


[кч] 


RDD 


: SUM 
гаре 2 | 


tal ت‎ сп トー 


1 
1 
әде 


МАИ 
こい 


mid КҮ テー ` Ti ú © 
(m Cy し 』 


“J TT Fi ba ам 


А C TI F. РА Су 7 Р С ذا‎ Fn د‎ (Q 
сә кл) 


Ку s‏ حا “j CT. CT, Cn (n‏ ل“ 
(Жаай C кай‏ 
„рү‏ ا یت زم ع لے و э‏ 
D C, Fa i CH Ке O T F t‏ 
ка 4 саса гр‏ 
تی CO‏ ۳ ن ل“ 


үг =, =, =, r= r 
T Q Q C Жыл m кл Жул i Ж ың] 


kt.‏ ذا ذا ذا نم ذم pa‏ ن ت pa pa‏ ا pa‏ ن ن 


ë; 

й 

Й 回 > 
回 


[ЖАЙ ГИ C ل“‎ кл] 


C Ti L. р 


突然 で す が , 「 西 部 労働 レス トラ ン 」 っ て 知っ て ます か ? 


_ 何 も 強制 な ん て し て いま せん . Tb, 


SATTNG 


手ごたえ 充分 , これ は 飛び そう だ 


プログ ラム 中 に 説明 が 表示 る れる よう に し 


て あり ます か ら , それ を 見 て いた だ だ けれ ば 


わか る と 思い ます . 


プロ グラ ム に つい て 


簡単 な MZ で す の で 、 プロ グラ ム を 考え 
る より も ,「MZ で プロ グラ ム で きる 」 ゲ ー 


ム の アイ デア を 考え た える の に 気 を 使い まし 
た (全然 プロ グラ ム の 説明 に な っ て いま せん 
Тауға 

а, [SHIFT |+ [BREAK | で モー ニタ に 
戻り ます . また 実行 時 に は , プロ グラ ム ・ 
エリ ア の 他 に ワー ク ・ エ リア と し て $442F 
まで 使い ます . 


i BATTING کی ا‎ ス 4 


mmm DD 4 
пк <û DM T: ¿n T: 


Fi ti ti Dı 
b ы? 


+ толымы زم‎ ҮК — СӘ 
m a T 


и i DEG 


A ل‎ FO ن ل‎ Р زا‎ 
к. レー レー — — 
Жаа (i CO (h CO Cri кл C 
һа СӘ Q — í 
Жыя ылан 


ーー 
ーー 


終わ り に 

Фк 
бабабабабабабабабабабабада бада 
1/O82 年 8 月 号 , '834F3 Н 5, PiO'844F8 
月 号 。11 月 号 と お 世話 に な り ま し だ が 。 今 
で は MZ で この よう な 単純 な ゲー ム を する 
人 も あま り い な いよ う で す の で 。 も う ゲ ー 
ム 作 り も 終わ り に し よう と 思っ て いま す . 
る て , これ か ら は 何 を し だ ら いい で し ょ う 
か ね. 


チキ ショ ー ノ ピッ チャ ー フ ライ ダン ノ 


RA‏ اا 
з‏ 


крг 
[ки ки CO CO ых) 


Жайыл лау 


күтті CO: г 7 
Каа mm 


- ұт” 
ーー 


— — — — — ,— „| 
= 
ا‎ Sie 


F Fo Fi Fi Fi ti Fi DC 


кл Жаш кул A GC 
md ا ت‎ ú. C C n р. 
ы кл CO C Ж 


„ют! 


iN т. C (T. 


マー 
а. 


マー」 
А 


paf 


これ は 1I/O82 年 5 月 号 の p.287 に 載っ て た も の で 別に 僕 が 考え ん た ん じゃ な いん で 


BU — ENG (J UT, 苦心 の 末 に で きた だ ゲーム で 遊ぶ な ん て 最高 だ と 思い ませ ん か (ちょ っ と 大 


NN II л шш ы ыш с PL EEE EE FASE FT IEE EET E ынаа тақа тарланға 
Q а 
72%, ТЗАУЕ, LOAD, LIST, КОМ, と 書け ば 分 か る と 思い ます . を そ 一 で す 。 マイ コン を ゲー ム だ け に 使っ て いる 人 の こと を 言う ん で す . 
ЄК -- ж も し , 自分 が 「 西 部 労働 レア スト ラン 」 じ ゃ な いか な と 思っ だ あな た, ちょ こっ と ぐら い プ ログ ラム の 勉強 し て みた ら 6 どう で し ょ うか . OP, 
“> 
267096; 
96 "PS ی‎ 


BATTING マシ ン 語 リス ト 


Ж 
Т 
h. 
гү 
к 
іш 
— 
ーー 
сш 
[кл] 
сш 
テー 
м 
D 
し | 
сч 
2) 
pa 
テー 
テー 


2488 62 HE 
2418 Ср га 24 DD FE EE 21 ЗА 

2418 30 FE 18 28 03 21 46 28: 
2428 FE 28 38 3 21 4C Зӣ РЕ: 


2428 58 58 83 2 


2428 3D СВ 27 4F бє йй 09 SE 


к с TTI i O ta 


тала) 
һа 
JI 
һа 
テー 
жі кале Ж 
‚= рз 
һә 
т 
O DOORN 2 


г! 
D 
һа 
ーー 
LT 
Һа 
(А 
[кч] 
гп ғ E KeA ` 
LR 
(з 
т 


о К со П p. ла, 


ДО +6 +1 +2 +3 +4 +5 +6 +7 SUM 2458 25 56 21 94 43. CD 91 29 28 38 C3 йз 

2200 HS CD E2 28 18 36 3A HB DÛ 2448 SR HH š C Yo 
22085 ZB а рг 96 22 DD 21 :51 2445 3A HH EE FE 15 C4 Ұй 24 : 

2218 AF 26B 11 05 #5 81 04 05 :FB 2450 11 26 01 21 45 45 CD SF : 

2 ñ 


карл 
ч [кл ъч) 
[кала кла Кыл 
һа 
тп 
ді 
m 
x= 
Ж 
m 
71 
m 
ーー 
ЁЗ 
c3 
1 
т! 
m 
гл 
т, 
т j> Жел Ка TM TN Fn (Ta. 


+ D CY TI: 


2688 24 Ft 
2626 24 ZE CD 56 ZR 21 AS Di 


сэ О h ке me ООО + 


ытты Ра CH — 
ЖӘ ca ci ka ы ا‎ 

bi: O ©? С saus г, 

m 

сл 

һә 

~J 

© 

сә 

m 

T 

ст 

m 


1196 ЭК ХӘ || тете ныне н е меннен EE 
CD 84 2В 11 B4 :Ға 2698 11 41 55 CD 69 29 ЗАЯ A9 sü? 
о г2ена 26 FE 88 58 97 DE ӘБ 21 :72 
1 гене DC 2F 18 6A FE 84 CA Ai :1Н 
29 2660 SF DE ca 21 E6 2Ғ CB 27 BÛ 
ñ +6 +7 SLUM 2668 4F ве йй йэ SE 25 56 CD :02 
ЖА; ій 02 OC OC ISE 2ëCü ӘС 29 11 94 ЗЯ 21 07 DÖ :8С 
=ë r Әр 85 94 :F4 26С8 CD 69 29 21 ІС 01 2271 550 
--------------------------------- 4: 19 ЕХ ТС 2606 11 CD ES ӨЗ FE 16 208 0D ‘DE 
2 , 回 回 ЙЭ A4 26DS 21 Ср HE 22 44 2Я ЗЕ СЭ :2Б 
> 29 47 7С 26Ей 52 AA 28 37 C9 11 EB ЗА oA 
a ZA HH ZE FE 12 ‘EE ЕЕЗ 21 67 DO Ср 63 29 ЗА A3 3A 
28 AC CA ЁС 26 А 2EF ロ 26 FE SE 2й й2 ЗЕ FE РЕ :8р 
+1 ni 52 ZE 18 Эр つ , 
BC 29 24С8 28 СВ ЗЕ 57 78 Еб ОҒ 92 288 || ニニ ーー ニー ニーーーーーー エ ーー テー ニー ニーー イ ーー マー ニー ニー ジテ ーー 
р DB % 24C8 Cé ӨЗ FE QZ CH ЕС 25 DA :7E 
1 18 <dD 62 26 FE 84 CR De 25 DZ Cl 
ФЕ FE Е 2 2405 агр 26 CD FE 28 DE ӨЗ DR C2 
ао ЗА 2Б 24E 37 26 FE #4 02 #2 26 CB i24 
2285 ZE 84 18 #2 27 97 27 82 Өр 28 55 ADD- +0 +1 +2 +3 +4 45 +6 +? SUM 
22E@ CD ва ZB < - JE орай SF 28 21 SA AD 2B 3C FE :24 
7268 26 ИЗ FE CD 17 2708 63 та ан 11 40 ЗЭ CD ЕС :1D. 
ЖОЮ 5 e Ср АРТЫК | OTR e a мет тте енеден 2716 29 ЗЕ SQ 18 34 52 AD 2B :3D 
CS 2; 8 2718 21 37 ЗЕ ЯҒ 06 00 09 56 :3Н 
5 2720 4? C3 Bl 27 SA AD ZB 3C 50 
2728 FE ӨЗ 20 01 3D 18 EE ЗЯ «97 
273 HE 2E 3C FE 04 28 BR 11 :52 
БЕ: 2738 5з 33 CD 8С 29 ЗЕ SR 18 :F4 
2500 06 йй 09 ES 21 7 2 {НС 2740 üg 32 НЕ 26 21 ЕБ ЗЕ 18 FS 
2508 Al 11 Ср 44 08 21.19.1F 11C 2748 02 52 НӘ 2E F5 BE 48 CD :Ей 
--------------------------------- 25ій DD 46 BE DD 4E 28 09 22 :R1 й 24 ZE Еі Ев ЯҒ 28 20 FE E3 
2518 SE 2B Еі 5E 23 56 25 ES :89 5 2 190 
2528 21 ЕЗ 42 CD 25 28 Е! SE Al 7 :R1 
2528 23 56 25 ЕЗ 21 ӨБ 43 Ср BD 27 62 
2530. 25 2A Е1 ЗЕ 23 56 21 ЕС 314 2 FS 
ADOC +A +1 +2 +3 +4 +5 +6 +? SUM z538 AF Б? Ер 52 Zü ӨҢ 33 OD A4 2 РС 
2300 28 05 11 ӨБ ЙЕ 18 ӨЗ 11 33 2540 Өр 09606 EB 60 ЭКЕ | ыы ie er ee 
эпо о? аз 0i йй йй CD СВ 28 IE 2548 21 BB 42 Ср 25 2A DD 21 33 
әзій CD Өз 29 Ср Ев 28 CD 56 :F7? 255й ER 42 DD 22 ЭС EE вв 04 CC 
2318 2H CD 33 25 CD 08 23 CD rEZ 2558 CD 84 2B 11 26 DI 21 4Е :ҒЗ 
2228 29 26 28 F2 SH A9 EE FE :Е5 260 СО ЗЕ 282 ) БЕ Ў 5 
2528 ӨС SQ Св FE 71 CR C? 28 :R2 ДЕ ADO- +0 +1 +2 +Š +4 +Š +6 +7 SUN 
ЯЛ0 523 16 21 21 37:25 22 ЭЕ ЖТ 2796 ій DR 18 ZD 3A HE EE 3C :76 
2772 ZE ZR HE 26 FE #6 28 13 3A 27788 52 HE 2B FE 03 28 QS 21 :52 
IEE БЕ ИСӘ ЖС МА ЯҒ ТВ CENO Н ыы етте тте т-тетттентттете 2790 93 ЗЕ 18 87 ЗЕ 71 52 A9 :FA 
25248 ms за ӨЗ FE ӨН Зӣ #4 ЗЕ :EF 2798 2В 11 65 39 CD 8С 29 CD 129 
2350 02 18 82 ЗЕ 04 52 D2 23 185 27A0 05 Z? ТЕ FE 52 20 02 36 102 
2358 32 63 24 3A HE 26 11 ES :95 2708 20 ЗЕ 18 52 45 26 CD 2C :09 
2366 ZB 21 ЕВ 42 CD 1B 2A SA 25 2760 2B 37 ЗЕ 3 T 52 BR 28 3A 
2368 AC 2Б 11 ЕЗ 2С 21 ЕЗ 42 45 ADOD +0 +i +2 +3 +4 +5 +6 +7 UM 2768 21 ай Өй 22 44 2A СЭ 21 3E 
ота CD 1E ZA ЗЕ 81 11 DB 2D :6A z566 6% 29 CD 14 23 вв й4 CD :73 о?па AF 26 ЗЕ 2й 47 HE 78 28 :Б5 
2572 21 ӨБ 45 CD 1B 2Я AF 52 :62 25855 84 ZE CD 47 йа DD FE 29:47 27C8: 07 Бе тг CD Е2 27 18 Еі 405 
--------------------------------- 2526 47 Ев Ға FE 58 CS FE ға :D1 2700 07 58 88 18 EF 21 ЗЕ ЗЕ :68 
2593 20 Ез CS 2A ЭС 2Б 25 22 :05 2?DS ZA AS 2Е СВ ЗЕ SF 16 08 :89 
2500 9С 2Б 21 1Е 26 22 ЭЕ 2B 14 27Ей 19 СЭ SA A? 2B 16 бй ЇЕ :22 
2508 CD 56 2B CL СБ 18 58 09 :2Е 27E8 CA 21 D3 02 СЕ ТЕ 20 03 FL 
2566 11 QR 25 13 03 11 29 35 рН 2?F06 72 18 Di 73 21 94 02 CE :50 
25688 21 В 02 CD 69 29 21 FB :89 FES 77 20 03 72 18 61 75 21 :Б9 
25Са 45 36 DD СО 14 29 06 04 199 [| eR 
25Сё CD.84 2В DD 7E 22 47 E6 :20 


に 1 5 : 
ЗН 5 ACD +й +1 +2 +3 +4 +5 +6 +7 :5UM 
TEG HH 2. 2800 FS LZ СЕ EF 28 02 72 СЭ 5E 
2368 01 21 70 34 ЙЕ ВЕ CD EE AÛ сәре 72 СӘ 47 DD ES FD El CD :F8ü 
ЗСО ERE EB ES IB ODD ДА Wa z" S Н т=ш= тЫ с салысы apy 2816 16 Өй GE йй FE 20 20 Й2 :69 
2575 29 3A HH 2Е FE ur D4 ӨН :1Е 2818 ӨЕ BE FE 51 28 ü2 ВЕ 51 :С4 
ASDA 28 ве йз CD 84 2B 18 Га :95 z820 FE 41 28 #2 ВЕ 32 FE SR :ҒЭ 
3DS Ср EF 2A ЗА HH 26 SL А 2828 28 02 ВЕ ささ FE 57 20 02 šDH 
EE DD 2А ' 2839 ВЕ 21 FE 55 28 02 ВЕ 22 :02 
© 22 ADD +0 +1 +2 +3 +4 +5 +6 +7 SUM || 2858 РЕ 58 20 02 GE 25 РЕ 45 :EC 
2600 83 25 ЗЕ 01 52 AS 26 C3 :2F 25940 20 йт ВЕ 11 FE 44 28 02 IHS 
2605 єз 24 ZR HE 26 E? 28 03 FE 2848 AE 12 FE 45 2ü ü2 BE 15 :R4 
қс» мырын E ЕР оар TA a CS 2610 BE SE СЭ ЗЯ HE EE FE 09 :72 75958 AC ар CS FD FE 71 FE 6S :Dü 
2615 39 Әп ZA AC 2E FE 68 58 :81 2853 Dü FE йі 28 15 FE 84 28 :56 
оо>а аз 66 SD СЭ йе ЗЕ C3 DD :99 2668 25 5С Ер 77 72 РЕ ӨЗ CO :19 
2628 TE йй FE ас DR 61 24 DD :С4 2868 ZD CS ғр 26 FD 26 72 QZ :04 
2528 TE БЕ FE GE СЯ 61 24 11 :50 сауа 18 Fë 78 FE ас 20 04 ЗЕ :Р2 

2628 26 01 21 dE 55 CD SF 28 ID1 

2640 21 17 D2 11 55 38 CD 69 ВС 


жш), 幸い PIO に は PiO パ ー ツ と いう 便利 な ユー ナー が あり ます . こう いう の も 利用 し たら いい と 思う の で す が . 
(えら そ ー な こ と 言っ て 未だ マシ ン 語 が 使え な い ぴ いえ す ) 


| 97 


нез 


BATTING マシ ン 語 リス ト 


8 03 18 FE? За ZA Ер Ба СӘ 21 ЭЕ Di 11 C? :CF ZC 09 ас 04 04 04 05 û2 й] :27 
--------------------------------- 2H3 58 Ср ваз 23 йе 92 CS 11 :75 гра йй йй йй ай йй FF FF FE :7C 
2B38 ра 58 CD ва 23 C1 18 Fë :2E гсре FE FD ЕС ЕС Fa FS F2 EE :C2 
ZAAG CD ea 29 CD 1E 23 #6 2 :33 СЕЙ 04 #5 йе аг йа BE AC ас :42 
AAAS C3 84 2B CD 47 Ва 11 F? :8E LES BC ай ай йй йй йй FF FF :8A 
2НЕй 58 21 96 45 Єз 91 29 CD 17C ALFA РЕ ҒҒ 81 04 ûr BR BZ BZ :18 
ADD +0 +1 +2 +3 +4 +5 +6 +? SU ZAB8 56 SH 11 41 33 21 AS D1 :3C CFG Ө2 йз 04 #5 HE йє GE бй : ПЯ 
2560 El FE Яр 20 04 ЗЕ 04 18 :6å гнсв Ср 69 29 11 10 33 CD EC :1Е || --------------------------------- 
2022 ГЭ FE ій са GA 20 04 FD sd 日 2ACS 29 21 71 04 22 At 11 CD i60 SUM: 2518 11 91 25 97 24 11 :СС 
289й ІВ 15 84 Ер 2B FD 2B FD :94 ZADO 44 йй йе 05 CD 84 26 CD :38 
2998 56 Ғ1 685 ED ?1 ?2 CB 51 :я6 L AË : HS 
HH Zü HE FD 36 71 64 BE #5 :Е1 ; 85 
гене 06- OF FD 25 FD 71 72:30 :1D 47 ADD: +8 +1 +2 45 +4 45 +6 +7 SUN 
2860 Fa СЭ CD CE 28 ba 21 Bü :2C SE 2рйй Bü FF FF йй 01 82 04 05 aA 
2068 ZB бє 85 БЕ 22 20 йз рэ :13 2 C2 <DEG 04 02 йй FE BZ 82 84 05:12 
TICO 19 FO 15 PF DS 00 22 bD 165. || жшше a ыы ыыы ы ALIA 04 03 йг аг? 02 ай йй FF 13C 
ГЕСЕ ТГ йй сә 26 йй БЯ CÛ 62 :05 1 5: 2018 ҒҒ FE FD FÜ ЕС FB FD FF :E9 
28DB ZE 8й ë? ЕЗ 26 йй EE CD :55 zz 081 04 ûã 81 йй 81 й2 øZ :0E 
28D8 68 2B 81 CE 27 CE 27 CB :С2 2025 84 04 04 ай йй йй йй û1 :8р 
ASEM 27 СЕ 27 El Ed СӘ ЗЕ Al :Е6 DS й2 03 05 AF 07 ЙБ 0S A4 :27 
28E8 21 33 43 QE ій 77 22 18 :5? ALO +й +] +2 +3 +4 +5 +6 +7 :5ШМ 2058 02 04 AS йе Bë 0S 04 04 :24 
SF ЕС СЭ DD FE йй CE ZF 57 :31 2606 2Б DE йй 27 CD CI 0321 :DC 2049 04 58 йй FF FF FF йй йй 21 
ASF TE ЕБ Fü ЯҒ BF ЯР üF 32 1C 2608 28 ZR 11 75 01 61 ӘБ йй :CF 2р4з 01 01 82 ВІ û3 04 2 92:11 
RTR 2B1 ロ Ер ЕЙ 11 Ez 3A 21 ОҒ Dü :EA грей 05 03 02 04 04 A4 04 Әй :99 
j 2518 CD 69 29 21 ІС @1 2271 130 2055 ай йй йй FF FF FF ЕЕ FF :ҒЕ 
z626 11 CD ES 69 FE #7 CA йй :69 грей FE FE FE FE #2 ûl #1 2 :FE 
2628 28 CS йй йй FD 21 35 4й :D6 zD6S 02 dê 02 02 ар SQ Өй FF :59 
>Б5а FD ZE Bü FE 21 CR 47 ба AF 2рғй FF ай 01 HZ 04 05 Aé AF 13 
HDD әй +i + +3 +4 +5 +6 +7 SUM 2633 FD EE i FD вв ü2 22 Al :34 2078 43 BR #2 йт ӨЗ 04 05 06 :29 
зай Cé 05 C3 47 Ев Ға ЯҒ ЯҒ :CF z646 11 СО 44 ай BE 05 Ср 84 :7С || --------------------------------- 
2заз AF ЯҒ 22 AC 2В 78 EE ЯҒ :94 2648 26 FD 22 FD 22 Ер 22 18 A3 SUM 28 ЭРЕ 16 92 1E 1С 21 ЯЗ 165 
<d1 22 HE EE СЭ DD 2A ЭС 2E :9F z656 СЕ 44 40 21 йй Өй ЗЕ 1й OF 
2918 DD 23 DD 22 9С 26 DD 2A Ср 2Б58 29 ЕЕ ED БЯ EE 36 04 03:42 
2324 ЭС 2Б SH ЗЕ 26 00 ТЕ йй :15 2Бей 30 681 15 3D C2 58 2B СЭ :8Е 
2928 84 ë? DD ТЕ 28 85 EF DD :3F 2668 05 C5 E5 2A 98 2B 11 09 :86 ADD +0 +1 +2 +3 +4 +5 +6 +? SUM 
2930 4E 50 CE ZD Zü й1 ӘС CE :BE 2670 SD Ср 51 ZE 26 22 98 2B :96 2060 ПЕ 06 06 8й йй FF FF FE :8E 
2958 SC Зӣ 02 øC ас CD бє ZA 83 2678 6С 26 Өй 01 CD 51 2B 7C :28 zDSS FD FC FC FB FR F9 ҒӘ FE :D4 
2940 ES 21 58 30 СВ 21 06 98 (88 || --------------------------------- 2рәй 02 02 й2 øi 回 1 йй йй йй AR 
2945 09 SE 25 së 05 2A Эн 2E A4 19 2092 ай әй ай йй йй й1 #2 AJ :26 
2950 11 FE 45 CD AG йр CO 69 AS ¿DAG AS йу йэ ӘБ Әр 18 HZ BZ :42 
2955 29 Di El 22 эй 2E ES DS :7С 2га 04 Bs йу йв SB û2 йб ай : ва 
z960 Ер 21 FE 43 CD C5 29 D1 :ЕЗ 2060 йй FF FF FF Bü йй й] A1 :FF 
23968 El 1A 15 FE 8 28 HE FE :ED ACD әй +1 +Z +3 +4 +5 +6 +7 SUM z#DBS FF FD FE Ға #2 аг 03 аз :F3 
2378 ГЕ 28 ЯҒ FE Әр CS 77 22 :22 2В8@ 3C C1 01 СЭ CD HE BD 10 :27 zDCü üz 81 ра йй йй BR йй FF :82 
2978 18 EF 1A 12 4F QE йй йэ :92 2638 FE СО. 1Е йй Cü CD 47 йй IBA 2065 FF FF йй йй BZ û4 ü? ØA :15 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 2696 C3 ай йй йй йй йй йй ай CT zDD йр іп 62 02 #5 03 05 ӨР :22 
2Бэз ай йй ой йй йй йй йй йй AA 2006 йв аа 0S ба 04 A4 йб Яс ER 
ZEAd йй 回 回 ва ва ва йй ра йй :йй =DE ӨС ЯС 18 18 14 14 18 18 :90 
2Ене Bü йй ий йй йй йй йй FF :FF ALES 18 14 10 OC BS #4 13 13 :5Е 
2БЕй Өй йй йй йй йй ой йй FF :7F DF із вй йй йй FF FE FD FC :8Е 
ADE +4 +1 +Z +3 +4 +5 +6 +7 SUM ZEEE FF FE ЕЕ FD FD ЕС FD йй :EE =DFS FB FA F3 F3 ГЕ û3 ûC ЯҒ :88 
z956 18 ЕРІН 15 ЗЕ 06 йй B? :38 2ЕСй 回 さ Bë #4 05 UE BS #4 65:24 || --------------------------------- 
2985 Ер 42 із DD 21 75 01 18 :A3 ZECS 02 02 02 бй йй 81 01 AZ GA SUM СБ ЗЕ 51 1C B4 BD 56 D4 :81 
29360 08 1A 15 FE Әй 28 AB FE :Б4 ZEDO й2 #5 03 04 #5 йй FD FA :06 
2998 ГЕ 22 OD FE OD C8 77 23 :20 ГЕСЕ 04 03 BZ AS A4 65 Bë й6 0:21 
z900 18 EF CD Ба 23 û3 18 ЕЗ : Б? 2БЕП 66 &й йй FF FE FD FC ЕБ :77 
2908 CD Ба 23 B? Ер 42 ІЗ El :85 ЕЕЗ FA Fš ҒӘ FR FD йй 84 UE EC НОС +ӣ +1 +2 45 +4 +5 әб +7 SUM 
z966 ІН 15 йе øi FE 1E 38 A3 SE ЕРЙ Т ӘР 06 й5 A4 04 04 бй AS 2Е0Өй 11 15 15 16 17 18 19 ІН РІ 
2969 04 DE 25 28 #4 15 F5 СЕ :11 ГЕРЕ Bü 681 HZ 02 04 #5 ЙБ йй :10 2E0608 1B 1С-1р 1E 1E HE 1F IF ЕС 
290 Әр 10 FC АҒ СӘ ІП 13 FE 215C || --------------------------------- <E1 IF iF iF ea йй йй Bü аі DE 
AACS SQ 28 15 FE ?E 28 25 FE :82 2Е18 81 02 AZ ӨЗ 03 04 ТЕ ҒӘ :86 
гэрӣ ар 20 04 FD 77 йй СӘ ТЕ : ЕС 2Е20 F8 F3 F? F? Fé Fé FS FS :B4 
A903 25 FD 77 0G FD 25 18 E5 :B4 :Е26 F4 F4 FS Fš F2 F2 F2 F2 :96 
2ЗЕй FD 77 йй Ер 22 1A 12 FD :EE ГЕЗИ F2 Ғр F2 ЕІ F2 Sñ йй йй 3A 
23E8 гг йй FD 25 86 йй 4F йэ :Р5 ADD +B +1 +2 +3 +4 +5 +6- +? SIM 2Е58 01 82 05 84 05 й6 й7 05 :24 
2эғв 18 D3 FD rr йй FD 25 ІН :95 CHE ау 06 йз ай 04 02 01 а] :15 2Е4й ГЕ FS FE EF ED EE ЕЗ ES :FD 
ЭРЕ 13 FD гг MA FD 25 #6 Bü AD ZA 02 03 #4 04 04 бй йй FF :3m 2Е48 EZ EE ES E4 ЕЗ Е2 El Еа :1C 
р БЫР КА КЕРСЕЙЕ РЧ из cet i ныи оние Араас та 2С1@ РЕ FD FC FR FS FE Fé FF СС <ES Ей Ей DF DF DF СЕ DF Sg :9Б 
2С18 Fš FA 04 #6 05 A3 йа øF :1C 2Е5е ҒҒ FE FC FA FE F5 Ғ2 EF :С1 
2Сс2й 06 й& йє ай йй йй йй йй :32 2Е60 ЕС ЕЭ 7E FS F2 ЕР ЕС ЕН igg 
マビ ゼロ ПИ ба йй ва йй ра йй йй :йй 2Е68 ЕВ E? EE Eé ES E5 ЕБ ЕЗ :33 
マビ 3 回 04 04 04 4ت 04 4ت‎ A4 04 :FA 2ЕРЙ ЕН ЕС ЕЕ Ға Fz F4 Ғе Ға 1:88 
CI 04 ай йй FF FF FE ЕЕ FD :?Б 2ЕУВ Fe 24 04 ü4 йз øS ЯС AC AC 
гс4й FD FC ЕС FE FE FA 84 #5 :EE || --------------------------------- 
2045 05 05 й& ЙБ ВЕ ME 06 ой A SUM 25 29 SR 13 8F 19 13 2F +85 
LSE йй 81 81 #2 йг йз BZ 04:10 
zc 84 #5 05 йе #4 03 йз 02:21 
2С6ӣ 82 ат 02 й2 йг Әй йй FF :29 
ALOR FE FD FC FE FR FZ FF FE :D1 Нос +0 +1 +2 45 +4 45 +6 +7 сац 
Cr FS Ға #4 BS ЯБ йР AF 0B AE 2E80 18 10 14 14 ГЕ 10 10 UC :F2 
Ure вв йб AS бй йй A 03 :9Е ZE BC BS 03 04 04 йй ой ва :2 
а а а аа ао А SS ZE ой йй йй йй ий йй йй йй : па 
2Езз өй йй 10 Ей ҒҒ FE FC FR :90 
<EHH Fë FS FE EF EC ЕЗ FE Fé :17 
ZERE FZ EF EC EE ЕБ EB ЕС ED 67 
<EE ЕЕ EF Еі Fš FS Е? ЕЗ FE :Я1 
2ЕБе FD FE ҒӘ Ға Ға 82 1 BZ :66 
SE 05 04 85 йе 7 05 йэ OA まさ は 
zECS TE AS 0S #4 02 04 01 йй :34 
алақан ышы с ық арады Ла АША ады аты ED 01 йт 081 йй ҒҒ Өй FF FE :йй 
2EDE FE FD FD FC ЕС FB FB 81:67 
2ЕЕй йі 03 йБ ӨН ЯҒ 15 13 IF :70 
ZEEE 1F Sa FF FE ЕС FR F8 FS :?F 
ZEFü FE EF ЕР SF 04 04 йз 68 :77 
(O) AO) ぁ 一 年 ほど 昔 の ピオ ピオ を みた の で す が ,「 ア ニ メ の CG な ど や ろう と 思え ば 誰 に で も で きる 」 と いう よう な 意見 が 載っ つて いま し た . それ で , 
©, Ол % 今 を う 考 えて いる 人 に ちょ っ と 私 の 考え を 聞い て も らい だ た いと 思い ます . つま り 「 や ろう と 思え ば 誰 に で も で きる 」 と いう こと は 。 や ろう と 
5-- 思わ な けれ ば 誰 も で き な い と いう こと な の で す . 一 生 懸 命 に な っ た も の は , た と え し ょ ー も な いも の で も 自慢 する 価値 は ある と 思い ます . 頭 


98 5544 で 考え て いる だ け の も の より も 素 晴 し いし , 頭 で 考 えた の より よほど 難し いと 思い ます . あな だ が BASIC を 始め て 知っ て 作っ た PRINT 文 だ 


9i0 


BATTING マシ ン 語 リス ト 


3120 ай 24 F2 FF ҒҒ Fi бй 25 :2 
5128 F2 Fl йр ТЕ 51 Fe FC F4 AF 
5128 80 24 Fš ЕЕ FF ҒҒ F4 80 :00 
дро о apa : Š 3138 23 Ға FF FF FF F5 80 23 :B2 
っ FI FS : 3140 F2 ҒҒ FF FF Fi 80 24 F2 :?6 
っ FE ей ÊÊ ; ) 5148 F3 Fi QD FE 29 FE FF FD :92 
2F1 ай ай Ё 34 04 05 Е 7 5158 50 24 FA FF FF FF Ғ5 8 :18 
“F13 ӨЗ йа Rñ: ; ; : 3158 23 FA FF FF FF FS 88 24 :B3 
2F2ü : 9 EF? ЕЗЕЗ cë 3160 ЕВ ҒҒ F? AD FE S@ FÜ FC :С4 
2F23 әй ас :6D 5168 ай 25 ЕЕ ҒҒ FF FD 88 24 :42 LIM 
Ей 5178 ҒҒ FF ҒҒ ҒҒ 88 24 FB FF :9A R 
әрә Е 5178 FF F? 88 25 ЕЗ F3 ロ D FE AC F 
дас өсем е О ПЕТИ IIE SEE 1 


2F48 
2ғ5й 


つの ل لا و‎ mom mm 
DANN 4 Ti ل“‎ HAr 


し ーー (Ya У) П РУ ГТ Р D p. [1 i Mt زیا‎ 
m ma x n GM Ti (4 ші (А 


3188 ҒҒ ҒҒ ҒҒ 80 24 FF ҒҒ ҒҒ :9Е 
5190 ҒҒ 80 24 Ғ2 ҒҒ ҒҒ Fi Әр :91 
3198 ?Е 51 FE ҒҒ FD 80 24 FE :66 
11889 FF ҒҒ ҒҒ FD 2M 22 ҒҒ ҒҒ :ЭБ 
5іңе ҒҒ ҒҒ ҒҒ 34 23 FB ҒҒ ҒҒ :99 
SIBO ҒҒ F? 98 24 FB ҒҒ F? QD :98 
: SUM 3168 TE 51 FE FC F4 88 24 ҒӘ :53 
: HĀ sico ҒҒ FF FF F4 80 23 ҒҒ FF T92 
йй 51С8 ҒҒ ҒҒ ҒҒ ӨЙ 23 ҒҒ ҒҒ ҒҒ :9р 
515) 5100 ҒҒ ҒҒ 80 23 F2 ҒҒ ҒҒ ҒҒ :90 
: 6E: 5105 F1 80 24 F2 ҒЗ Fi OD ?E :F6 
:52 11ЕЙ 51 ҒӘ FF ҒҒ F4 88 23 F3 :06 
: 36 51Е8 FF FF ҒҒ FF F4 вй 22 FA :8C s SU 
: 54 з5іҒа FF FF FF FF FS 80 22 F2 :85 : FE 
:Fü s1FS ҒҒ ҒҒ ҒҒ ҒҒ Fi 80 25 F2 :82 ір? 
ГӘЙр»; 11.2 mRNA 人 MK :5Е 
: 64 SUM SC 80 34 92 FC AD ES SD 8D :8R 
: 3Û 257 
:92 s R 
: 6A 2:97 
:92 ADD +й +1 +Z +3 +4 +5 +6 +? :5UM : па 
:6F 3200 FF FF Fi QD 7E SO FC FC :C2 ЭЕ 
:ЭБ 5208 80 25 FE ҒҒ ҒҒ FD 8й 25:41 12 
5218 FR ҒҒ FF ҒҒ FF FS Sg 22 :80 : Ra 
5218 FA FF FF ҒҒ ҒҒ F5 80 23 :8E ФЕ2 
3220 FB FF ҒҒ F? ӨЙ 25 F3 Fš :7B : DC 
5223 Өр TE 79 FG FC F4 88 24 :90 :72 
z236 РЕ FF ҒҒ ҒҒ FD 88 22 Fš :92 : E 
› +3 ' Е, 5258 FF ҒҒ FF ҒҒ ҒҒ F4 ёй 21 :30 : R2 
5000 65 ZF FF : ; 7H 2 1240 FA ҒҒ ҒҒ ҒҒ FF ҒҒ FS 58 :ëHR 
3003 ЕС 2 м Sp 08 1 5 2 に 5248 21 Ғ? FF ҒҒ ҒҒ ҒҒ ҒҒ Fi :ҒҒ 
30108 992 2 F ЭС; С 3250 Әй 22 FE ҒҒ ҒҒ ҒҒ F 80:11 
54818 : ЗЕ 5258 24 F2 F3 FI 00 7E 52 ҒӘ CF 
TEZE 17 526й FE ҒҒ FD F4 Süñ 23 ҒҒ ҒҒ : ЗЕ 
21828 : CE 5268 FF FF ҒҒ 8й 22 FA ҒҒ FF :9? 
TATE : 3E 52708 ҒҒ FF ҒҒ FS 88 21 FR FF :8С 
56058 11 3278 FF FF ҒҒ ҒҒ FS 88 22 ҒҒ :92 
3 回 回 5 067 || ean as 
1045 6 Ср SUM 22 ЭЕ 43 40 14 FD ЕЗ 79 ‘D8 :са 
:FD : 0G 
:54 515) 
: 7E A 
:ЕҖ ADD +@ +1 +2 +3 +4 +5 +6 +? SUM : ビビ 
: BE 3280 FF FF FF ҒҒ 80 23 F2 ЕВ :8С : DA 
‘iD 5288 РЕ Fr Fi øD ?Е 78 ЕС FC :EZ :ға 
3230 әй 24 Ға FF ҒҒ ҒҒ ҒҒ F4 :8С “ЕН 
5298 80 22 FE ҒҒ ҒҒ ҒҒ ҒҒ FD :99 :84 
52808 80 22 ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ :9С :21 
3288 60 22 FB ҒҒ ҒҒ ҒҒ ҒҒ F7 :90 :A4 
52рй ва ZZ Fa ҒҒ FF ҒҒ FF Fi 81 255 
: 5U 3268 80 24 F3 F3 00 7E 51 FC :62 :43 
:F8 SACO FF FF FC 858 23 FR ҒҒ РЕ :95 
3 37 52С8 ҒҒ ҒҒ FS 80 22 ҒҒ ҒҒ ҒҒ :92 
:85 1208 FF ҒҒ ҒҒ Sg 22 ҒҒ ҒҒ ҒҒ :9C 
: 日 5208 ҒҒ ҒҒ ҒҒ 80 22 FR ҒҒ ҒҒ :97 
: 5A 52Ей FF FF FS 80 23 F3 ҒҒ FF :87 
: R? SAE F3 AD 4E 4С 80 26 éF EE :1A : SU 
: 3E: 52Ға 00 ар 59 75 80 26 79 79 :6й : ?ñ 
: 38 Fe 80 26 ГЭ ГЭ 88 26 EF EE :1Е : RC 
ae : 3D 
:22 SUM тэ 81 HE E4 32 ЕБ SC 16 :18 : BF 
s 36 : ES 
:92 : CE: 
1:43 :72 
НЕЕ, ALD +A +1 +2 +3 +4 +5 +6 +? :5UM :02 
: 3A 3300 ар 58 78 78 4С BB 24 54 :59 :5й 
241 z308 78 で EE AD 4B 54 4C BB :B6 : RE: 
ささ 1 ロ 25 79 OO 79 8й 25 79 йа :55 : 0A 
3318 79 80 25 79 AO 79 S0 25 :Е5 : ба 
5528 зз ай 35 ва 25 7р ӨЙ 75 :05 : | 
5528 00 76 ға ға 70 70 70 ЗӢ :ЕЗ : BË 
3330 74 34 бй 1F 71 80 27 42 A1 515) 
5558 SA SA SA SA 5A 7C 58 78 :ЕЕ 
3340 AD ва 2A CF BB 27 72 4D :ЕС 


け の プロ グラ ム は うれ し 〈 く ありま せん で し た だ か? 意見 待ち ます . (603878) 
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p: G 


BATTING マシ ン 語 リス ト 
3578 Bü Bú 


5788 7B SH 26 4E 7 
5790 Өр FE ЭЕ 30 77 88 27 77 
5796 77 80 27 777? 
SPAM 25 SB 40 4E 77 80 25 42 
JAS 56 йй F 
S760 са 24 па 3D па 71 S0 25 
JBS бй 43 27 
SLO 26 2 
š?C8 27 QA йр 7E 20 ЗС 80 25 
Sr SB 40 ЗБ Әй 25 3D 7A SB 
TO эв 
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ма i a O OD 
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FT 
© т от оз 00 ~J (Y t N O r TI 5 


Qha TI + К [T] 4 D КЕК mA wn 
кеі + NATAN Ti زم‎ ГУ шщ шт гс 


3820 26 


3828 26 


Сә 
[кч 
(ы 
со 
[кл] 
“з 
[эў] 
[кл] 
[кч] 
Ж DN + ж ^ 
” 22 ҒА 
02 
m 


Ti DD Кк, Кук —‏ 1 لا لا P‏ تر 


гу 
“J CT, CO m の 


Ë 
4 
2 ADD. +0 +1 +2 43 +4 +5 +6 +7 ¿SUM 
F JAGE ай йй йй BD Bü Së ЕС BE AFR 
A JAGS 95 Bü HE AC HE йй йй ар AH 
3H1 EE HZ ЗЕ A4 AE йй 21 EE CE 
9€ 3 さ H1G HE Ез йй BD ой 45 йй йй AC 
JASE Bü йй 回 回 回 回 ой ой ий Bü : аа 
JA26 Bü ар йй йй аг ği ар AS :27 
ЗЯТЯ Hd 15 #5 14 Bü BD 56 йй EF 
: SUM SASS ой йй Sa 24 AF йй Bü Bü :4Б 
:БЕ JA46 S6 24 22 өй йй йй Sa 24 :DH 
43 3A42 2F EC ой йй йй Өр Rë SA Të 
: 34 SASO 27 83 ӘЙ 27 92 80 27 BZ 111 
:B1 JASS ЕС өй 26 йй 86 27 йй AD lë 
:8й JAGGE ЭН йй ий яй ой 24 A3 pü EF 
:СЕ SAS йй йй: 28 24 ав йй йй HA AC 
: 03 SAFO Әй 25 ай йй йй йй са 25 148 
: 36 JATS RZ йа 回 回 йй ой 24 AE Bü F4 
ІРР || --------------------------------- 
:1Е 
:E1 
HE 


0 02 + Ш ПК 0 ПП н С 7. 20) 07. o m ú 
єптї O p. ч DO TI геп -.J rm r? cn — 


5858 г ADOD әй +1 +Z +3 +4 +5 +6 +7 UM 

3870 13 нб йа йй BD 34 Әй 27 AE бй :76 

3878 С SASS 27 88 50 27 йй ай 27 BZ :9F 

--------------------------------- HAA $ø 27 HE BD 96 ЕС ӘР ЕС HF 

SUM :44 SAAS He Өй E4 ü SE HE ёй EF :55 
JAAG EF ЕЕ йй ЕР ió ЕР S6 СЕ 220 
JAAS ЭС BC ЕР En йй Ed йй 32 :аг 
SABE HE GA ЕР EF йй 16 25 94 SE 

ADC 44 +é +7 SUM ЗАЕС ЕС 25 Яр ба йй йй йй йй :4E 

вай ий z6 00 :4C JACO ой да 回 回 йй яй ва йй HA : да 

5888 йй 00 58а : 26 JACS яй йй йй ва ва Әй СЕ йй EE 

Бэй әй ай BB CA さ HD ба ай йй ра ва йй йй йй : Ağ 

5898 йй 60 24:42 HS ой йй 回 回 ой ий ой йй йй : да 

зена й 22 ой Bü EF さぶ HE Өй ВГ ЭН ӘР БС йй ӘБ Bü : 79 

SEAS РС 5С 80 20 36 CB ERES ЭС EC EF Ей йй EF EF EF :04 

58Ей ра 00 3C ЗЯ CF :B5 ай Е? Ег BD 26 2A AD :B3 

3868 8 Йй Zü ЗА 56 HÛ :4F c5 Ё С ай 55 йй : as 

ICA й z6 яй 回 回 BD 3C EF || --------------------------------- 

Се 36 36 36 IC ЗС 80 21 OD а 

5200 3D 72 VO 75 72 ТИ 73 PE :58 

38DS8 ca 20 20 71 йй ZD 71 йй :ЕС 

SARO 5р 71 88 28 50 22 36 35:26 

38ES 52 5С 33 71 Өй 2й Яр йй : БЕ нор ñ +2 

ЗРЯ уй ға ға уй га га йр SC :E9 ZEGG Bü БЕ 

3S8F8 5С 00 80 24 3D 72 73 71 :72 SEE 19 67 ай < 

--------------------------------- 3E1 ай йй EF Б 515 

SUM 53 Dü ЕБ ОР 66 49 21 5й AS 3613 34 EE 55 7 ; z 
SEZA ЗЯ йг йй 01 йй 14 йй a5 
35625 яй вз йй üE йй аг ğü :ЕБ 
Z36306 ЭС ЕС ЕЕ Е ар GC :Е5 


бср o оо C wD T Өз P. — + 
СЕС CR A TI Cn = ПЕЛ СЙ у 


Бе Cn Ta 07 D ¿n の‏ ا 
A Cn n OO し T G. cn‏ 


ACD +8 +] +2 +3 +4 +5 +É +7 UH ES E 

3300 Әй B 23 3D 32 33 71 йй :B6 В: ай 

3338 Әй 23 Әй га га йй бй 24 :27 ЄЗ 

3310 ба йй йй бй йа за 22 Өй Az ЕС 

3918 Әй йй ай йй ар ва 13 ас :23 es 

3920 й1 19 ай йл l ЯС ûC йй :35 ë 

3928 0р йй AC ñE BC HE GA AZ :71 EF 

3930 ЕВ A2 ЕЗ ай Әр 96 Ез BE і2Б üs 

3938 81 ЭЕ ВЕ йй 22 û4 91 55 :1Е 56 

3000 А ОИ 8842 ОЗИ БН МЕ; || EDED SEO KD aa mmm kaa 

3948 99 84 E3 A4 Әр йа йй йй :31 

3350 Әй эв 99 24 99 йй йй йй idE 

3958 Өр йй йй AZ BE AZ йй AA :БЯ 

3960 ВС EF PE йй Әр ай pü 32 Cg 

3968 5С ВЕ йй AZ A4 95 йй йй :25 нор 

3970 Әб йй эг EC BB 95 BC йй të 5880 EC 

5978 HH EC БЕ НЕ Әр 94 SF A2 :ñSs に っ ーー Š йл € 

eS ال‎ S'E , 

z >r 3A ES SE AS C4 Әр :Eš 3695 E E БЕ ЕР BEE 

TE ыйын ыйыы айыыны o 56 3BHG 21 0D EE ЄВ 80 A4 ЭН йй :42 
ZBAS 91 85 BE 99 88 EC AB BE 10C 
Звва бй эй эң AD 25 йй EE EE :32 

š Шаа РУ Z662 Зӣ Ға 8й 7р йй SA 2? AA :14 

за. РА 3ECg 08 өр SD A4 85 81 92 ВС :92 

3328 не BB BC Әй 92 :E? ЗЕСЗ SE НЕ EF ér OF 67 ей 44 19C 

5990 әз йр йй йй ай :20 SEDE ЭН 87 БС йй НЕ ûû EF EF :й6 

5998 EF ñE йй йй йй :DZ eo EF 67 ЙЕ 65 OD 65 00 25 55 

3980 йй 86 Яг 92 8? :55 де руба б 

3388 Әй зӣ 45 йй A2 :22 50 41:84 

39B 9 Я HH BC EF HE :C3 фо АДАЙ 

39B8 Ê 96 BS EE 21 ЗЕ :56 25 90 264 

зэсй -A ТИИ Иреге a E a Сека: 


p 4 月 号 p.150 の 芸 武 達人 さん へ . 1/O デ プラザ の VIC-1001 の 読み 方 本 当 に 懐か し いで すね ./ あの ころ の IO は まだ 薄く て , PiO 今 月 号 よ り 少 
し ば か り 厚 いと いっ た 程度 で し た が , 今 で は 学校 に 1/O を 持っ て 行こ うと する と カバ ン に 教科 書 が 入ら な く な っ た だ たり …. 今後 PIO も どん どん 
厚く な っ て いく の で し ょ うか 心配 で す . と ころ で 芸 武 達人 きん は PC-6001 の ユー ザー な の で し ょ う ? お 互い 頑張 り ま し ょ う 。 これ か 6 ら ば 
ん ば ん プロ グラ ム を 書き まく る の で 応援 し て くだ さき さい ノ / 


(あっ ぷる TEA) 
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BATTING マシ ン 語 リス ト 


ADD ЕТІ ЗЕБ 52 52 32 52 52 52 32 52 :9й даңа Е 8 
ICAA « : 5 ZE68 52 3C TE û2 йй йй йй TE 166 4403 8 
ICAS G 24? 3E @й йй Әй 3Û ED ED 71 ûû :238 4GB 12 
18 2 T ЗЕТЕ SR SR SA SA SA SA SA SA iD 4068 ё 
3018 вә || --------------------------------- 4аса E 
3CAR 5 :5Е SUM Ер DR 94 DB 2Б 83 1F 54:57 408 
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3C38 8 ADD +û +1 +2 +3 +4 +5 +6 +? :3LM 
2248 € 3E89 SA SR SA SA 36 36 56 36 :40 
5248 3Е88 56 36 36 36 36 36 36 36 BO 
СУЙ 3E90 56 36 7B ØF BB йй G SA :5й 
єг с 1 
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й 
КЕЗЕНІ 
る EE ой йа ой йй йй йй йй йй : па 
ZEBE Өй ай SA SA SA SA SA 58-216 | 
ЗЕСО SA 58 SR SR SA SA 5A SADO 4180 
ЗЕСЕ 43 Өй EZ ЭБ 95 25 эз йй :12 4188 2 B 
ZEDO 05 ай 43 43 70 Fa та FA :43 4118 НЕ 
' ЗЕГЕ ТИ та та ?й уа Үй Tü FA 38 4118 F 1 
+1 Ж +6 +7 ЗЕЕ 70 ға 45 йй йз Ор ØF йй :65 4128 ЗС 
ай: › Bü НС HE EL : ZEE 45 45 Өй ій û23 ЯҒ йй 43 :F1 4128 6 ай 
йй 2 24 зе йй: ZEFü ГИ та FA Fa тй FA FA тй GE 4158 28 
BC = ай эр 91 SR і5 ЗЕРЕ 70 тй тй 7?ü 70 та үй 7A 2E 4158 SD 
ай s AG ӘР 95 OD 11 CS RE 41408; : 
ви 2 НГ ЕС НЕ :85 SUNE ТТ 51 25 ЭЕ ЗЕ 55 5С 51 :69 4148 
2% дй HE 23 :8Н 415й 
а? Ei 95 84 :3С 
ва: йй 94 85 :СЭ ADD әй +1 +2 +3 +4 +5 +ë +7 UM 
а? ар EC EF :07 5ҒӨй Үй га Ұй Үй ҮЙ га га ҮЙ 38 
ай = コマ ор 32 EE 5ғав ТИ 7A ТИ TA тй тй FA тй 180 
аш ше ов OM aC さ F1 70 78 70 70 ZÜ 70 га га 98 
34 EC Еі 8 DE 5Ғіз B AG 77 Әй 28 77 бй ӨҢ 240 
ә? 93 HH EC :53 ЗЕ2@ ЗС 7С 28 78 34 74 30 га :Ва 
HE ай ӘС HE EF ЗР26 ТА 70 20 74 24 78 538 7C EE 
ай > ӘБ әр 94 :92 ЗЕЗ@ ZC ва ОЯ 76 йй йй 77 AB E3 ご 
Б1 - Bñ БЕ Ба :05 SFI さじ 7C 58 78-34 74 20 20 (ЕЙ に 
さ F4 ロ вй 11 7а Zü 74 24 72 55 1:89 46 
ЗЕ48 ТС ZC Өй 76 йй йй йй йй :2Е SH 
3F50 42 80 21 56 Зӣ 06 77 88 :B6 51 
ЗЕ58 1F 76 SB BS 77 SB 10 76 AF >< 
5Ғей ай AA FF Әй 1Е 76 Zü ӨС : ЗЕ 24 
рай š С 3F68 77 24 19 TE Өй ВЕ 77 20 :BE ЗЕ 
ZpS 85 # 5 5ғуа 17 76 ар га 2а ов гой 20 DA ЕН 
рій 9 2 5ғ?а әй 10 28 20 Zü 28 TA 7A :FD :14 
3015 8 OR. EO EEE Ol ыннан ле метке йе века меде жеде 555 
5рәй Ë ñ SUM E3 58 ЗЕ 84 SA AS ТІ Bü :55 2, 
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ZECH 79 1 2 43 : 3C 4000 AE Hü Ер EM ü1 ВЕ әй йз 225 ас 
3DC8 SC 73 78 73 ой :91 4888 11 74 Di Q@1 ЙЕ өй ED Bü :а2 СЕ 
5рра 2 з 15 18 81 Ta 3F 3818 81 BE ба йэ HE 85 C3 54 :58 РС 
ZELS а? EC БЕ Э AA = 38128 ZE ЯЙ ай ай ай ай аа йй 26 
2рЕй HE 58 16 73 3828 сой йй ай йй йй йй Fš FE FÈ 
27 x 80 : йй 
H F FF 
F F йй 
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: SUM 34 БЯ SF AS EG ГӘ FE 16 ¿BC 

: BE 

РЕ ADOD +0 +1 +2 +3 +4 +5 +6 +7 0M 

124 4080 FC FE Bü Ға Fë Ға FC Fi Ср 

: EE 4888 ой па йй ай йа ий йй ав : а 

КЕ 4422 өй әй йй йй йй BE SC ӘП :71 
Ыр Рі EE а 4895 04 ЭС ВЯ 04 ЕС 88 BE Fü 235 


MZ-2200/2000 


WICS 十 マシン 語 


LASER 


су CEL ye 2.0 


あな た は 敵 の 基地 に 侵入 し , 敵 基 地 の 防 
御 シ ステ ム ・ コ ント ロー ラー の 破壊 に 成功 
し まし た が , コン トロ ー ル が きか な く な っ 


た レー ザー 砲 が 乱射 し 始め て し まい まし た . 


あな た は , この 中 を 小型 飛行 艇 ホエー ル 
で 脱出 を 試み まし た . 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


WICS 
マシ <a B000~B0A7 


EP 

| ゲー ム の 基本 と し て は まあ まあ で す 
| が , 全体 的 に は まだ まだ 工夫 し て ほ 
し い 点 が あり ます ね . ` (O) 


"この プロ グラ ム は WICS て 書い て あ る の 


С, まず WICS を 超 動 し て ツー ス ・ リ スト 
(リリ RF ТУЖ ЖАЛ С ОА ТАҒЫ Т; 
コン パイ ラ で 次 の よう に コン パイ ル し て < 
е a ka, 

Source Program : $4800 

Object Program : $ 2700 

Working area : $FOOO 

そし て , これ を モニ タ TS-2000 で モー プ 
U Ç ç i 

次 に TS-2000 で デー タ 部 (リス ト 2) FA 
Л (А таға る の の 系 に 

表 1 変数 表 


ホエー ル の キャ ラク タ ・ デ ー タ 
レー ザー 砲 ( 上 ) キ ャ ラク タ ・ デ ー タ 
レー ザー 砲 ( 下 ) キ ャ ラク タ ・ デ ー タ 

面 数 

レー ザー 砲 の 数 一 1 

レー ザー を 出す まで の カウ ント 
レー ザー 砲 の X 座 標 


レー ザー 砲 が 上 に ある か 下 に ある か 
レー ザー 光線 の 位置 


) ホエー ル の 位置 


レー ザー 光線 の 数 
天井 の 位置 
ハイ ・ ス コア 
スコ ア 

持ち 時 間 


p 世間 知ら ず の 友人 N に CG の 意味 を 聞か れ た の で , 


"LASER DATA” と いう ファ イル ネー ム 
Жтт ш OR SAY 


TS- -2000 C J27OO[ RETURN |. ' `+ 2 Т, 


デー タダ が な いと き は ロー ド し て , 登場 キャ 
ラク タ 2 つ の 紹介 画面 が 表示 る れ ま す . こ 
= [SPACE | キー を 押す と し ば ら ぐ し て 
ゲー ム 画 面 が 表 わ れ る の で , ゲー ム を 始め 
る 用 意 が で きだ ら 何 か が キー を 押し て 〈 く だ きる 
pO 


ホエー ル は , |4| キ ー で 後進, (6|%-<с 


前 進 し, | SPACE | キー を 押す と 上 昇 , 離 


す と 下降 し ます . += Ear 
レー ザー 光線 の 間 を か い 港 り , 右端 の 
о ээй 
クリ ア で , 持ち 時 間 の 残り が 得点 に 加え ら 6 
С 

を し て , 面 が 進む に つれ 上 下 の 幅 も 狭 ま 
り , 砲台 の 数 が 増え て いき ます . 

な お , 回 り 9 の 壁 に ぶつ か っ て も ホエー ル 
は 爆発 し て し まい ます . 


表 2 アド レス ・ マ ッ プ 


「 ク ラッ シュ ギャ ルズ 」 の 略 だ と し っ か り 教 えて や っ た . 


wb q q АЙ А ТА ТА ШАК ШЕТ ШК ШИ 


5010 行 か кеттерге 7%, 
[6], [SPACE | キー の 入力 を 調べ さて いま す . 
10112 行 は デー タ を ロー ド す る だ た め の も の 
т. 


2 Оре?) ВЕР Э ЛІ, 
80 行 の 800 を 大 きく する と ゲー ム 速 度 が 遅 
く な り , 2020 行 の 10 を 大 きく すれ ば レー ザ 
ーー 光線 が 出 に くく な り ま す . 

単色 化す る に は , GRAPHO15 を GRA- 
PHO9 に し , PUT@ が 3 つ 並 ん で いる 所 を 
最後 の 1 行 だ び け に し て , その 第 6 パラ メー 
タタ を 3 か ら 1 に 変え ます . 

る さらに LIN 選 文 と CIRCLE 文 の 最後 の パパ 
Ra 
Сесе сес ТЕМА ады い = E o 


本 当 は , iDEN ID LHD 
の で す が , 腕 も な いし , デー タ ・ レ ュー ダ " 
も 調子 が おかしい ので 投稿 し て し まい まし 
だ . 次 回 は も っ と 凝っ だ た も の を と , いつ も 
思う の で あり ます . 

3 参考 文献 
1) ESH. 
月 号 

2) "WICS・BASE プ ブロ グラ ム 集 "。 工学 
社 


"MINE FIELD”, РіО, "84 年 7 


(知識 の PC Boys) 


но 


ポリ スト 1 LASER ソー ス ・ 


OO Y O O RUN 


J000 


5005 


5010 


3020 


"ЖХХХХХХ ХХХ ХХХ ЖЖ ХХХ 
5452; LASER ЖЖЖ 
“ЖҰЖ оп WICS ЖЖЖ 
“ЖЖЖ Ба рЕМЈІМ-М2 ЖЖЖ 
“Жжж ЖЖЖ 
“ЖЖЖ 1985.2. ЖЖЖ 
“ХХХХХХХХХ ХХ ХХХ ХХ ХХ ХХХ 


БЕ MAIN # 
GOSUE 10000 
GOSUE 12000 
GOSUE 1000 
GOSUE 2000 
GOSUE 3000 
GOSUR 5000 
GOSUE 3000 
FOR І=0 TO БВОО-МЖ20 
NEXT I:GOTO 40 
END 
“НЕЕ SCREEN ИИ Ф 
TI=300:G=INC(G): IF 6>9 THEN б-9 
М-ІМС(М):М-ІМС(М):ІҒ М>6 THEN N=7 
PRINT &&:CLS:GRAFH 00. 
CURSOR 12.10:РКІМТ "WAIT А MOMENT 


(-25/(М%1):ҒОК I=0 TO N 

COC 11=RND (5) +1 

UC 1]=RND(2) 

XTLIJ=(RND(K)+IkKK)x2+5 

LCC 11=0 

NEXT І ` 

XM=Z: YM=13: VYY=O 
LINE 0,18,659,16.5,1 
LINE 0,16,.0.199,5,1 
LINE 0.6%8-1,007.6%8-1.2.1 
LINE 0,.216-06%8,607,216-бЖ8,5,1 
LINE 607,24,607,87,3,1 
LINE 629,16.6539,199.5,1 
LINE 607,87,631,87,3,1 
LINE 651,87.651,128.5,1 
LINE 631,128,607,128,3,1 
LINE 607,128,607,191,5,1 
LINE 0,199,629,199,5,1 
PAINT 638,19,1 

FOR І-о TO N 

X=XT[ 11%8 
Y=G*B:IF ULIJ THEN Y=208-Y:GDTD 


PUTƏ Х.Ү.Х%15.Ү%7,СН1,1,1 
PUTƏ Х,Ү.Х%15,Ү%7.СН1%16,2.1 
FUTƏ Х.Ү.Х%15,Ү%7,СН1%22.2,1 
GOTO 1290 
РМТӘ Х.Ү,Х%15,Ү%7,СН2,1,1 
РОТӘ Х,Ү,Х4%15,Ү%7,СН2416.2,1 
РОТ? Х,Ү,Х%15,Ү%7,СН2%22,2.1 
МЕХТІ 
Х-ХМЖВ: Ү=ҮМЖВ 
FUTƏ Х-22,Ү.Х.Ү%7,СН,1,1 
РОТӘ Х-25,Ү.Х,Ү+7, сиы 
PUTƏ X-23, Y, X, Y+7, CH+48, Z, 
CURSOR 12.10:РКІМТ " 


CURSOR 
CURSOR 


O», O:PRINT " 
20.О:РКІМТ 
CURSOR 0.1:РКІМТ 
CURSOR 20.1:РКІМТ 
GRAPH 015 
КҮ=ІМКЕҮ: ІР KY=0 GOTO 1390 
ТІМЕ-О 
RETURN 
“ЖӘИЕ FIRE ! 
FOR I=Q TO N 
СОГ11-СОСГІ1-1:ІҒ COLIJ GOTO 2100 
COC 1J=10-RND (N) 
J1=1%S+LCL 11: SOUND 80,10 
ІСГІ1-І СГ11%1 
Y1=G648+8:IF ШІ11 THEN Ү1-215-Ү1 
Ү2-чҮ1%15-0Г11%30 
Х=ХТЕІЈЖ8+8 
LAI J11=¥Y1/8+UC[C 11 
LINE Х.Ү1.Х,Ү2,5,2 
NEXT І 
RETURN 
“ИЗЕН MOVE LASER ЖЕ 
FOR I=Q TO М 
IF ІСГІ1-О 
Х=ХТгІЈЖ8+8 
J1=I%5 


SCORE: ", 75, SC 
"LEBEL: ", ZZ, M 
"НІ-БСОКЕ:".%5.Н5 
"ТІМЕ:",%4.ТІ 


GOTO 3180 


リス ト 

3030 J=0 

3035 КЕРЕАТ 

3040 Үі-і АГ.11Ж8-0111 

3050 Y2=Y1+15-UL 11*30 

5055 LINE Х,Ү1.Х,Ү2,0.2 

5060 IF «Ү2>бЖВ-В) ЖҰҮ2<208-6ЖВ) GOTO 
3130 

3070 LCC IJ=LCCIJ-1:IF ІСІІ1-О GOTO 21 
70 

ово 20-1Ж5 

5090 FOR I2=1 ТО ІСГІ1 

5100 LAC JO+ エ モー1]=LRE JO+ 1 エピ ] 

5110 NEXT I2 

5120 GOTO 5040 

5130 Y1=Y1+8-UL[L IT]*16:LQEJ1]=Y1 / 日 +UI[ 11 
5140 ҮЗ-Ү1%15-МГІ1Ж%50 

5150 LINE Х.Ү1.,Х,Ү2.52,2 

5160 J1=INC(J1) 

5170 UNTIL INC(J)>=LCL I 

5180 NEXT I 

5200 ТІ1-ТІ-ТІМЕ 

5210 CURSOR 25,1:РКІМТ 74.ТІ1 

5280 FOR 2=0 TO 200: МЕХТ Z 

5500 GOSUE 4000 

5510 RETURN 

3999 Ж НЕ HIT ? ЖЖ 

4000 I=0 

4010 КЕРЕАТ 

4020 IF ХТГІ1>ХМ-1 I=N: GOTO 4140 

4030 IF ІСІГІ1-О GOTO 4140 

4040 IF ХТГІ1<ХМ-2 GOTO 4140 

4050 Ј=0:Ј1=ІЖжӘ 

4060 Ү1зі АГ212 

4070 IF UCI] GOTO 4110 

4080 Y2=Y1+1 

4090 IF (ҮМ>-шҮ1)Ж(ҮМ«<-Ү2) GOTO 8000 
4100 GOTO 4130 

4110 Y2=Y1-2 

4120 IF (ҮМ<Ү1) Ж(ҮМ>=Ү2) GOTO 8000 
4150 J1=INC(J1):IF ІМС(Л)<ІСГІ1 GOTO 4 
O60 

4140 UNTIL ІМС(І»>-М 

4150 RETURN 

Ж KEY SCAN Ж 

5000 VYY= МҮҮЗ1:УХ-О: VY=0 

5010 !(DEEB E6EO F612 DSEB DBEA Е610 CC 
L. 5050): “4 

5020 !(DBE8 E6EO F612 DSEB DBEA E640 СС 
L. 5070:76 

5030 !(DEEB E6EO F613 DZE8 DBEA E602 СС 
L. 5090) я" 

5057 IF ABS(VYY)<% GOTO 5500 

5040 VY=SGN(VYY) : УҮҮ=0: GOTO 5500 

5050 IF ХМ>5 THEN УХ--і1 

5060 RETURN 

5070 VX=1 

5080 RETURN 

5090 VYY=VYY-2 

5100 RETURN 

5499 ЖЕ МҮ MOVE ЖБ 

5500 X= XM*8: Y=YMx8 

5510 РОТЭ Х-25,Ү,Х,Ү+7, СН, 1,0 


5520 
5530 
5540 
5550 
| ا ا ا pæ‏ 
5560 
2570 
5580 
5590 
5600 
5610 
5620 
5630 
5640 
5650 
5655 
5660 
5670 
5680 
5690 
S700‏ 
5710 
5720 
5750 
5740 
5750 


РЦТӘ Х-22.Ү,Х.Ү%7,СН%24,2.0 
PUTƏ X-23, Ys Xs Y+7,CH+48, 3,0 
XM=XM+VX 
YM=YM+VY:IF XM>75 GOTO 6000 
IF (ҮМ<6) +(ҮМ>26-6) GOTO 8000 
X=XM*Bi Y=YM*B SOUND 25.10 
PUTƏ Х-25.Ү.Х.Ү%7,СН,1,1 
PUTS Х-22.Ү.Х.Ү%7.СН%24,2,1 
РИТӘ X-23, Ys Xs Y+7, CH+48,3, 1 
1=0 
REFEAT 

IF ХТГІ1>ХМ-1 I=N:GOTO 5770 

IF ХТГ1І1<ХМ-4 GOTO 5770 

IF (YM=G)*(UCIJ=0) GOTO 8000 

IF (YM=26-G)*ULIl GOTO 8000 

IF XTCIJ<XM-3 GOTO 5770 
SC=SC+10: CURSOR 9,0:РКІМТ %5,SC 

IF LCCIJ=0 GOTO 5770 
2-0:41-1%5 

Y1=LAEJ1] ` 

IF ULIl GOTO 5740 
Y2=Y1+1 
IF (ҮМ>-Ү1)%(ҮМ<-Ү2) GOTO 8000 
GOTO 5760 
Ү2=ү1-2 


IF (ҮМ<Ү1) Ж(ҮМ>=Ү2) БОТО 8000 


5760 
690 
5770 
5780 
5999 
60Q0O 
6010 
6020 
6030 
6040 
6050 
6060 
6070 
6080 
.6090 
6100 
6110 
6120 
6200 


J1=INC(J1):IF INC(J)<LCLIJ GOTO 5 


UNTIL INC(I)>N 
RETURN 
НЕ CLEAR ЖИЯР 
IF (ҮМ<11)%(ҮМ>15) GOTO 8000 
IF ХМ<79 GOTO 5560 
X=6 さ 2』 Ү=ҮМЖӨ 
FUTƏ Х-2325.Ү.Х.Ү47.СН,1.1 
РЦТӘ Х-22.Ү.Х.Ү%7.СН%24,2.1 
FUTƏ Х-22.Ү.Х.Ү%7.СН%48,2,1 
TI=TI-TIME: IF TI<=0 GOTO 6200 
REFEAT 
SC=SC+1:TI=TI-1:SOUND 80,10 
CURSOR 9,0: РКІМТ У5.5С 
CURSOR 25.1:РКІМТ %4.ТІ 
FOR I=O ТО 100:МЕХТ I 
UNTIL ТІсО 
ТЕМЕО 6:MUSIC 


"RICIFFGGA4#A2+CIH#AA 


AGGF 4R3" 


6210 
зоо 
TTT 
8000 
8010 
8020 
8030 
8040 
8060 
8070 


8170 


8180 
8190 
8200 
10000 
10010 


MUSIC "C3FF6GA4#A2+C3#AAAGGF 4R7 " 
GOTO 50 
НЕННЕ GAME ЕМО 888 
Х=ХМЖ8-12: Ү=ҮМЖ8+4 
FOR К-10 ТО ВО STEF 10 
CIRCLE X,Y,R,1,2:SOUND RX8, 10 
FOR I=0 ТО 500:МЕХТ І 
МЕХТ К 
FOR R=10 ТО ВО STEF 10 
CIRCLE Х.Ү.Б.0.2:50ММр R*10, 
FOR 1=0 ТО 500:МЕХТ І 
МЕХТ К 
FRINT %*é:GRAPH ПО 
IF 5С>Н6 THEN HS=SC 
CURSOR 10。12PRINT 


"НІ-5СОКЕ:",%5, 


CURSOR 13,13: 
ТЕМРО 6 
MUSIC " ビ さ FF6G さ 人 ロ オ ビ キ オド さ +D さ + じ 5+D さ F ミ F5G 


PRINT "5СОКЕ:".%5.5С 


MUSIC "AS+D+C6+D3+F +D+C+D+CA+CAFAG 


CURSOR 10,20: РКІМТ "FUSH ANY KEY ! 
KY=INKEY 

IF КҮ=0 GOTO 8180 

GOTO 20 
ННН INITIALIZE ӘР 

рІМ=%Вв000: СН=рІМ: СН1і =СН+24ж5: СН2=С 


Н1%16Ж3 


10020 
10020 
10100 
10110 
10111 
10112 


СО=СНн2+16ж35: 0=С0+10 

XT=U+10: LC=XT+10: LA=LC+10 

HS=0 

A=0:FOR ІсО TO 10:А-АЗСНГ1І1:МЕХТ І 
IF А-1574 GOTO 10200 

t (11 L. 1011% ЕҒ2В DA L. 10115 EEFI 


рА.1..10115):60Т0 10200 


10113 
10115 
10200 
11999 
12000 
12010 
12020 
12030 
12040 
12050 
12060 


! ("LASER DATA"OD) 
РКІМТ /."ВКЕАК !": END 
RETURN 
ЕЕЕ START ЖЕНЕ 

=2: M=0:N=3: SC=0 

PRINT %11.%6:С15 
GRAFH O15 

FUTD 48.22,71.529.СН,1,1 
РОТӘ 48. 32,71,39, CH+24, 2,1 
FUTS 48,32,71, 39, CH+48, 3,1 
CURSOR 5,4:РК1МТ "WHALE 


EJI” 


12070 
12080 
12090 


"+ " 
"СЗРАСЕЈ " 
"ГӘРАСЕ2 7 オメ ト 


CURSOR 
CURSOR 
CURSOR 


21.5:РКІМТ 
18, 5: РКІМТ 
14,10: ҒКІМТ 


HE jp 上 "و‎ 


12100 
12110 
12120 
12130 


CURSOR 14.11:РКІМТ "リナ ネト 227 ыты" 
РЦОТӘ 48,120.65,127.СН2.1,1 

РЦОТӘ 48.120.65.127.СН2416,2,1 

FUT3 48.120.65,127.СН2%52,3.,1 
CURSOR 5,15:РКІМТ "—LASER BATTERY" 
CURSOR 14.18:РКІМТ "LASER 7 の つ ゅ キキ マズ 
CURSOR 10,22:РКІМТ "FUSH SFACE KEY 
КҮ-ІМКЕҮ 

IF КҮ<>52 GOTO 12170 

RETURN 

END 


カー レー ス ・ ゲ ー ム 


マイ コン で は すっ か りお な じみ の カー レ 
ー ス ・ ゲ ー ム で す が , ほとん どの も の が ス 
クロ ー ル の 部 分 だ けが マシ ン 語 な の で , あ 
まり スピ ー ド が 出 な く て つま ら な いも の が 
多い と 思い ます . 

そこ で , 僕 が オー ル ・ マ シン 語 で 作っ て 
み ま し た . と に か く 〈 く BASIC で 書か れ た も 
の より は 早い と 思い ます の で , 遊ん で みて 
くだ さい . 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 
マシ ン 語 А000--А48Ғ 
スタ ー ト A000 


始め の 加速 が いま いち で すね . あと 
コー ス や その 他 に 変化 が ほし いで す 
(O) 


まず BASIC を 起動 し て За е 6 т 
か ら モ ー タ に 移っ て , MM コマ ンド で 間違い 
の な いひ よう に 大 力も て いら て て だ あい 、 金 


入力 し た ら 6、 ватт, 
5-АОРФАООО 


Add 

AOOO 
A010 
A020 
АОЗО 
A040 
АО5О 
AÖO 
A070 
дово 
АО9О 
AGAO 
AORO 
аосо 
ODO 
АОЕО 
АОҒО 


や っ と PiO に デビ ュー する こと が で きた まし た . よかっ た よかっ た . 
作る こと に 燃え て いま す . BASIC な 6 手軽 に 作れ る し , アド ベン チャ ー 


крй 2 ФА. アン リス ト を か け て お け ば 答 
E ym ゲー ム を 作り まし ょ う 


E-ADRSA48F 
Ј-АОКФАООО 
と し て セー プ も 年 で がち い 。 


2 ъи アム ヽ 
Ма, f2 


まず , BASIC の モニ タカ か ら プ ログ ラム を 
ロー ド し て くだ ゼ ぜ きい. する と 自動 的 に ゲー 
ム が 始ま り ま す . 

ゲー ム の や り 方 は いた っ て 簡単 で , [4] 
|@| キ ー で 左右 に 車 が 動き , | SPACE | キー 
を 押す と スピ ー ド が 増し , 離す と スピ ー ド 
が 沙 ち ます . あと は 障害 物 ( 敵 の 車 ) と ガー 
ドレ ー ル を よ け て 走っ て くだ さき さい. も ちろ 
ん スピ ビ ピード が 早 \ 


2074675 マシ ン 語 に 
し まし た だ 。 ШО ya E 
ム なので, 少し 無駄 が ある か も し れ ま せん . 
プロ グラ ム は $A000 か ら 6$A48F ま で と , と 


て も 短い の で 簡単 に 入力 で きる と 思い ます . 


472, も つと スピ ー ド を 早く し て みた だい 
な ら , $A369 の 内 容 を も っ と 小さ くし て み 
САВ RACE GAME マシ ン 語 リス ト 


А200 
А210 
А220 
A230 
A240 
A250 
A260 
A270 
A280 
A290 

2AQ 


* は ほうが スコ ア が 多い で す . 


て 《 だ さき る い 。 ТЫ ФЕ ФХЕС する るみ が 
か し くく な る の で ほど ほど に . それ か ら 。 > 
コア は 65595 ま て いっ だ ら ま だ 0 に 戻り ます 。 


プロ グラ ム の 短 き の わり に は 楽し め る と 
思い ます . すべ で て キャ ラク タタ に な っ て し ま 


っ だ けど , そこ は スピ ー ド の だ め と 思っ て 
我慢 し て くだ る 
K3 参 考 文献 
"MZ-2000 MONITOR MANUAL”, 
SHARP 

そろ そろ エン ジン 全開 と いく か 


さて 本 題 に 入り ます . 最近 , 私 は BASIC で アド ベン チャ ー ゲ ー ム を 
な ら ス ピー ド は 必要 あり ませ ん し , 特別 すす い テ クニ ッ ク も いり ま 
кк ФА даа Тақта Ааа те E td A T T EA AM 
P.S. ポケ ュ コン (PC ビ 1251) の 後ろ み の ネ ジ が すり へ っ て し まっ て 回 ら な く な っ て し まっ た だ た. どう 


し だ らい い 


Add 

АЗОО 
АЗ10 
АЗ20 
AZIO 
A340 
АЗЗО 
A360 
A370 
AIBO 
A390 
A3AO 
АЗВО 
АЗСО 
АЗро 
АЗЕО 
АЗҒО 


Ск кок ок к кок кок кокс ск кок кок коко ЕСКЕК SII ССС Сс СС С ОК КСЭ 


!0000000000000000000000000000 „СУ W WW APT „ Ky 


) 


PIO 


CAR RACE САМЕ マシ ン 語 リス ト 


000000000000000000000009000( 


VA ЕЁ, TASA SATAN ATA STATA STATA ATA STATA STATA 
19000000000000000000000000091 4 ト ° P: А و‎ x. ا‎ х. 900000000000000000000000900( 
YY 0060 0 00000000000000009000900000090990999a909900 


エン ハン サ 内 蔵 の テレ ビ 
C-21X25PVW 


ШС-21Х25РУУ/(З, ビデ オ エ ン ハ ン サ を 内 
KL, 21 ピ ン と 8 ピン の 端子 を そなえ た 21 
型 テ レビ . 

< 特徴 > 

ファ イン ピッ チ (0.6mm) プ ブラウン管 で 20 
00 文 字 対 応 ゆ 映像 検波 回 路 に , PLL 完 全 同 
期 検波 方 式 を 採用 了 e < LAIT 4 v 2 |u|i p 
自動 白 ピ ドー ク リミッタ 回 路 に より , НТ 


な ど が くっ きり 再現 で きる ЗЕ К. х 


イマ (30%, 60%, 90 分) АЧ 
492 х 485mm 重量 26.0kg 

く 価 格 > \185,000 

く 問 い 合 わせ 先 > 

日 本 電気 ホー ム エ レ クト ロニ クス (株 ) 
B108 東京 都 港 区 芝 5-37-8 
A (03) 454-5111 


526 х 


о», だ れ か 教え て くだ さい . (怪人 6001 面 相 ) 


FM-77 用 ジョ イス ティ ッ ク 
JOY-77SA 


Ш./ОҮ-775А1/2, 8 方 向 対応 の FM-77 用 ジ 
ョ イス ティ ッ ク . 
< 特徴 > 
pp スティック は 手 を 離す と すみ や か に セン 
ター に 戻る オー ト ・ ス トッ プ 和 前面 切り 換 
えた スイ ッ チ で トッ プ / ペ ーー スス イッ チ が 区 / 
Z—<—BREAK/SPACE + RETURN ¿t Z 2 p 
トッ プス イッ チ は 上 向き , 水平 向き に な る 
< 価格 > \11,000 
< 問い 合わ せ 先 > スピ タル 産業 (株 ) 
45101 東京 都 千 代田 区 外 神 田 1 -16- 1 
1% (03) 251-2918 


そそ ママ の 
ECC ET EE TT TE TCE LEE 


小型 軽量 の コピ ー 機 | 
SF Т-600 


画 SFT-600 は , 片手 で 持ち 運び が で きる 把 
手 が 付 いた 小型 軽量 コピ ー マ シ ン . 

< 特徴 > 

p 現像 ユニ ッ ト の 交換 で 3 色 の 単色 カラ ー 
コピ ー が で きる ee コピ ー サ イズ は , ЖАЙ» 
ら A4 サ イズ まで ep オォ オート シャ フト 機構 付 
ptf 370x395x189 重量 17kg 

< 価格 > ¥198, 000 

< 問い 合わ せ 先 > 三洋 電機 (株 ) 
45570 大 阪 府 和 守口 市 京阪 本 通 2 -18 
® (06) 991-1181 
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ӨРКМ-7 


BASIC 十 マシ ン 語 


あな た は , 某 ソ フト ・ ハ ウス に 勤め る プ 
ログ ラマ ー で す . ある 日 , 仕事 の プロ グラ 
ム で 大 き な バ グ を 出し て し まい , 疲れ は て 
て 眠り に つい た あな た の 見 た 夢 は … 次 々 に 
遂 い か か る フロ ッ ピ ー や CPU, 

この ゲー ム は あな た に と っ て , スト レス 
で すか ? スト レス 解消 で すか ? 

圏 プ ログ ラム ・ イ ン フ ォ メ ーション 
| マシ ン 語 4000--503Ғ 


ЕТТІ 
= 3 


. キャ ラク タ は よく 出来 て いる けれ ど 
жин ゲー ム 自 体 が 単調 、 そ の 辺 の と ころ 


ЭА АРА А ОҚА АСА 
„м, Ч.б, Че, л, б), O АУАҒА АХАУ А 
WW 
1 
АССР уа ех е 
У УХ, & Б Р, 72 тағамға 
А д.с оча ИАА ААДА ОАА 
РРА Уу Ууу PAP 


BASICUW R ETETAJ: も セー ダキ も 。 
マシ ン 語 (リス ト 2: 4000Н ~ 503ЕН) № А 
JJ _ ЅАМЕМ "Т, W. М”, %Н4000, & 
Н5ОЗҒ, &H4OOO で セー ブ し ます . 
55555566600 


ФАРАРАРАР,-. D УЭ» A ЖАРАР РАР 
САСТЫ АССА 

BASIC を ロー ド 後 RUN す る と , 自動 的 
йы. pn F Ú, ゲー ネー が だ スタート 
4%. 

シッ プ は [8l|2||4||6@| の キー で 移動 し , 
ミサ イル は [Al|, |Z| の キー で 発射 し ます . 
[Al は 高速 , [| は 低速 ミナ イル で す . 


АРАА АК АЖ А А анаа эл л 
CO と て NCAA CA どく で だ 


УУУУ 


ай. 


RUD 1 箇所 に か た まっ て いる と 攻撃 は 楽 


PC-1245 で マシ ン 語 の 100m ゲ ー ム を 作っ た と ころ , キー 
は 壊れ た ゲー ム 層 ウォ ッ チ を 使い , 
P.S. 私 は A.M.R.N. と 名 乗っ て いま し た が 。 


作っ て し まっ た だ た. キー 
ど PiOBOX に で も 送り だ いと 思い ます . 


| 爆破 判定 ルー チン ・ ワ ー ク 

| RND ワ ー ク 

| ゲー ム ・ レ ベル 

| ミサ イル 用 XER, Y 座 標 , フ ラグ 
サイ ル 用 キャ ラク タ DATA トッ プ ・ ア ドレ ス 
サイ ル 用 速度 ルー プ ・ カ ウン タ 


FM シリ ー ズ で は 最も オー ンド ックス な 
ЯС RAFFI REESS PET? 
CPU を 乗 取 り , サウ ンド 関係 は メイ ン 
CPU に FIRQ を か け て デー タダ を 渡し て いま 
ғ; 

ワー ク ・ エ リア や サ デ プルー チン の アデ ドン レン 


スー マッ プ に つい て は 。 Ой т ы = 
CCH oO. 

ыма A Аа, の re, NN 
の の の の の の も の N We 
к. ук. А, У, А, Q a Р) Ka. Ұ, 
x の до (NACS 
44%; ҚҰ, CY 


ео Ж š. 5 ру was Е й: て ж 
зіл, 高畑 英樹 氏 の "р 2" — LAOR 
底 解 前 " は だ い へ ん 参考 に な り ま し た だ . 高 


畑 氏 を 始め , ノウ ハウ の 公開 を し て くれ だ 
多く の 先輩 や ソフ ト ・ ハ ウス に 深く 〈 感 謝 い 
か も Чы эр 

ағ, се; س‎ ы ы > 人 
А е ارک اک 56 کک و کور ری وی ی‎ 
ا‎ の 、 の る の も の も ا‎ 
аео 9а VS 


ACN 53 | ауа, о 55250 ах X | OO So AA 
る かる の も かも の も の も の も の も の も の も の Y 
ғы қ.) с, ا کک ر‎ “ о А. <> РА) <> Фе 


FM で 高速 ゲー ム を 作ろ うと し た 場合 , 


SUBーMAIN の イン ター フェ イス や AT- 


TENTION FIRQ や サブ CPU の メモ リ ・ 
マッ プ グ な どの 問題 が あり , 初心 者 に は な か 
な か や っ か いで す . 

し か し , ゲー ム を 作る こと は どん な に 面 
白い ゲー ム で 遊ぶ より 楽し いも の で す ( 実 
RN. 皆さん も ぜひ 一 度 チ ャ レン ジ ど し て み 
て 〈《 だ る さい 、。 


MY 機 用 X 座 標 , Y 座 標 , フ ラグ 
MY 機 用 キャ ラク タ DATA トッ プ ・ ア ドレ ス 
MY 機 用 速度 ルー プ ・ カ ウン タ 
MY 機 用 初期 速度 保存 
MY 機 用 移動 パタ ー ン 
MY 機 用 得点 
MY 機 用 移動 時 の ルー プ ・ カ ウン タ 

| MY 機 用 爆発 フラ グ 

_|FM 機 1 一 10 用 同上 

2 | 移動 用 キー デー タ 保 存 

| ミサ イル No 1 用 キー フラ グ 
ミサ イル No.2 用 キー フラ グ 
SCORE 
HI-SCORE 


表 2 アド レス ・ マ ッ プ 


サ プ へ 転送 プロ グラ ム 
メイ ン FIRQ 処 理 
| サブ 実行 プロ グラ ム 
| メイン ・ ル ー チ ン 
| FM 機関 係 メ イン ・ ル ー チ ン 
2 | メイン へ の ATTENTION FIRQ 
| 爆発 ルー チン 
得点 ルー チン 
F M 機 移動 ルー チン 
| MY 機 ル ー チ ン , キー 入 カ ルー チン 
| レベル アッ プ ・ ル ー チ ン 
ゲー ム ・ オ ー バ ー 
> | ハイ スコ ア ・ ル ー テ チン 


サ プ ブシ ステ ム よ り RETURN 
RND 発 生 
X, Y 座 標 一 アド レス 変換 ルー チン 
画面 表示 ルー チン 
」 初期 デー タ , 文字 デー タ 
キャ ラク タ ・ デ ー タ 
| | ズ テ データ 


DSH XR 

1 МӘЛЕ "ӘЖ >” — АІ 
PIO; 2%; 5%; о" 

2) "6809 УУ ШАГ, ТЕН 

3 y u етін 2. ағезумт 
CQ 出 版 社 

4) “マシ ン 語 ゲー ム の 作り 方 [II]", 


Oh / ЕМ, 84 年 4 一 5 月 号 。 日 本 ソフ 
トバ ンク 
5) F-BASIC 解 析 マ ニュ アル フェーズ 


I", 秀和 シス テム トレ ー デ ィング 


ボー ド を 友人 に めちゃ くち ゃ に され て し まっ た . そこ で 私 は 外部 キー な る も の を 
つい で に DC アダ プ タ も 付け た だ . 
COR と も いい ます . 


キー は 3 つま で な ら 調 で る こと が で きま す . こん 
(PCUC2 フ の A.M.R.N) 


ЮС: テク ノ ・ ウ ォ ー ズ BASIC! АР 


199 CLEAR3Q9,&HIFFD: LOADM"T. W. M" 
119 WIDTH4 ウ 。 20 

120 FLAY "T25O5S さ M4 の 99" 

150 FLAY "L4046ECGAFDF " 

140 CONNECT (472,9) – (594,9) – (570,15) – (497 
,15) - (478, 55) – (468,55) – (481,15) – (4635,15) 
- (472,9) ,7,РЅЕТ 

150 CONNECT (562, 20) – (525,20) - (521,22) - (5 
09,22) - (505,26) - (517,24) (515,28) - (504, 2 
8) - (499,33) - (514,55) - (513, 35) - (490,355) 一 ( 
502,20) 。 6。PSET 

169 СОММЕСТ (554,21) - (526,25) - (525,25) - (5 
23,28) - (522,351) - (524,54) - (528, 35) - (532,3 
5) - (537,34) - (542, 32) - (542,31) - (539,31)-( 
532, 32) - (530, 32) , 6, PSET 

179 CONNECT (530, 32) - (528, 30) 一 (530,26) -15 
33,24) - (5357,23) - (540, 23) - (542,24) - (542,2 
b) ~~ (545, 26) – (544, 24) - (546, 22) (542。21) 一 ( 
538,20) - (534,21), 6, PSET 

180 PLAY "04BBD5DD4GAD5SCED4F" 

199 CONNECT (558, 20) – (547, 35) – (552,55) - (5 
58,29) - (568, 29) - (563, 35) - (569,35) - (583, 2 
②) - (578,20) - (571,26) - (560,26) -(565,20)-( 
559, 20) , 6, PSET : 

200 CONNECT (594,20) – (578, 35) - (583, 35) - (5 
935,26) - (600,55) - (4603, 35) - (617,20) - (612,2 
9) - (603, 28) - (598, 20) - (594, 20) , 6, PSET 

219 CONNECT (594, 20) - (578, 35) - (583, 35) - (5 


5)-(524,65)-(518,65)-(508,54)-(495,65)-( 
499,63)-(475,42),7.РФЕТ 

260 CONNECT (558, 49) – (532, 63) – (557,65) -(5 
44,50) – (557,50) – (557, 63) - (561 , 63) - (558,4 
9), 6, FSET 

270 CONNECT (555,54) – (555,58) -(546,58)- (5 
54,54) 。 ら 6。 PSET 

280 CONNECT (579, 49) 一 (566。6 さ ) ~ (569,55) - (5 
76,57)-(583,57)-(587,65)-(591,63)-(587.5 
7) -(590,54) – (594,55) – (596,55) - (596,51)-( 
591,50) - (588, 49) – (579,49) „6, FSET 

290 CONNECT (582,51) – (579,55) – (586,54) – (5 
89,535) – (590,52) - (582,51), 6, PSET 

290 CONNECT (525,51) - (616, 49) - (610,49) - (6 
05,50) - (604,52) -(607,55)-(612,57)-(614,5 
9) — (615,61) - (608,35) - (597,65) ~ (562,68) -‹ 
599,66) – (607,65) „6, FSET 

510 CONNECT (507, 55) – (512,54) – (616, 63) - (6 
19,61) - (619,59) – (618,57) - (615,55) - (611,5 
4) - (519,535) - (619,52) - (615,51) - (620,52) 一 ( 
22,51) 。6。PSET 

ЗРО FAINT (500,12), 2, 7:РАІМТ (501,27), 6』 FA 
ІМТ (538, 22) ‚2: РАІМТ (557, 27) , 6:РАІМТ (599, 
28) „Ф: РАІМТ (6421, 33) „ 6: РАІМТ (594,52) ,2,7: 
FAINT (544,59) „6: РАІМТ (589, 56) , 6: РАІМТ (61 
0,51), 

330 FOKE SH3FFE, о: РОКЕ &HSFFF 、@ 

540 ЕХЕС&Н4ФФО0@ 


469 "END 
470 CLS:LOCATE 15,8 
480 РКІМТ CHR$ (17) +"45ее "+СНКФ (17) +"S5Yo 
u "+CHRS (17) +"ФАдаіп !!" 
499 COLOR= (3, 3) 
5 らら END 
519 TI=TI+1 
520 IF ТІ=5 THEN COLOR= (5,7) ELSE IF TI= 
В THEN COLOR= (3, 3) :T1=9 
550 RETURN 
540 SDUND@。 12: SOUND1, 1: SOUNDZ, 129: SOUNDS 
, 2: SOUND4, 9: SOUNDS, 4: SOUNDA, 18 
5560 SOUND7 , 19: SDUND ヨ 。 19: SOUND9 211: SOUND 
19,9: 500М011,0: SOUND1 2, #: SOUND 15,19 
560 RETURN 
570 500мрӘ,58: SOUND! „, 9: SOUNDZ, 111: SOUNDS 
„ 4: SOUND4, Ө: SOUNDS, ©: SOUNDA, 39 
580 SOUND7, 13: SOUNDS, Z: SOUND? , 199: SOUND1 
0, 27: SOUND11, #: SOUND12, 141: SOUND 15,9 
599 RETURN 
699 SOUNDO, 206: SOUND1 , 5: SOUND2, 267: SOUND 
3, 4: SDUND4 9: SOUNDS, 9: SOUNDé, 43 
619 SOUND7 , 10: SDUNDB。9: 500Мр9, 249: SDUND 1 
O, 4: SOUND1 1, 4: SOUND1 2, 46: SOUND 13,9 

b20 RETURN 

ЗӨ SOUND, 172: SOUND1 。 4: SOUNDZ, 40: SOUNDS 
, 13: SOUND4 250: SOUNDS, 15: SDUND6 , 46 


549 SOUND7, 31: SOUNDG, 1 3: SOUND? , 195: SOUND 
16, 251: SOUND1 1, 9: 500012, 75: SOUND 15,9 
550 RETURN 

560 SDUND9。 196: SOUND1 , 7: SOUND2, 98: SOUNDS 
, 15: SOUND4 , 247: SOUNDS, 4: SOUNDé , 5@ 

579 SOUND7, 8: SOUNDS, 7: SOUND? , 17: SOUND10, 
158: SOUND1 1, 4: SOUND1 2, 34: SOUND 13,9 

580 RETURN 

599 SOUNDS, 126: GODUND 1 , 3: SOUND2, 249: SOUND 
3, 2: SOUND4, 174: SOUNDS, 13: SOUNDé, 20 

799 SOUND7, 30: SOUNDS, 5: SOUND? 。 48: SOUND 1 Ф 
„ 32: SOUND11, @: SOUND1 2, 11: SOUND 13,9 

710 Fl=@:RETURN 


95,25) - (600, 35) – (603, 35) - (617,20) 一 (612。2 
@)- (603, 28) – (598, 20) - (594, 20) , 6, PSET 

220 CONNECT (430, 20) – (622,22) - (618, 24) - (6 
15,28)-(615,523)-(619,55)-(626,55)-(655,5 
5)-(655,31)- (657,27) - (658,25) - (6354,21) -( 
652,21) - (628, 20), 6, FSET 

230 CONNECT (528,25) - (6424, 25) - (622, 27) - (6 
21,359) – (622,51) - (624,52) - (626,52) - (629,5 
9) - (650,28) - (651,25) - (629,25) - (627,25) ,6 
.РЗЕТ 


559 Рі-РЕЕкК(УНЗЕҒЕ):Р2-РЕЕК (&HšFFF) 

560 IF (Fi OR FS)=9 THEN GOSUE 540: GOSUB 
S14: GOTO 350 

370 EXEC SHECOS 

380 IF F1=&HFF THEN 460 

390 IF Річ«НҒЕ THEN 259 

499 ON F1 GOSUE S70, 600, 630, 690 

419 ON Р2 GOSUB 30, 600, 630, らら 6 の 

420 POKE ҰНЗЕҒЕ,Ө:РОКЕ &НЗЕЕЕ, © 

430 FOR I=@ ТО 5-(ҒғҒ2>0) #SO- (P1 х0) #200: GO 
240 PLAY "LSADFAL205C " SUB S19:NEXT 

250 CONNECT (475,43) -(485,45)-(495,55)-(5 4409 EXEC НЕС 

94,45) – (511,46) -521 , 53) - (5951,45) – (540,4 450 GOTO 550 


7 リス ト 2 テク ノ ・ ウ ォ ー ズ マシ ン 語 リス К ҢЦҢЦҢЦД 


+4 +5 +6 +7 +8 +9 +A +B +C +D +E +F Sum 
Ө2 B7 D3 ЕЕ 54 20 1F 12 17 ӨЗ 9р 17 :7В 
17 ӨЗ D7 6Е 29 6F 21 35 аб Ab 21 BB :47 
1А 95 41 BE 94 61 21 22 12 Aó 29 BB :Ci 


Add 2 +: Ада +0 +1 
4000 % 2 i 4300 D4 дА 
4019 4310 ©3 DC 
до?о 4520 94 91 
4659 5309 04 91 ОА 96 49 BB 94 А1 20 25 02 éC 29 59 1B 
4640 4540 óD өө 2 Aé 21 BE 94 Аі @1 25 ІС Аё 01 BB 94 :25 
4050 4550 Аі 21 23 AG 29 ВЕ 94 Аі 00 25 ӨС Аб 99 BB ӨЗ :51 
40660 4569 А1 20 2% С 29 80 9В 59 17 ӨЗ 40 17 ӨЗ ОЗ АЕ :94 
4070 4570 20 éF 29 59 17 ӨЗ 1D 81 28 24 OB 40 27 08 0С 
дово 4580 ӨН 97 86 91 А7 21 59 Её 27 ВЕ рі F Ab 84 :70 
4999 4370 4С 81 08 86 50 А7 84 59 1F 20 F1 А7 84 5A :FE 
4044 43A 26 E? 1 5 Ев 39 A626 81 01 27 15 81 92 27 26 AQ 
4ово 4580 81 43 81 04 27 4D 81 95 27 64 16 92 36 17 158 

43C %2 D4 20 25 ӨӨ 81 EO 24 ФВ 17 @2 28 59 17 02 04 

4500 97 59 72 59 5А 28 26 ӨС 86 02 А7 28 96 40 :85 

43EQ A1 20 26 25 98 17 92 ӨС 39 17 02 7Б 39 17 02 19A 

43F の 9 56 59 1: А1 81 80 24 096 86 94 A7 26 20 06 86 :77 


70 17 OB 95 ӨР 59 ЗЕ ЕВ 92 5А 68 C8 


Add +O +1 
4400 ӨЗ A7 


+4 +Š +6 +7 +8 49 жа +B FC +D +E +F Sum 
1B 86 52 61 20 24 05 86 OS А7 26 59 :40 
4410 óA 28 2 86 ө2 А7 28 17 92 4р 39 17 02 дө 59 :08 
4420 86 ӨЗ 25 95 86 94 А7 26 59 ФА 28 26 08 6 :4А 
4430 Өт А7 : 92 11 59 17 @1 рі 59 «А 24 26 58 46 :98 
4440 25 А7 29 27 ӨЗ 17 FE 83 20 4B 6D 20 26 15 :7В 
4459 9% 27 26 ӨН 17 00 686 32-62-16 FC 89 32:62 iC 
4460 16 ЕС Do OE 81 Өр 25 07 BD 42 7F DO OE 20 ;8F 
4479 26 8р : Fo 81 39 27 КЫ G1 52:30 27 01 76 01- 33 
4489 24 19 86 81 56 10 27 の 1 94 81 38 10 27 01 :66 
4499 А2 17 17 Ө2 24 29 ра 04 91 81 61 26 94 97 %77 
44ño Fi 20 ZA 26 04 97 Ғ2 20 Ө2 97 FO J9 54 50 МЕ 
44B9 95 2D 27 1F ӨС 2р ӨС 26 19 ВЕ 01 40 C6 да TA 
44С0 8D 16 3 00-10 ЗА 26 F7 19 SE. D1 59 SD 6% 10-149 
44ро 8E рі ӨЗ 55 50 59 46 25 89 14 А7 25 39 86 :Вө 
44E@ FE B7 17 FD FD: SD 3 日 127 02 AF BE IF ЯҒ SE TOL 
44ҒӘ 8р өз , 06 99 17 @2 ñF OE 29 AB 31 Өр ӨЗ ЗЕ :07 


Е1 ЕЗ さら ФЕ 99 2А DD АҒ Е4 АС 67 9C ІВ BC 17A 


59 
5 
; 97 
E} 
s B2 
+B? 
СЕ 
: OH 
š 38 
: 606 
sz ОЕ 
:59 
a 9F 


Sum: 


Add +ø +1 +2 +2 +4 +5 36 47 +8 +9 +A +B +C +D +E +F бит 
4500 СС 95 ОЕ 02 А2 ва 04 01 SL 59 77 ӨҚ BL 79 27 うら 
4510 OA 81 4E : 07 81 6E 27 ӨЗ 20 EB 39 J2 64 16 OF 311 
4520 68 СЕ D1 9E DI FB SF бө 85 A1 CS 25 Q& SC Ci DE 
4550 05 26 FS AG CO A7 GO Ес СІ ED 81 EC CL ED 81 rie 
4540 59 BE оо оо 86 Өө BD EF ВЕ 40 об 86 оо BD 08 BE :4ğ 
4550 во оо 86 80 @1 59 54 19 Fé D4 99 Cá CB 07 28:71 
4560 SF А7 85 5С Сі 39 26 F? 20 88 50 дА 28 26 Fi FZ :48 
4579 D4 99 55 Өр F1 27 1р OF Рі 6D 20 26 17 86 94 :38 
4580 B7 D3 FE FD SE 54 29 19 ВЕ рі 40 ЕЕ 22 17 00-224 
4590 64 55 20 25 359 Өр Ес 27 1) OF F2 ба 20 25 17 KIG 
45640 86 94 B7 РЕ 17 FD 5С 34 20 10 SE Di 40 EE 22 79 
4535B0 17 бө 42 3S 20 20 の 1 59 96 40 4C A7 29 96 41 80 :48 
43C0 02 А7 2 21 27 2 86 03 61 21 251117 90 DU Ja 
45D の 17 @1 91-17 Ot 16 АҒ 20 ФЕ 21 20 L6 бб 24 181 
45Е9 27 Ө4 20 OE Аб 25 А7 24 ФА 21 óA 21 17 00 :AA 
45F@ BE 17 59 86 2D Аі 21 25 OF «С 21 17 @@ АС s6B 


D7 7F 19 1С АЕ АВ А8 99 Аб ВЕ 57 80 :A4 


Вс 


| リス ト の つ テク ノ ・ ウ ォ ー ズ マシ ン 語 リス ト 


「 


YOO DP TC c: II = tJ) O O 
ес>сеогос«егролггт 


ЕФ 
әо 
ға 
C2 
оо 
өө 
ға 
ЕЕ 
ФЕ 
ЕФ 

` FA 
с> 
оо 
ЕЕ 


4050 
арао 
4р5о 
4рёё 
407% 
4080 
4090 
арао 
4DE の ЗЕ 


= OOD Š m T m tJ) = Ü h) LIF 
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ぁ 今 日 は , PiO 4 月 号 の PiO バ ザー ル に 出 た 佐野 で す . 多数 の な ハガキ あり が と う ご ざ いま し た . 愛 機 PC-1501 を いざ 手 離 す た と な る と , と て 
も る み し い も の で す . そん な 悲痛 な 思い を お る えな が ら 思 正 る ん , あな だ に 売る ん で す . 大 切 に し て くだ さい ね. P.S. この ハガキ は 受験 
2 日 前 に せま っ た 日 に 書い に た も の で す . 合格 し た ら ま だ ハガキ を 出し ます . (Sano chan) 


BASIC 十 マシ ン 語 


ます が むら 


女の子 が わな に 気 を 付け な が ら , モン ス 
ター を 捕まえ た り , 決め られ た 場所 に 花 を 
置い た り し て 家 ま で た どり 着く と いう も の 
Ж. с 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 1200~62FF 


と っ て も か わい い ゲ ー ム で すね . し 
か も ちょ っ と パズル 的 な の も いい で 
すね . (V) 


AIAIA 


まず リス ト 1 (BASIE: テー ジ 
に セー ブ し ます 。. 次 に リズ スト 2( マ ジン 語 
部 : 1200H ~62FFH) Z AJH, 先 の リス ト 
1 の 後に 続け て セー し ます . 


デモ 中 に 何 か が キー を 押す と タイ トル が 表 
示さ れる の て | RETURN キー を 押し て くだ 
る い 。 ゲー ム が スタ ダ タート し ます 。 

・ キ ー の |all2||4|[6| で 女の子 を 操 

b, 緑色 の 丸 印 と 星 印 の 所 に 花 を 置い て 〈 
だ る さい. 星 印 の 場合 は そこ を 通れ ば 花 が 置 
か れ ま す が , 丸 印 の 場合 は | SPACE キー 
を 押 き る な いと 花 が 置か れ ま せん . 

ま だ, 女の子 は 画面 内 に いひ る モン スタ ー 
を 捕 ま を な けれ ば な り ま せん . 普段 は 何 も 
し て こない の で モン スタ ー に 体 当 だ た りす れ 
ば 捕まえ だ こと に な り ま す が , と きど き 爆 
弾 を 投げ て くる と きも あり ます . 

その 他 , 鉄 の ツメ , 3 つ 一 組 の キノ a, 


ある 一 定時 間 た つと 現われ る タケ ノコ な ど 

が 道 を ふる いで いま す . 迷路 か 6 逃げ られ 

な く な っ た ら , [RETURN | キー を 押し て 

(778, 女の子 が 持っ て いる タダ イナ マイ 
花 の 置き 方 を 注意 し な いと 


ト で 爆発 きせ る こと が で きま す 。 だ だ し , 
爆発 する ご と に 100, 200, +, 
20; で きる だ は け 全 わな の いよ う (5 も で ん 
ا‎ E 


を し て 得点 が マイ ナス に な っ だ り , 家 が 
破壊 きれ だ とき, 女の子 が 3 人 と も 死ん で 


し まっ た だ とき に ゲー ム ・ オ ー バ ー で す . な 
お , 女の子 は 奇数 面 に な る ご と に 1 人 ずつ 
増え ます . 


AIAIAIAIAIAIAIAIAIAIAIAIAIA 
RIRRR 
АДА АА 


ААА 
AIAIAIA 


と 減点 きれ 


AIAIAIAIAIAIAIAIAIAIAIAIAIA 

面 ク リア し た と き , すぐ に [Bl キー を 押 
す と プレ イク ・ タ イム に な り ま す 。. 解除 は 
[| キー 以 外 の キー で で きま す . 


ま だ, 10 面 ご と に 右 下 に キー ワー ド が 表 
示さ れる の で , タイ トル 表示 時 に 入力 し て 
くだ るい. その 面 か ら ス ター ト す る こと が 


で きま す . жы, 面 数 は 49 面 あり ます . 
参考 文献 


1) FM-7/8 活 用 研究 ", 工学 社 
2) "F-BASIC 解 析 マ ニュ アル フェ ー ズ 
I”, 秀和 シス テム トレ ー デ ィング 


efe 


スタ ー ト 方 法 は RUN"" と 
し て くだ る い 。 タイ トル 表示 後 , マシ ン 語 
を 読み 込み な が ら , な ん と 音楽 演奏 を 始め 
る は ず で す . 


AIAIAIAIAIAIAIAIAIAIAIAIAIA、 


АДА АМА 
AIAIAIAIAIAIAIAIAIAIAIAIAA 
muu | リスト 1 きす が むら BASIC リ スト 


2509 SYMBOL (280,170), "ШЕННЕ", 3, 1 , 4 
10 CLEARK2O。 &H109F:WIDTH40, 25 240 SYMBOL (280, 170), "GAME OVER", 5,1,5 
20 IF РЕЕК (0) =&HFF THEN200 260 LOCATE, 12: COLORS: PRINT "REPLAY Y(es) 
ЗӨ POKE ҰН1508,0:РОКЕ &HA,&HiZ2:POKE &HE, /N(o) " 

© 279 PRINTCHRS (27) +"9"; 

69 FOR 1=&H1 の AO TO &H11C5:READ 0%: O=VAL ( 280 A$=INKEY$: IF АФ-""ТНЕМ2ЯО 
"&H"+0$):POKE 1,0:МЕХТ 290 IF A$="Y" ОК A$="y"THEN CLS: GOTO200 1, SC, CE, O3, D7, 09 

70 SYMBOL (14,22), "FAN ,5",10,5,7 500 EXEC &H4C00: COLOR2: LOCATEO, ©: END S30 рата DC,06,27,0F۴,93,08, 25, 04, DD, 06,3 
75 SYMBOL (10, 20), "FAN" 47", 10, 5,0 400 DATA 1A,10,CC,00,00,1F,8B, DD, 06, DD, の | | 5:82,CC, 00, 00, DD . 

80 LOCATE29。 10: COLOR7: PRINT"Reading Prog | | 8,97,01,86, 03,97 540 DATA оь, 35,82,86,01,E6, A0, 8D, 16。 4F ,E 
гат": COLORS 419 DATA д09,СС,07,ҒЕ,17,099,Е8,СС,08,06,1 || 6. GO,8D,11,7A,FD 

90 EXEC&H1 の AO 7。 9 の 。E2。 17。 の 9。FC 550 DATA 3F。EC。Q1 。2 フ 7。94 。 DD, 96。 さ 5。 ヨ 2。 19。B 
100 CLS 420 DATA 8Е,00,00,10,ВЕ,00,0А4,8р,74,81,0 || E, 90, 0A, 35, 82, B7 

105 SYMBOL (616,10), "HIT АМҮ KEY",1,4,3,3|| 1,26,FA,8D,74,81 56% DATA FD,OE,864,03,B7,FD, 0D, 7Е,Ер,ер,Е 
450 DATA 5С,26,Ғ4,8р,6Е,81,091,26,ЕЕ,8р,6 || 7,FD, 0E, 4А, В7,Ғр 

8,1Ғ,89,С09,095,80 579 рата ©D,7F,FD, OD, 59,86,ҒҒ,97,00,16,Ғ 
440 DATA 62,8D, 640, ар, SE, 8D, SC, 97,04,8р,5 |! Ғ,90, Вр, 06,08, 7р 

8,97,0605, DE, 04, 8D 580 DATA @2,СЕ, 26,85, 39, の の 


8,91,95,19,26,00 
509 DATA @8,290, 85, Вр,Е1,7р,92,02,59,7Е,С 
A, B1, BD, 07,72, BD 
510 DATA EC, 05,39,96, 02,34,02, 5F,85,01,2 
7,01,5C, 85,04,27 
520 DATA 91,5С,85,109,27,01,5С,85,40,27,0 


110 SYMBOL (206,9), "HIT АМҮ КЕҮ",1,4,7,5 
179 SYMBOL (540,120)," (С) 1985",1,1,4 
180 SYMBOL (560,150), "BY M.UMINO", 1,1,4 
200 EXEC&H4 の 9 の 

205 SCREENO 。 7: CLS: SCREEN7, 7:LOCATEO, Ф: CO 450 DATA 52,A7,C0@,50,26,F9,BD,F1,7D,8D,5 999 ° (С) М.Мтіпо 
LOR2 8,81,01,26,F7,BD 


210 A$=INKEY$: IF A$=" 4"ТНЕМ5ФО 4640 DATA Ғ1,70,80,4Ғ,81,5С,26,ЕЕ,Вр,Ғ1,7 
220 BB=PEEK(&H1 さ の ら E ) : IF ВВ=9 THEN РКІМТ"ж|| р,8р,46,81,ЕҒ,10 

イエ h" コワ レ 759." ELSE IF BB=B THEN PRINT | | 479 DATA 27。 の の 。Q2。 日 1 。 の 1 。26。 DF, 97 。 の さ 。BD 。F 
"ж トク テン h` マイ ナス ш ナリ マシ クタ 。" 1,7D,8D, 35,1F,89 
225 IF ВВ-Ф AND PEEK (&H1309) =1 THEN ВЕЕР | | 480 DATA 9В,05,97,05,54,94,Вр,Ғ1,7р,8р,2 
: LINE (0,0) (516。 199) 。 PSET 。 1, BF : EXEC&H4CS | | в,А7,С0,9В,05,97 
QO:FOR І=0т05000: NEXTI: GOTO300 490 БАТА @ さ 。 さ 5。 の 4 。5Q。 26。EE 。 BD 。F 1 。 7D, 8D, 1 


109 


リス ト 2 きす が むら т 0 д Һ 2 -..... 


1AE の АС АҒ В7 FC 86 86 95 В7 FC 87 7Ғ Ер Ө5 16 01 55 :56 


----------------------------.--..--..--..-------.----....------..-..-.-.-.-----.....-.-.--.-.-----.-.. --------------- 


初め まし て …, 僕 は ウイ ング マン 大 好き 少年 の PC-88mkll USER で す . この あい だ ゲー ム に 熱中 し て いる と き で あっ た . 突然 [4] の キー が 


秋葉 原付 近 で 売っ て いる 店 を 教え て くだ さき ー い ぃ (AOI さ ん が 好き ) 


е ө 
OO 25%, ぼろ … あ わ て て モメ ダイ ン で 接着 し まし た . 秋葉 原 な ど に 行っ て キー だ け 売 っ て いる 店 を 捜し て いる の で す が 。 どこ に も あり ませ ん . だれ か 


во 


きす が むら マシ ン 語 リス ト 


piO 


| リリ スト の きす が むら マシ ン 語 リス ト 


С (б) p 僕 は PC-1251 ユ ー ザ ー の ID.C と いう も の で す . この まえ ぇ PiO 伝 言 板 に 載っ て いた PC-1251 の 投稿 誌 「1251UP」 の 所 を 見 て 面白 そう だ か ら 会 
員 (?) に な ろう と 思っ て , 案内 書 を 取り 寄せ よう と 60 円 切手 を 送っ た と ころ , いく ら 6 待っ て も 返事 が な い の で ほとん ど 忘 れ か が け て いた ころ に 
案内 書 が 来 た の で , と て も うれ し か っ た な た. PC-1261, РС-1350, PC-1402… と 連続 新 製品 攻撃 に は うん ざり し て し まっ た . PC-1251 は これ か 5 

сз. ユー ザー の 人 は 大 切 に し まし ょ う . 


(1.DC. で し た ) 08 


piO 


リス ト 2 きす が むら マシ ン 語 リス ト 


| | | н. 


PIO 


リス ト グ の きす が むら 


マシ ン 語 リス ト 
ОЕ ЕЕ Е7 


РЖлОУ//:;-һ, 色 が カラ フル に な っ て きま て 楽し いで すね // 今 の と ころ , Ж. H, 縁 が ある の で . 今度 は 黄色 た か ピン ク よ か は た だ また 
ЖӘИЕ», いろ いろ な 色 に チャ レン ジ し て みて くだ さい . PS 今月 の ソノ シー ト の 色 は , た ぶん 赤 と 青 で あろ 5. (も ろ ち わん ) 


т ` pio 


Ë リス ト の きす が むら マシ ン 語 リス ト 


© 


リス ト 2 きす が むら マシ ン 語 リス ト 


©) 区 前 略 , と うと う PiO に も SC-3000 の プロ グラ ム が 載り まし た ね . と っ て も HAPPY な 気分 で す . 私 も 何 か プ ログ ラム を 組ん で 送ら ね ば っ . 


ESAT, だ れ か SC の V-RAM の アク モス の 方 法 を 知っ て いた ら 6 教え て くだ さい . 私 に は さっ ぱり わか ら な い の で …、。 PS. 迎 夢 超人 さん. 
時 計 あ り が と う ご ざい まし な た. Р.5.2 消し ゴム キー 万 才 / (JR-100 と SC-3000 と 三信 関係 に な っ た か つえ さん 好き だ へ ひ ) 


iO 


@SMC-777 


BASIC 十 マシ ン 


上 から 落ち て くる (? ) 岩 を よ け な が ら 前 
進 す る と いう 単純 な ゲー ム で す . 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


| BASIC 
マシ ン 語 A000-A2FF 
KE 
БД; 


た だ 岩 を よ け て 前 進 で は あま り に も 
単純 . 縦 ス クロ ー ル の ゲー ム で も も 
っ と な に か で きる は ず で す . (м) 


簡易 モニ я を 使う か, 777-DEBUCGER を 


使っ て 次 の よう に し て くだ る い . 

まず 簡易 モニ タ を 使う 人 は , 
MCLEAR,&HFFF| RETURN | 
@ の 簡易 モニ タ を ロー ド 
⑧A コ マン ド で リス ト 1( マ シン 語 部 : 
A000HーA2FFH) を 入力 
@⑳D コ マン ド で チェ ッ ク サ ム を 確認 
@[ ESC | キー で BASIC に 戻 9. NEW 
リス ト 2 (BASIC 部 ) を 入力 
の SAVE “THE 一 CAR" ,&HAOOO,& 
'HA2FF| RETURN | で セー プ 

ま た DEBUGGER を 使う 人 は , 
@DEBUGGER を 起動 
の ② の P コ マン ド で リス ト 1 を 入力 


. 


p 多磨 マッ プ …4 В 8р.138<— 2027 UJ —>< L а ARTE % 7 
5 店 が で きま し た . 以外 と 安い み だ い で す . それ と , 新宿 まで 580 円 と 書い て あり まし た が 。 小田 急 線 を 使え ば 片道 250 円 、 往復 500 円 で 80 円 
も 安い で す . それ と 一 番 近 い の は 調布 の LaOX で す . 京王 線 で 多摩 モン ター か ら で も 7 つめ 。 急行 で いけ ば 5 つめ ゅ です.。 こん な 辺境 地 で も と 
な り の 稲城 市 に は 負け ます . 


ザ ・ カ ー 


ゲー ム の 変更 点 


GAME の 長 さ 
GAME 開 始 時 の 車 の X 座 標 (0 一 4 ヒ H の 偶数 値 に し て 〈 く ださい) 


現在 値 


1 回 に 加算 され る 得点 が あがる まで の 間隔 
全体 の 速度 (A0C2 =0, A0C1 =1) の と き 最 速 


衝突 時 の 減算 タイ ム 


@| SHIFT |+HELP で FILER に 戻る 
@BASIC を 起動 

⑨ リ スト 2 を 入力 

© SAVE "THE 一 CAR" 


пазя E съ > 


‚& НАООО, & 


руіна は パドル で 左右 に 
ий. RA ETAL оь CS 


だ さい . 得点 は 自分 の 車 が 1 回 動く ご と に 


あがり Жоқ その 得点 は ゲー ム 開 始 時 に 
は 10 点 で , 岩 に あ だ ら な けれ ば 最高 100 点 
まで あがり ます . だ だ し ,。 自分 の 車 が 岩 に 


左 へ 右 へ , 岩 に ぶつ か っ て も 気 に も せ ず … 


衝突 する と 得点 は 再び 10 点 に 戻り 9。 ゲー ム 
終了 も 早く な り ま す . 画面 の 右 下 の Crash 
と いう の は 自分 が 岩 に 衝突 し た 回 数 で す 。 
ゲー ム 中 に HELP キ ー を 押す と ゲー ム が 一 
時 中 断 し . も う 一 度 押 す と 再開 る れ ま す . 
ま た, | BREAK | キー を 押す と , 途中 で も 
22% денге, 


メイ ン ・ ル ー チ ン は すべ で て マシ ン 語 
BASIC で は ゲー ム 開 始 時 と 終了 時 の 音楽 
と 画面 表示 を 行なっ て いる だ け で す . ゲー 
ム の 速度 な ど は POKE 文 に よっ て 変更 可 
ET. HEART LOTH. 


画面 スク ロー ル ・ ルー チ ン を 作 り それ 
を 使っ て ゲー ム に 仕上 げた だ も の で す が 。 2° 
ログ ラム も 短い こと で すし , WO U С 
も 遊ん で みて くだ きい. 一度 も 岩 に ぶつ か 
ら な けれ ば 最高 82.090 点 まで 取れ る は жч 


た いと 思い ます . 最近 で す が 多 摩 モ ンタ ー 駅 近く に ,「 ノ ジマ 」 とい 


な に し ろ 稲 城市 に は 「 エ スカ レー ター」 と 名 の 付く も の が 一 つも な い の で す . 唯一 よみ うり ラン ド に 「 ス カイ ロ 


“Тһе сағ 


"henkout en 
"МҺАйЗ4,%ҺАй25--9-дД / thy 
"hn の SE at a d 2) Ъ ЧУ? И ДУ 
л? 
'®НА@С1,&®&НА@С2——-ї1 7794 „ リフ トド 
)=1 (АйС2)-0 2 トキ も ゅ トモ NMP 
8 の ° 
DEF INT A-Z 
SYDKEI=%*HAQ029:MAIN=%HA04D 
DEF FONT 156, "99ҒЕА524А5Е7В0995" 
DEF FONT 1255,"00187С7АЕ?ҒЕЕҒЕОО" 
WIFE: CONSOLE 40: CURSOR OFF ‘OUT = 


(ApC1 


CCOLOR 7,0,0:РКІМТ 
u Ready?"sFAUSE 5 


(15,10), "Are 


s a - жа», жамы, а», ж ж” 
$ А ロ Yy 
Ў p 


_ BIO 


リス ト 1 THE CAR マシ ン 語 リス ト 


150 PLAY "T120@L16D4N9F2N9F2N9P'205L 2N9 " 
16@ FRINT (12,10) " GAME START !" 
170 FOR I=@ TO 20 STEF 4:ACLEAR 1,5,6- 
1/4:МЕХТ :ACLEAR 24,1,6,2 
180 ВОХЕ(0,0)-(219,199),7 
190 бҮОКІ: МАІМ 
200 CCOLOR 6:РБІМТ 
HHHHHHHHHHHHHH 
210 CCOLOR 7:PRINT 
ж" 
220 CCOLOR 4:PRINT 
OVER жж" 
250 CCEDLDR 7:РКІМТ 
жж"! 
240 CCOLOR 6:PRINT 
HHHHHHHHHHHHHEH 
250 FOR 1=4 TO S:FLAY "T25SL8D(I)N1NSN 
9N9N4NBNBN29N2N4L 16N7NBN9NBN7 " : NEXT 


(8,10) "яни 


(8,11) "жж 


(8,12) "жж 


(8,15) "жж 


(8,14) "HHHHHHHHHHH 


N Dy 


ӨР 0 


э СОЁ ag 
コン トロ ー ル ・ ボ タン を ジョ イス ティ ッ ク に 


ゼビウス や エク セリ オン な ど で ユ ント せ ロ 
EM САТСИАЛТТС С А == 5 ОЕ З 
А»? 実力 は ある の に , コン トロ ー ル が 
うま くい か な いで 腹 を だ て だ こと は あり ま 
せん か ? そこ で 考え ん だ の が この ジョ イス 
ティ ッ ク で す . これ で 自 機 の 操作 が 格段 と 
まく で だ な る は ば は ず で 9. 
まず 用 意 す る も の を 図 1 に 掲げ て な むき ます . 


作り 方 


書い た 円 より 
も 少し 大 きめ 
に 切り 取り ま 
す . 


500 円 玉 と 重 
ね て や すり で 
削り ます . 


や すり て 削る 


削っ た ベー ク 
板 の 中 心 に 3 
ゅ の 穴 を あけ 
ます . 


500 円 玉 で は あり ませ ん 


図 の よ う に ね 
じ で し め ま す . 


ナド ライ バー 
で ファ ミリ ー 
コン ピュ ー タ 
の コン トロ ー 
ル ! の 裏 プ タ 
を は ず し ます . 


IC が 載っ て い 
` る 基板 を は ず 
し , 十字 の キ 
ー ト ッ プ も は 
ず し て さっ き 
作っ た ジョ イ 
ステ ィ ッ ク を 
取り 付け ます . 


は ず し た と お 
り に 組み 直 し, 
ドラ イ バ パー で 
裏 プ タ を し め 
て 完成 


260 IF РЕЕК(ҰНАЙйЙ2В) =0 THEN 520 
270 CCOLOR біРКІМТ (8,10) "HHHHHHHHHHH 
HHHHHHRHHHHHHH': 
280 CCOLOR 2:РКІМТ 
Heg 
290 CCOLOR 5: РКІМТ 
High-Score !!"; 
500 CCOLOR 2:FRINT 
жн"; 
510 CCDLOR 6: РКІМТ 
HHHHHHHHHHHHHH'": 
520 CCOLOR 6,5,2:РКІМТ 
AGAIN 777%" 
5250 A$=INKEY$(1):IF 
") THEN END 
540 IF (A$="Y") OR 
LSE 330 


(8,11) "ж 


(9y12y Екшш OEE 
(8,15) "ж 
(8,14) "HHHHHHHHHHH 
(12,16) "* PLAY 
(A$="N") OR (А%="п 


(A$="y") THEN 150 E 


以上 で 製作 の 終了 で す . 文 で 書く と や や 
こし いで す が , 作っ て みる と 1 時 間 以 内 に 
で きま す . な な 2 プレ イヤ ー の 方 も 作る な 
ら ば これ と 同じ も の を 2 個 作 れ ば よい の で 
す . | 

ベー ク 板 を 500 円 玉 と 同じ 大 きる の 円 に 
削る の は 多少 面倒 で す が , それ きえ 仕上 げ 
れ ば 後 は 楽に どき ます . стт RD 
動き も スム ー ズ に な り , る きら に ゲー ム が 楽 
に じ で が な る あさ を で も よう ЖҮРСЕ ЖАД 
See you again. 


41 (用 意 す る も の ) 


3 p X27mm 3 あぁ ナッ ト 15mm ス ペー サー 500 円 玉 
ボル ト 3 個 


ШШ 


3mm ド リル ドリ ル 機 定規 えん ぴ つ 


119 


ы 
JR-1 ロ 0 


_BASIC+ マ シン 語 


: 


に Ша 


ШИ А.К 
デア アズ アア テア テマ アア アア メデ の 


e уар екыд д сім таты ар тен анд, 


平和 な 村 が , 突然 モン スタ ー の 大 群 に 龍 
われ まし た . そこ て 村人 の 中 か ら 選 ば れ た 
あな た が , モン スタ ー の 住み か へ と 退治 に 
行く こと に な っ て し まい まし た 、。 あ な た は 
50 万 点 取 っ て 村 を 救え る で し ょ うか 、. 

較 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 


マシ ン 語 2400--39FF 


画面 も ゲー ム 進 行 も 単調 . も っ と ア 
イデ ア が 必要 で す . (V) 


BASIC は , POKE が と て も 多く な っ て 
に まい まし た 、 移 に て いて も し ょ 2 が 。 
POKE 文 と USR 文 に 特に 注意 し て くだ る 
い 。 


マシ ン 語 は $2400-$39FF で す 。 マ ニュ 
アル や PiO'85 年 3 月 号 の モニ タ な ど て 入力 
し て くだ る い 。 入力 し 終わ っ だ ら BASIC 
の 的 に セー ゲ し て (だ る い :。 


A1 


モン スタ ー が 井戸 か ら 顔 を 出す の で , < 
ハン マー て だ だ いて だ な 本 。 ハツ アツ 
ー ひ の 使い 方 は 図 の と な り で す . 何 回 か た た 
l L, АЖА FO “MONS.” の 下 に マー ク が 1 
つ 付 き ,・ その後 3 回 た だ く ご と に 増え 、 3 
つ に な っ て か ら 3 回 だ だく と 1 面 ク リア で , 
ボー ナス が 加算 きれ ます . た だ く 回 数 は 最 
初 20 回 で ,。 1 面 ク リア ご と に 1 回 ずつ 増 を, 
30 回 に な る と 元 に 戻り ます . 

モン スタ ーー は 1 一 2 了 回 普 を 出し て も た 
だ か れ な いと 外 に 出 て 動き 回 り ま す . ЖС 
出る まで の 回 数 は 1 一 5 面 が 2 回 。 6—10 
面 が 1 回 で , 後 は この 繰り 返し で す . 

この と きる モン スタ ー を な だ て く で スコ ュ ア が 
増え , モン スタ ー も 気絶 し て 動か な く な り 
ます . し か し すぐ に 息 を 吹き か え し て 動き 
だ し , 面 ク リア に も 関係 あり ませ ん . 

な お , 顔 を 出し て いる と き と 外 に いる と 


ОЛ KN 


メッ セー ジ ・ デ ー タ 
画面 デー タ 

MUSIC デー タ ① 

モン スタ ー, 人 以外 の キャ ラク タ ・ デ ー タ 
MUSIC デー タ ② 

モン スタ ー の 出現 パタ ー ン 
SOUND デ ー タ 

モン スタ ー の キャ ラク タ ・ デ ー タ 
人 の キャ ラク タ ・ デ ー タ 
ワー ク ・ エ リア 
モン スタ ー 出 現 
モン スタ ー 移 動 

人 移動 

SCORER. 

人 関係 SUB 

残り 時 間 を 減ら す 
SOUND 

メイ ン ・ ル ー チ ン 

MUSIC 

人 関係 SUB 

メッ セー ジ 表 示 

шы, 井戸 な ど を 表示 


き に モン スタ ー に 捕まら な いよ うに し て < 
2а, それ と , モン スタ ー は 端 か ら 端 へ 
ワー プ し まず す 、 

時 間 が な く な る と ゲー ム ・ オ ー バ ー に な 
っ て し まい ます . どう し て も 時 間 が 足り な 
いと き は 1 人 殺し て くだ さい 。 時 間 は 元 に 
戻り ます (当然 残り 1 人 の と き は で きま せ 
AD), 


人 の スピ ビード は BASIC の 1080 行 の $90 2, 
モン スタ ー の スピ ー ド は 1120 行 の B1 の 値 
を 0 一 $CO の 範囲 で . 全体 の スピ ー ド は 同 
じ 行 の C の 値 を 0 一 $D0 の 男 囲 で 変え て くだ 
с. これ ら は 値 が 大 きく な る ほど 速く な 
0#7. 


ワッ プ モ ンス ター が 外 に 出 て きた ノ 


š 


ZIET 


z 
й 
й 
і 
| 
к 
2 
2 
8 
и 
к 
K 
я 
зй 
2: 


ハン マー の 使い 方 


аа 


2D) 
КТ” 
どちら か 進行 方 向 


この 位置 に いる と き 
た た ける 


0 3% この 位置 で は 
у. た た け な い 


モン スタ ー が ワー し だ た とき に 反対 側 の 
一 番 端 で は な く 〈, 少し 真ん中 より に 現われ 
5%, これ で と あど る 死ぬ の で イラ イラ ず すず 
る と 思い ます が 。 ワー し な いと 簡単 に な 
る の で も の まま に し て し まい まし な. と 骨 
し て も 嫌 な 人 は $31D5, $31DD, $31E5 を 
$20 に $31ЕР, $31EE を 1 に 変更 し て くだ 
きい 。 ワ ー プ し な く (ねり 、 あ ます 、、 そ れ と 。 Ж 
ンス ター の 表示 が 少し な か し く な る と き が 
あり ます . バグ は か な り 取 っ だ の で す が , 
っ て し に し まで まま を を だ る ゴメ オッ ナチ テイ. 


. 
„©. улл 
í СЯ Жы 2 
аруу а" - Д 


BASIC の 部 分 で 思っ だ より て まどっ て 
し まい まし た だ . 本 当 は も っ と 早く 〈 発 表す る 
つも り だ っ だ の で す が …. 

新しい ゲー ム を 作っ て いる の で , うま く 
で きれ ば 発表 し だ た いと 思い ます ( 何 度 か 失 
敗 し だ こと が ある の で , どう な る か は わか 


Ж 


41; 
nS — 
“Ми ° 
кз (ет : 

Z= - 
⁄ `< Š 
を いい - 
«Ал t 


Þ> XARA, 僕 と 友人 Y は パソ ンコ ン シ ョ ッ プ へ と 向かっ た の で あっ た . そし て PC-6001mkIISR に 「TALK 7442.77) #RUN 54+, 「 故 障 中 で 
す ク 」 と し ゃ で ら せ だ た まま, その 場 を 立ち きっ だ の で あっ た だ (PC.6001mkIISR の USER の 人 終っ て る か な ~?). (X2) 


piO 


スト 1 MONSTER ZONE BASIC U А F 


РОКЕӨ12,%1Ғ:РОКЕФ%15,6ҒҒ 
ОРТІОМСМОРЕ 1 : ОРТІОМОУҒ1 
A=0: РОКІ = まさ の の の TU 和 まさ の の F : A=A+PEEK (І) : МЕХ 


IF A=1638 THEN 6 の 
PRINT "LOAD MONSTER ZONE: М" 
MLOAD"MONSTER ZONE: M": CLS 
GOSUB 1 の の の 
U=USR ($ さ BAB ) : U=USR ($3840 。 $2B の の ) 
REM***MAIN 
A=PEEK ($2F87) 
A=A+1:IF MOD (A, 16) >9 THENGDTD9 さ 
РОКЕФ2Е87 ,A 
100 A=PEEK ($2F87) :A$=HEX$ (А) : B1=VAL (АФ) : 
В-В1-В1/10%10:ІҒ B=1 THEN125 の 
110 IF B=6 ТНЕМ1200 
120 ҮзҮ%2:Х2-Х2%1:ІҒ Y=Y3 THENY=Y さ ー4 の 』 X2 
=X さ 
125 РОКЕФ2Ғ9В,Х2: PUKE$2F6 さ 。Y 
150 A=PEEK ($2F88) :A=A+1:POKE$2F88,A: IFA= 
ZØTHENPOKE$2F88, 20 
140 POKE$2F95,$EØ+RND (10) :РОКЕФ2ҒВА,980: 
POKE$2F9Ø, 29+RND (10) 
150 РОКЕФ2Ғ99 , 8+RND (5) : РОКЕФ2Е89 ,Ø:POKE$ 
2۴94,0 | 
160 А=РЕЕК ($2F96) : A=A+1: POKE$2F96,A: IF М 
Ор (A, 16) >9 THEN16 の 
170 IF A=$20 THENPDKE$2F96 。 の 
180 IF PEEK($2F8F)=1 THEN 230 
190 ҒОК1-%2Ғ0070%2Ғ505ТЕР910:ІҒ RND (2) = の 
THENFOKEI +6, 1 
200 NEXT 
250 РОКЕФ2Ғ8С,%С2: РОКЕФ2Е80 。 $6A: РОКЕФ2ЕВ 
Е,%ЕВ 
240 A=USR ($38E8) : Q=USR ($391C) : A=USR ($384 
0,%2В50) 
A=USR (92740) : A$=HEX$ (А) : A$=RIGHT$ (A$ 


IF А%="@1" 
IF А%="@2" 
IF А%="@5" 
REM###MI SS 
A=PEEK ($2F8C) +256+PEEK ($2F8D) 
POKEA , $96: POKEA+1 , $97: POKEA+32 。 $98:P 
DUKEA+ さ る , $99 
550 РОКЕФСВОВ 。 ま E の : FUR 1 = の T ロ 6』 РОКЕФСВ05, I 
540 FURJ= の TO を も FFSTEPRND (20) +5: РОКЕӨСВО4, J 
:МЕХТ:МЕХТ:РОКЕФСВОВ,0 
550 A=PEEK ($2F86) : Q=Aー 1 』 IF An= の ТНЕМ450 
560 РОКЕФ2ҒВо,А:РОКЕФ2ҒВА, $80 
290 650702530 
400 REMXXXTIME UP 
410 ҒОНКІ-%СОЕОТ0%С0Е7:РОКЕІ,0:РОКЕІ%8,0: 
МЕХТ 
420 ҒОБН1І-%СОҒОТ0О%СОҒ7:РОКЕІ,0:РОКЕІ%8,0: 
МЕХТ ‚ 
450 LOCATE1 の 。 の :PRINTSPC (5) 』 "TIME UP !!! 


THEN3 の の 
THEN7 の の 
THEN4 の の 


440 РОКЕФСВОВ 。 $EQ: PDKE ま CB の 5 。5: FDRI=1TD1 の 
00:МЕХТ:РОКЕӨСВОВ,0 
449 REM***GAME OVER 


500 і ОСАТЕ 14,0: РКІМТ" 


450 і ОСАТЕ12,0:РКІМТ" 
"2 A=USR ($3840 , $2B30) 

460 A=PEEK ($2F80) : B=PEEK ($2F81) : C=PEEK ($ 

2F83) : D=PEEK ($2F84) 

470 IF А>С THEN48Q 

471 IF А<С ТНЕМ520 

472 IF B>D THEN48Q 

473 IF B<D ТНЕМ520 

474 IF PEEK ($2F82)<=PEEK ($2F85) ТНЕМ520 

480 POKE$C80QB,$EQ:FDRI=6TOQSTEP-1:POKE$C 

805,1: FORJ=1T050: NEXT 

490 POKE$C805,I+1:FORJ=1T050@:NEXT:NEXT:P 

DKE*CB の B 。 の 


GAME OVER 


HIGH SCORE !!! 
' " 
510 POKE$2F83 , A: POKE$2F84 , B: POKE$2F85,PE 
EK ($2F82) 
520 LOCATE17,Ø:PRINT" REPLAY? (Y/N) 
PICK К:ІҒ に = の THEN5 さ の 
IF К-78 THENLDCATE2 く , O: END 
IF К<>89 THEN5 さ の 
ВЕЕР:6507020 
REM###ROUND 
FDRT=1TD5 の の 』 NEXT: POKE 1 , $80: BEEP: BEEP 
zPOKE1 ,$AA 
710 А-РЕЕК(%2Ғ87):АхАж2:ІҒ А>50 ТНЕМА-50 
720 IF MOD(A,16)>9 ТНЕМА-А-1:06070720 
750 (ОСАТЕ10,0:РБІМТ" BONUS ";HEX$(A 


9 "00 POINT " 


755 РОКЕФСВОВ,0:ҒОКІ-1 701000:МЕХТ 


740 РОКЕФЗ5СА,А: А-(/5К(%55С9,0,А):РОКЕ6З55 


CA 。1 
750 ІЕРЕЕК(%2Ғ87)<>5 ТНЕМ770 

760 BEEP: BEEP: BEEP: PDKE$2FB6 ,PEEK ($2F86) 
+1 

770 IF РЕЕК(%2Ғ80) >%49 THENBO の 

780 (ОСАТЕ12,0:РБІМТ" NEXT STAGE 
"iPRINT" GOOD LUCK !" 

790 ВЕЕР: ҒОКІ=1702000: МЕХТ: 807090 

800 REM***GIVE UP 

805 POKE1 „, $80: BEEP 1 : FDRI=1TD1 の の 9: NEXT: ВЕ 
EPQ | 

810 FORI=ØT023:LOCATEI 。 の : PRINTSPC (32) 』 :N 
ЕХТ: CLS 

820 A$="CONGRATULATION":;FORI=1TO99:PRINT 
SPC (9) ; A$ 

850 ВЕЕР1І:ВЕЕРФ: NEXT: OPTION CMODEQ 

840 FORI=ØT023:LOCATE23,Ø:PRINT:LOCATE®, 
9:PRINTFLD(1);A$ 

850 ВЕЕР1:ВЕЕР@:КОН2=1ТО5@:МЕХТ: NEXT 

860 LDCATE2。5:PRINT"YDU ARE BEST PLAYER 
i" 

870 LOCATE4,5:PRINT"I M BEATEN. ":1.ОСАТЕ@ 
, 9:PRINTA$: OPTION CMODE1 

BB の Q=$COOO:FDRI=$2CAOTD*2E9FSTEP64』 FORK 
-0Т051:РОКЕА,РЕЕК(К%1):А-Ағ1 

890 МЕХТ: МЕХТ 

900 Х=%С208: ҒОКІ=%80ТОФВҒБТЕР4: РОКЕХ,І:Р 
ОКЕХ%1,1%1:РОКЕХ%52,1%2 

905 POKEX+33, 1+3: X=X+4: NEXT 


910 X=$C288:FORI=$90TO$9FSTEP4: РОКЕХ,І:Р 
ОКЕХ+1,1+1: PUDKEX+ さ 2 。 1+2 

915 POKEX+33, 1+5: X=X+4: NEXT 

920 FORI=@TD7:FORJ=1TO1@:K1=$2CA0+I*64: I 
FMOD (J, 2) = の THENK 1 =K1 +32 

950 А=0: FURK=K1 TDK 1 + さ 1 : РОКЕФС000+1 #32+A, 
PEEK (K) : A=A+1 

955 МЕХТ:МЕХТ:ВЕЕР:МЕХТ:ҒОКІ-170500: NEXT 
940 A=USR (まさ 4 の 。 も 2n の の ) 

950 ІОСАТЕ17,5:РКІМТ"ВҮ N.KOBAYASHI " 

960 LOCATE19.5sPRINT "ОМ 1985,2,1" 

970 POKE1 , $AA: END 

990 REM###SYOKI 

1000 A=$2A80: FORI=$CØ8ØTO$CØFF : PDKE 1 , PEE 
K (A) : A=A+1: NEXT 

1002 Аі-РЕЕК(%2ҒӨЗ) : R2=PEEK ($2F84) : Q さ =PE 
ЕК ($2F85) 

1005 ҒОКІ-%2Ғ00Т0%2ҒО9Ғ:РОКЕІ,0:МЕХТ 

1010 РОКЕФ2Ғ85 ,А1 : РОКЕФ2Е84 , А2: РОКЕФ2Е85 
A3: RESTORE: р=0: Е=0 

1020 ҒОКІ-%2Ғ00Т7062Ғ5Ғ5ТЕР16:КЕАр А,В: РО 
КЕ1+%0,А: РОКЕІ+%Е 。 Bs В=1 

1050 A=RND (4) : ІҒА>1ТНЕМВ=%Е0 

1040 IF А=@ ТНЕМВ=%ҒЕ 

1050 POKEI+$C,B:POKEI+$A,D:D=D+2: IF D=8 
THEND= の 

1070 Е=Е+1: NEXT 

1080 POKE$2F61 , $90: POKE$2F 6S , $FO: РОКЕФ2Е 
68, $F6 

1085 POKE$2F6B 。RND (250) : POKE$2F6C ,RND (25 
а) 

1090 РОКЕФ2Ғ86 , 3: РОКЕФ2Р87 , O0: РОКЕФ2Ғ88, 1 
9: РОКЕФ2ЕВВ, $80 

1095 РОКЕФ2ҒӘҒ,2:РОКЕ%2Ғ%96,0 

1100 CLSiLUCATE12。 の iPRINT"LEBEL (1-5) 1- 
LOW 5-НІЗН ? "; 

1105 PICK Az IF (А<49) + (А>55) THEN1105 
1110 А=А-49: ВЕЕР: РКІМТ А+1 

1120 В1=%80:С=%28 ` 

1150 X2=B1+A*3: Y=C+A*6 

1140 POKE$2F97 ,$FF:POKE$2F98,X2:P0OKE$2F6 
SY 


1150 
1160 
1190 
1195 
1200 
1210 
1220 
1250 
1260 
1270 
1500 


X さ =X2』 Y さ =Y+4 の 
FOURI=1TD1 の の 9: NEXT 

RET 

REM***CHAR 

A=$2CA0: GOSUB1 5O0 

PUKE*2FBF 。 1 

A=$2BEQ: GDTD1 320 

A=$2DAQ: GDSUB 1 5 の の 

РОКЕФ2ҒӘҒ,2 

A=$2B80 

FORI=$2FØØTO$2F5FSTEP16 

1510 POKEI+8,A/256:POKEI+9,A-A/256*256 
1520 A=A+8: NEXT: GOTO120 

1500 FORI=$3AØØTO$ZAFF : РОКЕІ ,PEEK (A) : A=A 
+1: NEXT: RET 

1510 DATA$C1,$66,$C1,$70,$C2,$66,$C2,$70 
:%С5,%45,%С5,%50 


Қамат ннен フ リス トク MONSTER ZONE TZ Z 1 д РИЯЛА ЕН КОН ЕНІ 


+7: SUM 
SE: CD 


SB: D8 
5B: D8 
40: CA 
73:34 
78:64 
6E: 62 
БА: ЕВ 
78:72 


оо 


| リスト 2 MONSTER ZONE マシ ン 語 リス ト 


+7: SUM 
91:88 
91:88 
94188 іг тос 09 、 SUS SO 90900 РӨ 187 L l| Um 
1D: CB 
00:91 
00:02 , +7: SUM 
91:91 F8:52 
52:48 FA: 58 
00:91 || ——————E Y Ғ4:76 
00:00 : EQ: 50 
! F2: SA 
+7: SUM ЕВ: 60 
90:В1 FA:62 
00:00 Ғ2:62 
91:B1 FA: S8 
002: 80 DØ: 2C 
Te НЕЧ F2: 4E 


+7: SUM 
D8: 3A 
Es 18 
FØ: 48 
E8: 2 の 
FO: 98 
ЕВ: 4А 
ЕВ: 20 
EQ: 91 
01:57 
の :FD 
осылады ы ыы ыш айласына akaqa upaqas Wa F8:14 
| 01:6Ғ 

00:02 

+7: SUM 00:00 

00:91 02:89 

20: の の | 80:01 

ЖАКҰ МКК БИ ИТ и FO БУ ШШ Шс зэ ЖЕ Чайын ашына a ҮТТЕ За ЫТ 

00:00 

00:91 

00:00 

91:91 

00: AD 

00:91 || ーー ニーーーー ニ ーーーーーーーーーーーーーーーーーーーーー ニ ーーーー 

の の : の の 

91:91 


+7: SUM 

90: Bi 

の の : の の 
TO 
00:7С 

90:Ві 

の の : の の 

91:B1 

00:00 

00:91 


i 
7 О) ゆい よい よ 高 3 で す ( 進 級 で きれ ば の 話 で す が ). H~ E£ CTD 2 FUA RRO CAT Ui SNOT, 今 の うち に パー コン の きわ 
OER り だ め を し て お り ま す ( ち な み に 機 種 は PC-6001)、 ああ , 受験 前 に EGGY を で き な い の が 心残り だ …. (GEN) 


оо 


ЈДК2 MONSTER ZONE マシ ン 語 リス ト 


+7: SUM 
67』 CC 
Eó: EQ 


7Ғ:51 
діннен +7: SUM 


сена 20:30 


Sanii 4C: D6 
7F:51 | ы е-е 


FE: D6 ; ам 
пор Ø: 3D 
Её: 4C 222 


00:7С кенді 
27:97 


OF: 2C 
40: 94 
C1: の 


+7: SUM 

7F s SF 

FE: 2F 

_1 じ s 76 

ағай +7: SUM 


00:57 27: 8A 
00:77 З 2. 


00:Е9 24:42 
жы; | ; 4D: 48 
рл , FF:58 
の の 』 D7 
00: SF 


+7: SUM 

Ед: Có 

07:ЕЗ 

00:46 

эч Әд +7: SUM 
E - A0: 2F 
e ØE: 83 


isa ; 50:В1 
020: FO ا‎ 
et 2F: ØB 
ЕС: 18 ey 
maaa B7:41 
+7:SUM 00:64 
90:1D ‘A1: 94 
B1: 4B ‚г Жай 


ВЕ: ЗЕ 6F s CE 
01:69 
4С:ғҒ2 
в7:1А 
@1:8С 
@1:08 
7Е:ЕА 
の 1 』 さじ 
12: DF 


оо 


+7: SUM 
2F: B9 
の の : ВВ 
02:ЕС 
40:54 
2Ғ:57 
ЕҒ:47 
C2: 4р 
2F: C9 
FF: SD 
59:86 
01:08 


+7: SUM 05:18 
A7: 2A ВА: Bé 
の 1 』 CA の 1』F1 
21:08 01:08 
2Ғ:4с д: ЕЕ 
81:41 B6』 СС 
39: ØF ; AF: 38 
CO: 6F 01:29 
2Ғ:С9 | 6A: の の 


+7: SUM 
08:60 
39: 6D 
F7: DA 
59:Ғ6 
01:08 
21:08 
9: SA 
61: 8A 
56:99 
2Ғ:00 
2Ғ:94 


示す る まで し か 載っ て いま せん で し だ 。 パパ ソン コン ショ ッ プ の な い 僕 の 町 (を うい う 所 は 村 だ っ て ?) で は , こう いう 本 は 本 屋 に 注文 し て 手 に 入 
” れる まで 内 容 は わか ら な い の で す . PiO に 載っ て いる よう な グラ フィ ッ ク の きれ いな ゲー ム は どう や っ て 作る の で し ょ う . Fi b kuk £ 
VA 紹介 し て くだ さい . ` (科学 万 博 に 行き た い Katton) | 


O (O) О; О) だ れ か 教え て くだ さい . マシ ン 語 の 活用 法 の 載っ た 本 を . 今 ま で に 3 冊 ほ ど マ シン 語 入 門 の 本 を 読み まし た . しかし, どれ も 文字 を 画面 に 表 
` 


BASIC 十 マシ ン 語 


VIC の ユー ザー 定義 を 使え ば , G-RAM 
を 持た な い VIC で も か な りき れい な ドラ ム 
回転 が 可能 で す . この プロ グラ ム は 最初 は 
ドラ ム が 1 個 ず つ し か 回 ら な か っ た の を 3 
個 同時 回 転 に 変更 し , 更に キャ ラク タ ご と 
に 色 を つけ て み ま し た . ドラ ム 回 転 は マシ 
ン 語 を 使い 速く , 自分 で も か な り 満 足し て 


いま す . ぜひ 入力 し て 遊ん で みて くだ さい . 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


1800--1ВҒҒ 
1000--1007 
1098--1ЫОҒҒ 


ドラ ム の 回 転 が と て も 早く て いい で 
すね . で も 役 判定 を も う 少 し 甘く し 
| た 方 が も っ と 遊べ ます . (V) 


PiO84 年 5 月 号 の モニ タ か , VIC-1213 
(モニ タ ROM) な ど を 使い , リスト 1 (マシ 
ン 語 部 : $1800—$1BFF), リス ト 2 (т 
シン 語 部 : $1D00~$1D07, $1D98 一 
$1DFF) を 入力 し ます . 間違い が な けれ ば , 
РОКЕ43, O: РОКЕ44, 24:РОКЕ45, О: 
РОКЕ46, ЗО:РОКЕ51, О:РОКЕ52, 32: 


РОКЕ55, О:РОКЕ56, 32| RETURN | と し 
な た 後 , SAVE "SLOT М”, 1, 1[ RETURN | 
eL TESTET a 
次 に SYS58232| RETURN | に し た 後 , 
リス ト 3(BASIC 部 ) を 入力 し ます 。 そし 
て POKE45, OzPOKE46, 3O:POKE5 1, O: 
この スピ ー ド で は うま く 止 め ら れ な い ? 
35-1: 436 
S i Р ЕС Р ном? : 10001 
HI—S: 457 
TABLE 


2 
Ес) 
65 
а 
£, 


VIC-100 1+3KRAM 


スー パー スロ ッ ト 


表 1 アド レス ・ マ ッ プ 


初期 化 (キー 入力 前 の スク ロー ル , カ 
ラー 用 スク ロー ル , キャ ラク タ 用 スク 
ロー ル の クリ ア ) 

初期 化 (キー 入力 判定 の クリ ア ) 


ドラ ム 回 転 1 サブ ルー チン 

ドラ ム 回 転 2 サ ブ プルー チン 

ドラ ム 回 転 3 サブルーチン 

メイ ン ・ ル ー チ ン (時 間 か せ ぎ , 音 だ 
L, 入力 判定 ) 


POKE52, 32:РОКЕ55, О:РОКЕ56, 32 


と し た fk, SAVE"SUPER 
SLOT”, 1, 1| RETURN | し し て セー ブ し て 
くだ る さい 、。 

VIC で マシ ン 語 を モー プ す る 場合 , 
BASIC の ポイ ンタ を 書き 換え な けれ ば な 
ら な い の で 手順 が 面倒 で す が , 間違え ず に 
АЛТ СТР, 


RUN す る と 掛け 金 を 聞い て きま す . [1] 
ー[5| の キー が 1 一 5 の ライ ン に 対応 し , キ 
ー を 押し た だ 回 数 が を その ライ ン の 点数 に な り 
ます . この と き , キー リピート が きい て い 
る の で 1 回 ずっ と 押し て いる と 点数 が 上 が 
っ て いき ます . 各 ラ イン と も 最大 9 枚 ず つ 
掛け られ ます . 掛け 終わ っ た ら | RETURN | 
で ドラ ム 回 転 で す . 

|1 |,|2|.|3| の キー で ドラ ム は 止ま り ま 
Тт», 好き な 順に 止め る こと が で きま す . 
だ た だし, ドラム が 1 回 転 以上 回 転 し な いと 
ЕШ о бк Ar 


SC-1 が 10 万 点 以 上 , また は SC-2 が 0 点 


て ゲ が ーー ムー エン ます . Aa : ド プロ が 3 
つっ 並ぶ と 強制 エン ド に な り ま す (SC-2 が 50 


点 以 上 に な る と , 50 点 より 多い 点数 が SC- 
1 に 加算 きれ ます ). 


この ゲー ム の 特徴 は な ん と いっ て も 最初 
に 述べ た と お り ユ ー ザ ー 定 義 を 使っ た ドラ 
ム 回 転 で す 。 この ドラ ム に は ユー ザー 定義 
を 48 個 も 使い , カラ ーRAM を スク ロー ル 


ШЕШІ 


表 2 デー タ , ワ ー ク : エ リア 


乱数 デー タ 
キャ ラク タ 表 示 

キー 入力 前 の スク ロー ル 
カラ ラー スクロール 

ドラ ム の キャ ラク タ 
キャ ラク タ の 色 

キャ ラク タ ・ ス クロ ー ル 
キー 入力 判定 

キャ ラク タ の 番地 デー タ 
カラ ーRAM 用 デー タ 
キャ ラク タ の カラ ー 
どの 乱数 を 使う か 

1 っ デモ , それ 以外 一 ゲー ム 開 始 


役 判定 サブ プル ー チ ン 
ERR ( 点 減 ) サ プ ブルー チン 
ドク ロ が 出 た と き の 処 理 サ ブ プ ブルー チン 


ドラ ム と ライ ン 


きせ る こと で , キャ ラク タ ご と に 色 が つい 
て いる よう に 見 せ て いま す . 

まだ , マシ ン 語 で の ドラ ム 回 転 は わか り 
' や すく 〈 作っ だ つも り で す ( ド ラム 1 ユー3 は や 
っ て いる も こと は 同じ で す 、 まだ 7 を ・ 
リア 等 も 一 箇所 に お きま し だ ). 


125. 
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“ЕЕЕБЕРЕЗЕЗЫЕЕУЕВЫ 
Y は SSE ト SSBUEMM&SES15 
で は ご SSKSSS ざ ok まる baeje 


(ペー ロク ) 


さす ます オオ ココ オ すま 
+SSSSSSSSSSNNESSSIS 


ТЕВЕРЕСЕШЕЗЕРЕРЕЕ% 
TS さこ pSCESCESSESSSi 


EEIW2S 


1 


1 印 の 部 分 は , € 


< 


©=@&@& 


結果 は 良好 . ボリ ュー ム を 最大 に 


< 
$- 
4» 
<- 
を = 
< 
<- 
$- 
<- 
<- 
<- 
< 
<- 
$- 
<- 
<- 
< 
$- 
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2 


EXT 


но 


ІЕКІОНТ6(В6,224"44"ТМЕМСа8: Веб 
IFLEFT$(B$ , 2)="88" THENC=8 : Ве5 
IFB$="555"THENCs11 :B=s4 


460 B$=CHR$(R(2)/32+51)+CHR$(R(5)/32+51) 
%СНК%(В(82/32%51) 

478 0081/9900:С(12еС:8(1уеф Қ 

490 B$=s=CHR$(R(1)/32+31)+CHR$(R(4)/32+51) 
*$CHR$(R(7)/32+51) 

490 0051/Р900:С(22еС:9(2)ер 

500 B$s=CHR$(R(3)/32+51)+CHR%(R(6)/32+51) 
+CHR$(R(9)732+51) 

510 00579900 :С(3)әС:ВСЗ)=В 

520 ВФеСНК%(8(12/32%512%СНК%(8(52/32%51) 
4СНК%(8(92/32%51) 

530 00508000 :С(4)=С:В(4)=В 

540 B$=CHR$(R(3)/32+51)+CHR$(R(5)732+51) 
СНК САС7)32+51) 

550 0051/В800:С(5)еС:8(52еВ 

600 КЕМ SCORE 

610 HaQ:FORA=1 TOS : HeH= D(A) : ІҒВСЯ) ОӨТНЕМ 
00818900 


620 NEXT 
630 0=190:T=SGN(H) : U=S+H : FORS=STOUSTEPH/ 
190 

640 PRINT"SQ";SPC(15);"R";INT(S);" 1 "ІРО 


11 + u 
KE36876,0:POKE36876,0-16:0=0+T/2:NEXT 
650 S=U:POKE36876,@ 


660 PRINT"SQ";SPC(15);"R";INT(S); "I " 
+ нано”. 
678 FORfm1T0S66 : GETBS : NEXT : ІР5<51ТМЕМ6980 
680 FORS=STO51STEP-1:Sl=S1+1::PRINT"SRE" 
: | ч 
;SPC(15);S1:PRINT"R";SPC(15);S;" 1 ":МЕХТ 


Т + 
699 IFS15>=1000000RSC<=@9THEN70@ 
695 8070306 
700 IFHS<S1THENHSsS1 
710 РКІМТ"5000ЕК"; SPC( 10) ; "REPLAY Y/N" 


イイ イイ イト 
720 PRINT"QER" ; SPC( 15); HS 
7“ 


730 GETAS: IFR$="v"THEN30 
740 IFR$="N" THENP0KE36969 , 240 : POKE36879, 
27:PRINT"e+":END 

> M 
750 POKE36879,9:FORRm1T03 :POKE6911,1:SYS 
6699 : NEXT 
760 FORRm1T0999:NEXT 
770 0070732 
900 Сад: Ba 
818 IF(LEFT$(B6,1)="3")+(MID0(B$,2,1)="3 
")+(RIGHT$C(B$,1)="3")s-2THENC=6: Ве? 


900 FORB=1T03 : ПеРЕЕК(С38774%22%б) : EsPEEK( 
38565444ЖВ(В)):РОКЕЗ6876, 230 

910 РОКЕЗ84804Я,16:ҒОЮСя0Т709: POKE38774+2 
2ЖЯ4С,16:РОКЕЗ8565444ЖВ(82%С,16:МЕХТ 


920 тоол н о шы 
930 POKE38480+R, 1:ҒОЮСе«0Т709:РОКЕЗ8774%22 
ЯЯғС,Т:РОКЕЗ8565%444В(824С,Е:МЕХТ 
940 МЕХТ:НеНеС(ВУЯТСВ):КЕТУКМ 
950 РКІМТ"50000000" 

i т." 
960 FORA=1TO0S: BCAA :PRINTSPC( 11); "09 9 

+ 


9 9 9" : 60SUB900 : NEXT : RETURN 


ゲー ム の 説明 | リス は や られ て 何 秒 か 後に ビ こ か ら か 再生 |+. 


し に まず 。 ⑯ 木 に な っ て いる どん ぐり に は 限り が あり 
⑨ プ レイ ヤー は リス を 操作 し て , どん で ぐり @ プ レイ ヤー は 木 の 上 か ら ど ん で ぐり を 落と ます . 残っ て いる どん で ぐり を 全部 巣 に 運ん 
の 本 か ら ど ん ぐり を 取っ て き て , 巣 に だ た め U Con ゲ ャ マサ ス を 下 や っ つけ る こと が で き | で も クリ ア で き な い と き は 。 プ レイ ヤー は 


кф AE чы: М.П 27, 浅 と し だ どん で り は 壊れ て し まい ま 自動 的 に 死に ます . 
@ 決 め ら れ た 時 間 内 に , 決め られ た 数 の ど | 
ん で ぐり を 巣 に た め る と クリ ア で す . 1 全体 画面 


@ 那 魔 を する や つ は ジャ マリ ス で , プレ イ 
ヤー より 速く ぐ 動 き ,、 プレ イヤ ー と 出会う と 
プレ イヤ ー は 死ぬ こと に な り ま す . 

⑳ ゲ ー ム の 主 画面 に は , 両 隅 に 巣 と どん で ぐ 
り の 木 が あり , あと は 草 や 木 や 川 で 迷路 的 
に 作り ます . 川 は 丸太 橋 の と ころ し か 渡れ 
ませ ん . ほか に 容 が あり , 巣 の 横 に ある 究 
は 巣 へ の 出入 り に 使い , 他 の 究 は 2 つ ず つ 
Слот т, 地下 で つなが れ て いま す 。 
これ は 見 だ だ け で は わか ら ず 。 入っ て 初め 
TODA ま 人 に し ます | まだ た 。 大 ちら そそ かち 
他 の 穴 に 出る まで の 時 間 は , 距離 に 比例 し 
87. この 究 に は ジャ マリ ス も 入れ る の で , 
中 で プレ イヤ ー と 出会う と デレ イヤ ー は ば は 死 
асыпты т, 

⑥ プ レイヤー は どん で ぐり を 道 に 落と すこ と 
Саз? そこ に ジャ マリ メス が 来る と 。 
どん で ぐり を 食べ る 間 を そこ に じっと し て いま 
す . 巣 に 出入 りす る 穴 
ジャ マリ ス は た だ たま に 上 巣 に 入り 込ん で , E 
ん で ぐり を 何 秒 か に 1 個 食 べ て し まい ます . 
その と き プ レイ ヤー が 巣 に 戻る と ,。 ジャ マ 


PASOPIA 7 


マシ ン 語 


'84%+ 9 月 PASOPIA 7 愛好 会 を 結成 し , 
その 第 1 回 作品 と し て 作っ た プロ グラ ム で 
+. ひたすら 高 得点 を 狙う よう な ゲー ム 
ETF, 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC (チェ ッ ク サ ム ・ プ ログ ラム ) 
マシ ン 語 8600~EF57 
スタ ー ト FF01 


777 


aa 。 。| 面白 い ゲ ー ム で す が , ちょ っ と 大 
„== ЕНЕ (м) 


プロ グラ ム は 裏 RAM 上 の 1000H 一 7957H 

に ある の で , 入力 に は ちょ っ と 注意 が 必要 

СТ. ХОЗЖСАЛСОЛТ (7756ж. 

` @CLEAR, &H8SFFIRETURN | と する . 

Ө!) х Р 1 の 8600HーEF57H を 入力 . 

@ リ スト 2 の チェ ッ ク サ ム ・ プ ログ ラム を 
А3). 

@⑳ チ ェ ッ クサ ム の 確認 . 

⑳ チ ェ ッ クサ ム が 合っ て いれ ば BSAVE 
#ー1," フ ァイル 名 8. Н8600, &H6AOO 

[RETURN | で テー プ ' に セー ブ ". 

BLOAD %-1,"7”4/,-%”, &H1OOO 
[RETURN | で プロ グラ ム を ロー ド . 

の BSAVE キー1. "ファ イル 名 ”", &H1OOO, 
&H6AOO|RETURN | で 別 の テー フ ' に セー 
TIS. 
以後 , BLOAD # —1, "77 1 л” [RET 

URN | で プロ グラ ム が ロー ド で きま す . 


と に か く 〈 裏 RAM の 1000H へ ジャ ング し て 
くだ さい . 電源 投入 直後 で あれ ば , MON 
[RETURN |』FFO1|RETURN | て 起動 し ます . 
これ は 使っ て いる アセ ンプ ブラ に OFFSET 命 
令 が な いた だめ , 他 の 番地 に 落と せな か っ だ た だ 


の で す . 


デ ロ グ ラム は 全部 マシ ン 語 で 組ま れ て い 
š+. BGM や 効果 音 の ルー チン は BIOS を 
使わ ず 自 分 で 作り まし た だ . 他 の プロ グラ ム 
に も 使え る と 思う の で 解析 し て 使っ て みて 
(77%, な な スコ ア は 最高 2, 569, 990 ま 
で 表示 で きま す が ,。 それ 以上 は 保障 で きま 
せん . 


[all2][4][e| で 上 下 左右 に 動き , 

キー で 弾 を 発射 し ます 弾 は 他 の 弾 や 壁 に 
当たる と 反射 し ます . そし て 大 球 , PR 
小 球 に 弾 が 当 だ た る と それ ぞ れ 変色 , 分 裂 し 
ます . 全 減 る きせ る と 1 面 ク リア で す . 

な お 弾 が ある 場所 (乱数 に よる ) を 通過 
する と 何 か が 出 て きま す . それ を 取る と ボ 
ー ナ ス で す . ボー ナス に は s 晶 , ©), s2x, 
s3x,… 等 あり , s 人 は 弾 が 8 発 ま で 連射 で き 
る よう に な り , «Ф5Н 2911 つ 増 え , s2x, 

アド レス ・ マ ッ プ 


16X 8 PUT ルー チン 
32x16 PUT ル ー チ ン 
メイ ン ・ ル ー チ ン 

や られ た と き の 処 理 
ボー ナス ・ プ リン ト 
GAME OVER 
残り の 表示 

BGM 

効果 SOUND 

SCORE 表示 
HI-SCORE 表示 
乱数 発生 

タイ マー 
ステ ー ジ 表示 

タイ トル 表示 

キー 入力 

ワク 表示 

グラ フィ ッ ク ・ デ ー タ 


100 CLEAR ,&HGSFF: DIM Z(15):WIDTH 80: DEF 
INT A-Y 

110 DEF FNC$(ZX)=RIGHT$ ("Ø"+HEX$(ZX),2) 
120 INPUT"START ";SS$;S=VAL ("&H"+S$) 

150 INPUT"END "sE$:E=VAL ("&H"+E$) 

140 FOR І-5 TO Е STEP 16:2=0:ІҒ Із5 OR R 


IGHT$ (HEX$ (1) ,2)="@@" THEN GOSUB 180 

150 P$=HEX$(I)+" " 

16@ FOR J= の ТО 15: р=РЕЕК(1+Ј) : Р%=РФ+ҒМС%Ф 
(D)+" ";Z=Z+D:Z (J)=Z(J)+D:NEXT J 

170 P$=P$%$+":;"+FNC$ (Z) : GOSUB 220:МЕХТ 1:6 
OSUB 200: END 


ゆす ご い ノ 4 月 号 は FP 逆襲 号 だ //PROJECT 区 すご いで すね ーー, FP で ここ まで で きる と は / 


ボー ナス 出現 ./ 取っ て お こう 


ther +e ...- .% 5% 


s3x, … は それ 以降 の 得点 が それ ぞ れ 2 倍 モ 
ー ド , 3 倍 モ ー ド に な り ま す . 


高 得点 の こつ と し て ,s 人 は 必ず 2 面目 に 
ある の で 必ず 取っ て くだ きる きい. あと は ひだ 
すら 撃つ べし. 

この ゲー ム は , まだ まだ 改良 の 余地 が あ 
d f Fh, 次 の ゲー ム の 作成 が 忙し く な っ 
て きた の で 打ち 切っ て 完成 きせ て し まい ま 
(72. 近い うち に DEMO や チャ レン ジン グ 
・ ス テー ジ な ど を 入れ て きる さら に 完成 きせ だ 
いと 思い ます . 
参考 文献 
1) “Z80 マ イコ ング ログ ラム テク ニッ ク グ ” 

電波 新聞 社 
2) “PASOPIA 7 テク ニカ ル マ ニ ュ ア ル ", 

東芝 


= リス トク PASOPIA 7 用 チェ ッ ク サ ム プロ グラ ム они 


180 IF І<>5 THEN GOSUB 200 

190 P$=CHR$ (15) +"ADD ":FOR 2-0 ТО 15:Р% 
=P$+"+"+HEX$ (J) +" ";NEXT J:P$=P$+"SUM":G 
OTO 220 

200 Р%-5ТНІМО%(57,"-"):РКІМТ P$ 

210 P$="SUM: ": Z=Q: FOR 2-0 ТО 15:P$=P$+" 


"+ЕМСФ (2 (J)): Z=Z+Z (J): Z (J) =@:NEXT J:P$=P 
$+" ;"+FNC$ (2) +СНКФ (10) +CHR$ (10) :7-0 
220 PRINT P$:RETURN 


アテ アーネスト 最高 で すね ーー, つい に 出 た だ FP の 


グラ フィ ッ ク ・ エ ディ タダ タ / お お っ / ソノ シー ト ま で 付い て いる で は な いか , この 号 を 境 に FP の 未来 は 大 きく 開け た の で あっ た / PS. 

関係 な いけ ど 。 4 月 号 表 紙 右 上 の ピ ォ 君 の つぶ ざら な 瞳 に 感動 し まし た . P.S.2 も っ と 関係 な いけ ど , PiO 読 者 に まる か レモ ネス ト は いな い 

9 Сера? (どど ん ば 大 橋 ) 
А. 


m リス ト 1 DRIBBLE マシ ン 語 リス ト 
BAFØ 58 78 F8 


PQ 


リリ スト 1 DRIBBLE マシ ン 語 リス ト 


PiO の 読者 の 皆さん 初め ゆま し て ノ / わ た くし 群馬 の 伊勢 崎 市 し に ト う ヘン ピ な と ころ に 住ん で お ЖҮ, まっ 。 HUNYA と で も 呼ん で くだ さき さい. 
と ころ で , この た びわ だ た くし め は 県 立 の 某 高 校 に 合格 し まし た (田んぼ の 中 に ある きた な い ( ゴ メ ン ナ サイ ) 学 校 な の で す ). 思え ば あの 長かっ 
だ た 暗い 日 々 …。 あや うく ほこ り に うず まり “ちゅ どー ん " と ば か り に 爆発 (ボウ ソウ?) し そう に な っ た 我 が 愛 機 . つら か っ た ろう . も うこ 
ん な め に は あわ せな いか ら ね . SR な ん て 気 に す る な , ディ スク が な ん だ , ああ 貧 之 人 に は つら い 時 代 だ な ぁ …. PS. ども 失礼 し まし た ぁ 


| 


piQ 


~ 


ADD +Ø +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F SUM 
9EQQ DD 66 01 DD 6E 02 ЗЕ 04 84 67 2C 2C 2C CD DB 31 :18 


(ふん に ゃ ) š 


—V FA n. F 


Pio 


7Е В7 С2 3B 52 


ЖАМ” の “ニモ ニッ ク っ OP ュ ー ド 対応 表 " を も らい , PC-1350 を 他 の 友人 か ら 借 り て ゲー ム を 作っ て いま す . 
(原田 知世 ファ ン の ポケ コン ・ キ ラー こと CRAZY БАТ) 


EE っ le 

76) о) どなた か シャ ー プ の ポケ コン の マシ ン 語 に 詳し い 方 に お た ず ね し た い . レジ スタ の 中 に K, し と いう の が あり ます が , これ は どの よう に 使 

Ол Ол š う の で し ょ うか ? イン クリ メン ト と デ ク リ メン ト し か な いよ うな の で 使え な いよ うな 気 が す る ん で す …。 私 は 友人 か ら "ポケ コン ・ マ シン 
т; 


PG 


| リスト 1 DRIBBLE マシ ン 語 リス ト 


оо 


リス ト 1 DRIBBLE 


マシ ン 語 リス ト 


P じ ょ ー れ ん き ぼ う の T 衝 へ 、 わ たく しめ の 「 チ ェ ッ クサ ム ・ ト ー カ ー」 を あな た の よう に 喜び 筋 ん で 使っ て く て だき さる 方 が いる な ん て 。 信じ 
られ な いく ぐら い に う れ し い こと で す . 実は あれ は 恐る 恐る し か し 真面目 半分 に 投稿 し た も の な の で す が 、 な,。 な ん と 掲載 さん て し まっ た の 
で す . で, ひょっと し た ら 原 稿 笠 が 入る か な あ , も し 入っ た ら 妻 子 に ご ち そ う で も し ょ うか な あな ん て 半信半疑 で 待っ て いた ん で す が , どう も 
あの コー ナー は 対象 外 の よう で し た . こん な に 受け る の な ら PiOBOX に で も 投稿 すれ ば よかっ た と 悔 まれ ます (も っ と も 採用 され た か な ?). 


pio 


リス ト 1 DRIBBLE マシ ン 語 リス ト 


今度 は マシ ン 語 版 に 挑戦 し ょ うと 思い ま ー す . た だ 1 点 訂 正 が あり ます . 裏 RAM の マシ ン 語 領域 は 4720Hー7FFFH で し た . 少し 狭く な り ま 
+. また だ , 9000 有 H 以 降 と あり ます カ が, REM 文 な ど を 削っ て CLEAR 文 を 変更 すれ ば も っ と 広がる は ず で す . 試し て みて くだ さい . ( ひ & ひ ) 


2412, 


š 


+9 
go 
の の 
go 
go 
go 
の の 
go 
の の 
の の 
の の 
の の 
の の 
go 
go 
go 
go 


9 


706) A ゆ わぁー い 。 ソノ シー ト か ら の ロー ド に 成功 し た よ ぉ . ソノシート を 厚紙 に モロ テー プ で 止め て プレ イヤ ー に か けた ら 。 今 まで 針 を 飛ば し て 
Оле KE 


ゴキ ゲン な な め の プ レイ ヤー 君 が , ちゃ ん と 音 を 出し て くれ だ ん で す よ . 感謝 感謝 . P.S. 私 は , PC-6001mkII ユ ー ザ ー. GUMGUM 
ЖЖ WORLD, SCROLL SNAKEIIO 2 本 に 成功 し た の だ . (KEKE) 


285 


% 
0 


1765888588812 


лт 


テー 


F 
F 
a 

де 


88888888882 


à 


88888888888588888: 


Дд, 


piO 


| リスト 1 DRIBBLE 


ADD 
DE の の 
DE 1 の 
DE2 の 
DE30 


+ る 
5і 


118898 


マシ ン 語 リス ト 


+5 +6 +7 +8 +9 +A +B +C +D 
02 の の 05 の の QQ ов QQ оо QQ 
22 21 41 ҒҒ ҒҒ 7Ғ 7Ғ SF ЗЕ 


00 00 00 ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ 
の の 00 00 ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ 
の 1 00 00 ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ 
FF 00 QQ 80 82 40 40 20 20 
の の оо QQ 20 84 10 CO 88 10 
の の оо の の の の QQ の の QQ QQ QQ 
の 1 の の の の да の B の 1 00 の の 00 
FF 00 00 B の 82 40 40 20 20 
の の の の 00 20 84 10 CO 88 10 
の の の の の の QQ の の の の QQ の の QQ 
01 00 00 QA の B 01 00 00 00 
FF 00 00 ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ 
ЕҒ 00 00 ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ 
80 の の 00 ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ FF 


1998858585 8688864 


+5 +6 +7 +8 +9 +A +B +C +D 
の の の の QQ ҒҒ ҒҒ FE FE FC FC 
の の の の の の 9 の BO 20 40 00 の 9 
ҒҒ 00 の の の の QQ の の 01 QQ QQ 
во の の の の 02 の の ов Ø 84 QQ 
の の の の の の 11 81 82 02 04 84 
の の の の の の 9 の во 20 40 00 の 9 
FF 00 の の の の の の の の の 1 QQ QQ 
ва の の QQ の 2 の の ов QQ 84 の 9 
の の の の の の 11 81 82 02 04 84 
の の の の の の の の の の QQ の の ве оо 
40 во BQ の の の の の の の の OF 70 
の の の の の の 00 QQ の 1 FE 10 04 
の 1 の の 04 の の 00 ҒҒ 10 82 QQ 
ФЕ 75 АЗ の の の の 00 の の QQ の 9 
7Ғ FF ҒҒ 00 00 00 00 ОҒ 7Ғ 
FF FF ҒҒ の の の の の 1 ҒҒ ҒҒ ҒҒ 
СВ Ғі 55 45 61 53 91 ВВ Fó 


2А 01 11 00 QQ ҒҒ ҒҒ FF FF 
ЕҒ ҒҒ ҒҒ 00 00 80 ҒҒ ҒҒ ҒҒ 
ЕЕ FF ҒҒ QQ QQ QQ QQ FØ FE 
FF FF FF QQ QQ QQ QQ QQ QQ 
FE FF FF 00 QQ FF 00 11 08 
BB 24 bA 00 の の ве 7F ов QQ 
во の の во оо の の の の 00 FO QE 


+5 +6 +7 +8 +9 +A +B +C +D 
の の 00 оо QQ 00 QQ QQ QQ QQ 
2А の 1 11 9@ во 54 40 20 25 
の の の の QQ の の の の QQ QQ QQ の 9 
の の の の の の 12 ір 00 の 9 の 1 00 
01 00 QQ 21 94 2E ØC 12 16 
FF 00 00 ҒҒ ҒҒ 7F 7F 3F SF 
00 00 00 ҒҒ ҒҒ ҒҒ ҒҒ FF ҒҒ 
00 00 00 ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ 
の 1 の の 00 FF ҒҒ ҒҒ ҒҒ ҒҒ ҒҒ 
FF の の の の 90 во 54 40 20 25 
の の の の の の の の の の の の QQ QQ QQ 
の の 00 00 12 ір 00 09 01 00 
の 1 の の の の 21 94 2Е ОС 12 16 
ҒҒ の の 00 AD Fé 65 4A 50 C4 
FF の の の の 10 6 の 48 1 の во QQ 
во の の の の の の の の ое QQ QQ の 9 


FF FF FE FE FC FC 
65 4А 


88888882820 
8 


FF 


Š 
т 
М 
® 
に 
8 
š 
m 
а 


ロー プレ ね ぇ , シミ ュ レ ーション ね ぇ , アダ ルト ン ソン フト は 何 も ん だ / ア ド ベ ンチ ャ ー あ る けれ ど , 絵 の 出 て くる の は 見 た こと ね ぇ / 高 グラ ね 
i, カラ ーPCG ね ぇ , た まにある の は 単色 だ / 色 は 7 色 で る けれ ど , 20 回 以上 変え らん ね ぇ /PSA ね i, FM ね ぇ , だ た ま に 出 る の は BEEP 音 / 
パ バンク 切換 も ね ぇ , ある わけ ね ぇ ,。 お ら の PC に ゃ 裏 RAM が ね ぇ / P.S. P.8 ユ ー ザ ー の 皆さん ご めん な るい. で も 僕 も P-8 ユ ー ザ ー な ん で 
Ті. PS2 MZ-80K/C な ら 、 も っ と や りや すか っ だ .「 カ ラー ね ぇ , ドッ ト も ね ぇ , だ ま に 出 る の は キャ ラメ ル だ 」 だ か ら 宛 談 で すっ て 


Ep” 


фт TA PO HLHI ry? 
24-257 


PUL RLI, пов уг+ 2813123. 


北海 道 жон 
ば / PS3 わーい , 椎名 る ん とり ょ うこ さる ん の 合同 イラ スト だ ー/ (私 は 没 連 ロー ディ スト ・ あ い 節 人 ) 


埼玉 県 伝 支 連 児 横浜 市 が が ん ぼ mkIl こ と GGB2 


PIO 
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前 回 の スク エア で は 発足 する と いう こと 
を 述べ だ わけ で す が , 今回 は 活動 に つい て 
子 定 を 述べ て み だ い と 思い ます . 

ぇ 一, 会 名 は 猫 同志 社 こ と UOC(Union 
of the cat) です. これ は PiO 投 稿 者 FAN'*S 
クラ ブ と で も 申し まし ょ うか , つま り 投 稿 
者 の クラ ブ で す . PiO の 常連 る ん の FAN 
と か , 常連 人 を めざし て いる , 現在 も 活躍 
中 だ etc. い ろ い ろ な 人 に 入会 し て も ら お う 
な ん て 思っ て いま す . ジャ ン ル も 自由 で , 
PiOPiO 投 稿 者 や イラ スト 投稿 者 プロ グ 
ラマ , その 他 各 種 投稿 者 0?) に 参加 し て も 
524 & p iF E ШӨТ. 

る て, 活動 に つい て で す が , 次 の よう な 
> kp pap U Ж УЫ ЧАШ Зы 00 
①MINI ュ ユミ 誌 の 発行 (会 誌 ) 

いわ ゆる 会 誌 で す が , PiO の 投稿 者 が 集 
まっ て いる わけ で すか ら , これ は PiO の 海 
賊 誌 and パ ロディ 誌 に し て み だ い と 思い ま 
+. つい で に PiO 編 に 進呈 し て 好評 を 得 て 


PiO の 主流 は リア クシ ョ ン ・ ゲ ー ム で あ 
b, 確か に マシ ン 語 の 速い じい も の で な いと エエ 
аА ETAS А, が > だ だ いた だ すま ら た に 
マシ ン 語 ば か り 使 う の ゎ 疑問 で す . ひど い 
も の に な る と, 某 誌 の ソフ ト で 何 の 意 味 も 
な く マ シン 語 を 使っ だ た シミュ レー ショ ン ・ 
ゲー ム が あり まし ただ. 

菩 ,。 別 の 革 誌 で 「 マ シン 語 を 使う の も い 
ぃ が 。 BASIC で 速く する の も 大 切 だ 」 と 
言っ て まし だ が, まっ だ た くそ の と お な り だ と 
思い ます . BASIC を 重視 する 方 に 言わ せ 
а, 「 マ シン 語 は レベ ル が 高い と は 言え 
Жо, 速い こと と メモ リ 効 率 が 良い こと 以 
УҺ と りえ が な いで は な いか 」 で し ょ 2 う 。 

マシ ン 語 は ハー ド の サポ ー ト に は ROM 
内 ルー チン を コー ル す る か , I/O ポ ー ト を 


PiO を 創刊 号 ( 準 備 号 も 含め て ) か ら 読 ん 
で いま す が , PiO は I/O に な い 魅 力 を 持っ 
て いる と 思い ます . 試し に PiO と 1/O を 読 
( み 比 さて くだ る い 。 わ か り ま し だ か ? 
PiO i- ñ > C IO i: oj. それ は 
"EASY#” です. 1I/O に も EASY る は あり 
ます が ,。 PiO の それ と は 少し 違い ます . 

形容 し に くい の で す が ,。 PiO は 比較 的 意 
見 を 言い 易い の で す . 「 ア ニ メ 論 争 」 な ど 
が 良い 例 で し ょ う . PiO の 良い 意味 で の 
"EASY 3” Wil, あれ ほど の 話題 に な 
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— si 


“BER Th 


e "ULTAN"/ 
P.S.1 守護 霊 と 先祖 霊 を 大 切 に し ょ う . 


“PiOPiO”, 


j mm = 
и и. y 
ii i 

< 


人 @ 獲 同志社 ・ 山 猫 
み だ た いな ど と 考え て お り ま す . 

まだ , いろ いろ な 情報 交換 や PiO の 常連 
さん へ の イン タビ ュー な ども 面白 いと 思い 
ます (会 員 る ん の 声 を 大 事 に する と いう の 
が 第 一 目標 で すか ら , 企画 も 募集 し た いと 
思い ます )。 
② 他 の マイ コン クラ ブ etc. と の 交流 

PiO 誌 上 で は いろ いろ な サー クル の 活動 
が 見 られ ます が , これ ら の サー クル ・ ク ラ 
= と MINI コ ミ 誌 の イン タビ ュー を 通し て 
交流 し て みた いと 思い ます . 
③ 全 員 参 加 に よる 投稿 (も ちろ ん PiO へ ) 

これ は あま り に も 非常 な 企み な の で , あ 
くま で も 子 定 で す . が , 何 か 面 白い じい アイデ 
ア が あれ ば 何ら か の 形 で や り だ いと 思い ま 
% 

だ いぶ ご ちゃ ご ちゃ と 書き まし だ が 。、 以 
上 の よう な 常識 を 突破 し た クラ ブ で すす ので 
面白 そう だ と 思っ だ た 人 は 入会 を 考え と いて 
くだ きい . 現在 準備 中 . 


反 BASIC 主 義 の 万 へ 


@BLUE-AND-BLUE 


いじ る だ け で , 計算 は 加減 算 を 操り 返す ば 
DD. 完成 し た ば か り の 完璧 な は ず の プロ 


>э һ\3Ф&&% 5 し, EITRET 595 
わか ら な い . それ に 比べ て BASIC は 加減 
乗除 に 関数 付き ,。 ハー ド は 各 命 令 で サポ ー 
ト , どん な 複雑 な ミス も 作者 の 頭脳 し エラ 
ー メ ッ セ ー ジ で 確実 に 解決 で きる. РіО 2 
= “全開 加速 号 ” p.157 に 「 マ シン 語 は 知 
ら な く て OK/」 と 書い て ある で は あり ま 
せん か . 


私 は 「 マ シン 語 を 使う な が 」 と は 言い ませ 


A. BASIC で は ゲー ム に な ら な いこ と は 
多い 。 だ た だ, 必ず し も ちゃ も BASIC が 悪く 。 マ 
シン 語 が 良い な ど と は 思わ な いで 欲し い の 
Ст. ミニ PiO に も テク ニッ ク を 生か し だ た だ 
プロ グラ ム の 出現 を 期待 し ます . 


の @ グ リー ン ベ レ ー 影 丸 
っ だ ん だ と 思い ます 、。 

個人 的 意見 で す が , 私 は この "EASY 
5” が 大 好き な の で , PiO は この 調子 で 偉 
大 な マイ コン 誌 に な っ て ほし いと 願っ て い 
ます . か な り 勝 手 な こと を ズラ ズラ と 書き 
まし た が , 反論 な ど あ り ま し だ ら 自 分 を 見 
つめ る よい 参考 と な る の で , ドン ドン 送っ 
で て だ きい: 


PiO ス クエ ア で は ,。 PIO PIOQ 3 
ー ナ ー で は 書き きれ な いよ うな 情報 
о, メッ セー ジ を お ぉ お 待ち いた し ます . 


P 
белі 
| 3 月 の Mr さん へ 
Ф 1751 = х КЕР В 

3 月 号 で Mr. る さん が 「 マ イコ ンプ ブーム の 
実態 」 ほ と し て , プロ グラ ミン グ が で きず に 
市 販 の ソフ ト を 使う どけ の 人 が 増え て いる 
と 嘆い て いま す が ,。 で つ に いい ん じゃ な い 
Ст», 普及 と は そう いう も の で し ょ 2 う 

ゲー ム を する だ た め や , ビジ ネス に 使う た 
め に パソコン を 買っ だ 人 に と っ て , ブロ グ 
ラミ ング を 覚え を る な ん て こと は 面倒 以外 の 
な に も の で も な いと 思う し , 必要 の な いこ 
と て T, ログ あみ ミング な ど 革 た な を も 
目的 は 達する こと が で きる わけ で , それ で 
充分 使い こなし た と いえ る ん じゃ な いで し 
ょ うか 、、 と そう いう 人 ただちに | ログ ラミ ネン 
グ を …」 な ん て 言う の は , スー ラッ パー に 買い 
物 に 行く た め に オート マチック の 軽 自動 車 
を 買っ だ オバ さん に , 「 車 の 整備 の 仕方 や 
原理 を 勉強 し ろ 」 と 言う よう な も の だ と 思 
う の で す が . 

と か く マ ニア に な る と 排他 的 に な っ だ り , 
初心 者 を で カ に し だ た だり 視 野 が 狭く な り が ち 
で す が (Mr. る ん が そう で ある と いう こと 
で は な い ),。 も う 一 歩 如 と な に な っ て 曖 か 
〈 見 守っ て や る こと も 大 切な ん じゃ な いで 
UL £ 2% 

プロ グラ ム を 自作 する こと は いい こと で 
それ を 広め ゆる こと も いい こと な の で す が , 
だ か ら と いっ て そう で な い 人 を 違っ だ 目 で 
見 だ り し て は 欲し く な い の で す . 

前 出 の オバ さん は 言う で し ょ う .「 何 が 
わ を も を い の よ /」 ば ば リスク クッ シア.K 馬 E 
な る) 

も な み に 私 は 今 。 パソ ピア 7 で マシ ン 語 
ゲー ム ・ ブ プロ グラ ミン グ に 挑戦 し て いま す . 


マイ ナー と メジ ャ ー の バリ ソコ ン 
DELI @Black Knight 


思っ だ の で 書き ます . それ は , マイ 
аа ale 17 | 
で あり ます .「 性 能 ほ と ソフ ト の 差 だ 」 ЕН 
われ る と 思う の で す が 。 そう で は な いと 思 
いま す . 

な なぜなら, 一 般 的 に マイ ナー と 言わ れ て 
いる パソ コン で も 良い 性 能 の 物 も あり ます 
し , ソフ ト の 量 が 多く て も バカ に さる され て い 
る 物 も あり ます . 

たこ で 僕 は 考え つい な の で す 。 OD ЭХЭ 
の か と いう と ,「 そ の パソ ンコ ン を グレ ー ド 
テッ プ し た 機種 が 早い 時 期 に 出る か 出 な い 
аР 207; ЕТУ 
筒 月 に 一 度 の 新 機種 を 出す ">* ソ コン テレ 
EXI” の シャ ー グ きん は , それ を 読ん で 
いる の で は な いで し ょ うか . PC-8000/ 
6000 シ リー ズ な ど は , それ に うま く あ て は 
まっ て いる の で は な いで し ょ うか .. 


友人 ( 梅 ・ 隆 ) に ソノ シー ト を 破 ら れ , 目 の 前 に 真っ 赤 な プ ブタ を 飛び 交わ し て いる 毎日 で す . Z UTC, し か だ な く 自 分 で 打ち 込み まし た だ. Z 
"Jumping Mouse” に つぐ 名 作 だ ぜ . きす が P8 の 使用 人 は 熟練 きれ て る と 思っ て ます . 今後 も PO に 投 
P S2 宇宙 人 が いな い と 思っ て いる 人 は 狂っ て る ゼ . (と っ て も 勝手 が いい 七星 如意 ・ 前 野 ) 


プロ グラ ム の 特徴 


@ 主 な 部 分 が マシ ン 語 な だ た め 非 常に 高速 で 
ある 

@ め エディ ッ ト が 目 で 確認 し な が ら で き る 
デー タ の 保存 が 容易 に で きる 

@ 上 9 一 度 に 28 個 の パタ ー ン を 登録 で きる 


使い 方 


RUN す る と コマ ンド 待ち の 状態 に な り 
ます . コマ ンド に は Edit, Save, Load, 
end の 4 つが あり ます . いずれ も 頭 文字 を 
入力 し ます. Save, Load は いずれ も キャ 
ラク タダ ・ デ ー タ の も の で 。 Е400Н-- 
FE90H の 範囲 で す . 

ЕХ ТЬ, >* マ ター ン ・ エ リア を 聞い て 
827, ыы” уһ 507, 
а Шу те =, у да тй; нб a О X ik е 
の 数 字 を 入力 し ます . 間違い が な けれ ば , 
Y を 入力 し ます 。 する と デー タダ を どう する 
か 開い て きま す . ここ で は New。 Сору, 


アド レス ・ マ ッ プ 


上 下 に 裏返し 
右 に 90"* 倒 す 

RG 日 画面 の 切り 換え 
メモ リ ・ セ ッ ト 


エディ ッ ト ・ エ リア に デー タ 表 示 
キャ ラク タ の 色 を RGB デ ー タ に 変換 
デー タ ・ エ リア を クリ ア 

キャ ラク タ 表 示 

左右 に 裏返し 


іп ENSIGN 
2 の ' B 一 
0 ' m ЕР-1100 77 
49 ‚а = 
SO ' Ш COLOR CHARACTER EDITOR B 
6 の ' ш Ë: 
70 ' m Ver 3.2 % 
8 の ' m 回 
оош 1983.7.25 Бу Т.Н m 

“н ЕЗ 


エー 
ーー 
9 


120 ” Initialize 

150 CLEAR,&hEEBFF: SCREENZ: WIDTH4Q 

140 ПЕҒІМТА-7,а-г,е 

150 DEFUSR=&hECE 

150 COLOR 1 : PRINTCSR (16,10) "FP-1 1 の の "CSR 
(9,15) "COLOR CHARACTER EDITOR" 

170 DIM Х%(Х15),С0%(7» 

180 ҒОКІ=0т015: КЕАрх$ (І) : МЕХТ 


ン ノ ママ の 3 つが あり ます 。. 

N は その エリ ア の デー タ を クリ ア し ます 。 
S は その エリ ア に 登録 る きれ て いる も の を エ 
ディ ッ ト す る と き に 押し ます . C は を その他 
の エリ ア の デー タ を コピ ー す る も の で す 。. 
コピ ー す る デー タ の エリ ア を 聞い て くる の 
С. яз, タテ を 大 才 し ます よ 。 

次 に エディ ッ ト に 移り ます が ,。 エディ ッ 
F 可能 な 間 は 外 枠 が 青 に な り ま す . カー ツン 
ル は カー ツル ・ キ ー と |HOAME| キ ー ビ で 移 動 
し ます . ドッ ト の セッ ト / オ フ は [| SPACE | 
キー で 行ない ます 。 まだ 。 0 一 7 の 数 字 で 色 
が 変わ り ま す . 

その 他 に H, М, Б, С, M が あり ます . 
H は 左右 に 裏返し , V は 上 下 に 裏返し , R 
は 右 に 90* 倒 し ます . C は RGB 画 面 を 切り 


替え ます . どの 画面 を 切り 替え る か 数 字 を 
入力 し て くだ さい 。 M は デー タダ を メモ リ に 
Ё. 


注意 し な けれ ば な ら な い の は , M コ マン 
ド で な いと メモ リ に 落ち な いと いう こと で 
Ў. М, Н, R コ マン ド で も メモ リ に 落ち 
ます が 。 エ ディッ ト が 終了 し だ た だら M を 押し 
て くだ さい . M を 押す と デー タ を どう する 
HMOT ӨЛ, РР. ZP Duta y S=: 
し 
ы СМУ i Ж Жан ЖАБ) СОТЫ с , E „ы, 
タ を 表示 する と 画面 が 壊れ て し まい , エ デ 
ィ ッ ト ・ モ ー ド に 戻れ な い の で 注意 し て く 
775%, 

な お , どの 状態 か ら で も | ESC | キー を 押 
す と コマ ンド ・ レ ベル に 戻り ます . 

5 T, "F400H 十 (ヨコ x 7 + Z >)X 
96” が 先頭 アド レス で す . 最初 の 32 バ バイ ト 
DB, KDR, 最後 が G 画 面 の ゲー タ で す . 


190 ПАТА0,1,2,52,4,5,6,7,8,9,А,В,С,р,Е, 
F 

200 FORI=ØT07:READCO$ ‹І) : МЕХТ 

210 РАТА" 70 SRA тата "499% 
"ль リ "ағалап" "ыы ТЫ з " 

220: Т ИТИ РУ Р 4..... 

250 CU1=PEEK (&hEDØØ) : CU2=FEEK(&hED の 1 ) 

240 IF С01<>%Һ04 AND CU2<>%&hCR THENGOS 
UR2570:ELSEFORI=@TO1@QQ:NEXT 

250 6070550 

260 “ Cursor Move 

270 COLOR4:LOCATEx 。y 

280 7Z ま =INFUT ま (1 ) 

290 CALL 1795 

500 2=А5С (2%) 

510 ІҒг-11ТНЕМІ ОСАТЕ2,2: Б0ТО280 

520 x=FOS: y=CSRLIN: ХХ-х-2:ҮҮу-2 

550 IF z<%&h1C OR z>%h1F THENRETURN 

540 IF у=<2 AND z=%&H1E ТНЕМІ ОСАТЕх,17: 
GOT028Ø 


% 


Ж 
X 
М 
X 
Ë 
& 
b 


まだ , それ ぞ れ 最初 の 8 バイト が 左上 の キ 
ャ ヤラ クタ ーッ デー タイ て 、) 和 だ の の 2 pO 
順に な っ て いま す . 


プロ グラ ム に つい て 


この デー タ を BASIC で 使う た だ た め の サ デ 
ルー チン を 紹介 し ます . この プロ グラ ム で ぞ で 
は EE30H か ら の サブ ルー チン で す 。 

まず 表示 し た い 位 置 の 指定 で す が , キャ 
ラク タ の 左上 の 位置 を LOCATE で 指定 し 
ます . 次 に その デー タ の 入っ て いる アド ン レ 
ス の 先頭 番地 を CALL 文 の 第 2 パラメータ 
と し て AE し に し ます に мөте" 
ン は リロ ケー タブ ル で は な い の で あし か ら 
Т; 

3 参考 文献 

1) 坂 口 芳明 : カラ ー バ ターン ・ エ ディ 
х”, ЏО, 8 年 3 月 号 

2) “ペー パー ウェ ア |11", 工学 社 

3) “BASIC to ASSEMBLER”, 

CQ 出 版 社 


リス ト 1 COLOR CHARACTER EDITOR BASIC リス Fuss 


250 ІҒу>-17 AND 2=%Н1Е THENLOCATEx ,2: 6 
ото280 

560 IF х=<2 AND z=&H1D ТНЕМІ ОСАТЕ17,у: 
60т02в0 

570 IF х>=17 AND z=&H1C ТНЕМ( ОСАТЕ2,у: 
GOT0280 

580 FRINTZ$; 

590 GOTO280Q 

400 ' Print Edit Aria 

410 COLOR7: PRINTCSR (2,0) ; :FORI=@TO15:P 
RINTX$(I);:NEXT 
420 LOCATEQ@,2:FORI=@TO15:FRINTX$(I)I$: 


QUAD(12,12)-(147,146) ,1: RETURN 
440 ' Print Pattern Aria 

450 FRINTCSR(2B。 の ) "の 1 2 3":Q=0 
ҒОКІ-0Т06:0-0%5:РКІМТСӨК(58,0)1;:М 


QUAD ‹211,11)- (308,178) 。1 
X 1=212』Y1=12 


141 


оо 


リス ト 1 COLOR CHARACTER EDITOR BASIC リス ト 


49@ FORI=@TO2:X1=X1+24:FPLOT(X1,Y1)—(X1 
178): NEXT 

500 ҒОКІ-0Т05:УҮ1-Ү1%24:РІ 07(212,Ү1)-Ң(2 
07,Ү1),1:МЕХТ 

510 RETURN 

520 ' Main Routine 

550 MIDTH4 の 

540 50508450 

550 50508410 

560 605082450 

570 COLOR7: PRINTCSR (の 。 19) "コマ エト" "CSR (Z, 
20) "С Edit。Lord 。Save。end 1" 

580 FRINTCSR(2 。22) "コマ ント ~ ハバ 、 カ シラ モミ バー Э9"С5 
RS 23) アツ ニュウ リョ クウ テウ ゲ ウー サイ 。 j 

590 CALL 1 795 

600 Z$=INPUT$ (1) 

610 IFZ$="E"THENGOSUB1270:G0OTO670 

920 IFZ$="S"THENGDSUB1790:GOTOS6Q 

650 IFZ$="L "THENGUSUE 1 320: GUSUB 1 270: GO 


640 ІР2%= "е" ТНЕМБО5082430:1 ОСАТЕ0,21:Е 


650 ВЕЕР: 60Т0590 

660 Pattern Set 

970 GUSUE24 さ の 』 GOSUR1 A00: GDSUB24 さ の 

680 FRINTCSR(2 。 19) "Баға Э. Мем シマ スカ ?"С 
5К (2,20) "ホカ ノ モ ノ ヲ 、 Сору シマ スカ ?" 

690 PRINTCSR (0, 22) "М№ем · · · №, Сору · • ·С, ソノ 
77. · .6" 

700 CALL1795 

710 Z$=INFUT$(1):z=ASC (Z$) 

720 IFZ$="C"THENGOSUB1960@0:GOTO810 

750 IFZI$%="N"THENGOSUB2160:GOTO810 

740 IFZ*="S"THENGOSUB21Z0:GOTO810 

750 IF z=&h1B ТНЕМ56@ 

76@ ВЕЕР:60Т0700 

770 ' Massage 

78@ 505082450: CDLOR フ 7 。 ,0: РКІМТСБК (2,21 
АУЫ” 979 AISIT サイ 01 

790 RETURN 

800 ' Edit Routine 

810 605062450 

820 х=2:у=2 

B さ の COLOR7,,,1:PRINTCSR (2,19) "COLOR = 
"CO まま (CD) 

840 FRINTCSR(2 。 2 の) "Aria... ヨコ ="' ヨ コ " タテ = 
"эр 

850 РКІМТСБК (1,22) "Орёі опе "СК (4,25) "ГС 
09 МІНУ, RICE" 

860 60508270 

870 IF 2<%Һ50 ОК z>&h37 THENB9g 

880 CO=VAL (CHR$ (z) ) : GUTUB さ の 

890 IF г-%Һһ20 THENIF CU= の THENCULOUR7 : РК 
ІМТ". "ELSECOLORCO: PRINT" B"ELSE?2Ø 

900 XT=216+ ヨ コ *24: YT=16+77#24 

910 FLOT(XX+XT,YY+YT) ‚СО: 650710860 

920 IF z=&h4D THENCOLOR7,,,@:GOTO1140 

9520 IF z=&h56 THENGOSUB780: GOSUB2270: G 
отов2@ 

940 IF z=&h43 THENGUSUE 2460: GOTOS20 

950 IF z=%*h48 ТНЕМБО508780: GUSUB2 つ ささ の 』G 
OT0820 

990 IF z=&h52 ТНЕМБ0508780: 605082580: G 
OT0820 

970 IF z=&hiB THENCOLOR7 フ 。 。 ,@: 5070550 

980 CALL 1795: GOTOS3A 

990 “ Set Fattern Aria 

1000 PRINTCSR( ミ 。19) "Pattern Aria ?" 
1010 PRINTCSR (6,21) "ヨコ ="s :CALL1795:Z$=I 
NPUT$ (1) : ヨコ = ニ VQL (76) 

1020 IF ASC(Z$)=&H1B ТНЕМ560 

1030 TIF ヨ コ > ネ THENBEEFP : GUTU191 の ELSEPR TINT ヨ コ 


š 

1040 PRINTCSR(6 。22 ) "ラテ = リョ: CALL 1795:7%=1 
МРОТФ (1) : タテ =VAL (Z$) 

1050 IF ASC(Z$)=&H1B ТНЕМ560 

1060 IF タテ >6THENBEEP : GUTU1 の 4 の ELSEPR INT タテ 


% 
1070 605082450: PRINTCSR( 2 。 19) "ヨロ シイ テ ~ スカ 
ТҰ” 
‚1080 PRINTCSR (6,21) "33="33; CSR (6,22) "77 
ғ"?ғ; 
71090 CALL1795:Z$=INPUT$ (1) 
1100 IF Z$="Y"THENRETURN | 
1110 IF 7%-"М"ТНЕМСО5ІМВ2430:60701000 
1120 IF SC(Z ま )=&h1B ТНЕМ560 
1150 ВЕЕР: 607010590 
1140 GOSUB 1900: GOSUB1400 
1150 605082450 
1160 РКІМТСХК (4,19) "Data Э.КФту?лЛл ?"С5 
R( 1 。21 ) "Ргіпёег-Р ,Save-S Еді +-Е" 
1170 FRINTCSR( 1 。22) "”ріѕр1ау-р ,епа-е" ; 
1180 CALL 1795: 2%=1ІМРОТФ (1) : 2 =АБЅС (2%) 
1190 IF z=&hS の THENGUSUB 1 450: GOTO1 150 
1200 IF z=&h53 THENGUSUB 1 790: GOTO1 150 
1210 IF z=&h44 ТНЕМ1640 
1220 IF z=&h45 THENB1 の 
1250 IF z=&h1E ТНЕМ550 
1240 IF z=%&h65 THENGUSUB24 さ の : LOCATEQ, 21 
s END 
1250 БЕЕР:650Т01180 
1260 ' Write Fattern 


даа +0 +1 +2 +5 +4 +5 +6 +7 +8 +9 +А +В +С +0 +E +F бот 
EC の の 21 CØ ҒО Ср 54 ЕС 21 ҒО F2 11 DØ EF 01 00 01 ED :80 
EC1@ BØ 21 СО Fi CD 54 ЕС 21 FO F2 11 DØ. FØ 01 QQ 01 :45 
ЕС20 Ер BØ 21 СО Ғ2 Ср 34 ЕС 21 ҒО F2 11 DØ F1 01 00:53 


(返し て くだ さい . 


1270 і-%ҺҒ400 

1280 FURI=gTOU1 1STEF さ 』 FURJ= の TU2 の STEFP マ 

1290 LUCATE2 フ + エ 。2+J』 CALL&hEE さ の 。 。 j: ) = ニ )+9 
©: NEXTJ 。 1 

1500 RETURN 

1210 “ Data Load 

1520 GUSUE24 さ の : FRINTCSR (0,20) "304 N.F" 
+95"С5К (4,22) "Push ‘Ret’ Key !!"; 

1550 2%=1ІМРОТФ (1) :2=65С (2%) 

1540 IF г<>132 AND 2<>%Һ1В ТНЕМВЕЕР: БОТО 
1550 

1550 IF z=&hiB ТНЕМ560 

1560 6050В2450:РКІМТС6К(2,21) "Data Load 
チュ ウ !!":1 ОСАТЕӨ, 19 

1570 СО ОКО: і. ОАРМ"СНАКА · р" : COL OR7 : ВЕЕРО 
М: ВЕЕРОҒЕ 

1580 RETURN 

1590 “ Memory Set 

1400 AD= ヨ コ % フ + タテ 

1410 ADR=&hF4ØØ+AD*96 

1420 a=USR (ADR) 

1450 RETURN 

1440 ' Lprint Data 

1450 GOSUE2430 
1460 PRINTCSR (2,19) "Push ‘Ret’ Key"CSR( 
8,20) "+о Steart !!"CSR(4,22)"Miss ・・・ “M 
° Key"; 

1470 CALL1795:Z$=INPFUT$ (1) :z=ASC (Z$) 

1480 IF z=13 ТНЕМ1520 

1490 IF z=&h1B THEN55 の 

1500 IF z=&h4D THENRETURN 

1510 ВЕЕР: 650701450 

1520 LPRINT:LPRINT:LPRINT 

1550 ІРКІМТ"ж Patteran 
タテ ・・・" ョ タテ sgLPRINTsLPRINT 

1540 ІРБІМТ" Blue = "ssFURI= の TO7』L 
PRINT КІСНТФ (НЕХФ (РЕЕК (А”к+І) ) 。2) 3" ";:М 
EXTsLPRINT" н": : РОКІ =ВТт015:1 РКІМТ RIGHTS 
(HEX ま (PEEK(ADR+ エ ) ) 2)" "NEXT 

1550 І РКІМТ: 1 РКІМТ ТАВ (15) 』 : РҒОКІ=16Тт025 
: LPRINT RIGHT ま (HEX ま (PEE に (ADR+ エ ) ) 2)" "j 
:МЕХТ:_РКІМТ" “;:ҒОКІ-24ТО31:1РБІМТ RIG 
НТ% (НЕХ% (PEEK (ADR+1 ) ) 。2) 』" "š :NEXT 

1560 ІРБІМТШІРБІМТ 

1570 LPRINT" Red = "ssFORI=32TO039 


ヨコ ・ Ы Ў =. " 


zLPRINT RIGHT ま (HEX ま (PEEK(QADR+1I) ) 。2)8 7 "j 
sNEXTiLPRINT" ";:ҒОКІ-40Т047:1РБІМТ RIG 
HT ま (HEX ま (PEEK(ADR+1 ) ) 。2) 35" “;:МЕХТ 

1580 LPRINTiLPRINT ТАВ(12);:ҒОКІ-48Т055 
sLFRINT RIGHTS (НЕХФ (PEEK (ADR+I)),2);" "j 
:МЕХТЗІРКІМТ" ";:ҒОКІ-56Т0О63:1РКІМТ RIG 


НТ%(НЕХ% (PEEK (ADR+1)),2);šs" ";%:МЕХТ 

1590 LPRINTsLPRINT 

1600 LFRINT" Green = ";:ҒОКІ-647071 
zLPRINT RIGHT$ (HEX$ (PEEK (ADR+I)),2);" "; 
zNEXT:LPRINT" ";:ҒОКІ-727079ІРБКІМТ RIG 
HT$ (HEX$ (PEEK (АОК+1)),2);" "%:МЕХТ 

1610 LFRINT:LFRINT ТАВ(15);:ҒОКІ-80Т087 
:_РКІМТ RIGHT$ (HEX$ (PEEK (ADR+I)),2);s" "j 
zNEXT:LPRINT" “;:ҒОКІ-ВВТ0О95:РКІМТ RIG 
HT ま (HEX ま (PEEK(ADR+1 ) ) 。2) 3 "7 ";:МЕХТ 

1620 LPRINT: RETURN 

1650 ' Print Data 

1640 WIDTH8Ø 

1650 PRINT:PRINT:PRINT" ж Pattern ヨコ ・ 
...350;" , ダテ 。・。" ョ タテ ョ sgPRINTsPRINT 

1660 FRINT" Blue = “::ҒғОоКІ-0Т07:РК 
INT RIGHT ま (HEX 和 本 (PEEK(ADR+1 ) ) 2)" ";:МЕХ 
ТІРКІМТ" "%:ҒОКІ-8Т0О15:РКІМТ RIGHT$ (НЕХ 
$ (PEEK (ADR+I)),2);" ";:МЕХТ 

1670 FRINT:FRINT ТАВ (15) ; : ҒОКІ=16Тт025:Р 
RINT RIGHT ま も (HEX ま (PEE に (ADR+ 1 ) ) 。2) 』 " "; : МЕ 
ХТіРКІМТ" ";:ҒОКІ-24Т0351:РКІМТ RIGHT$ (H 
ЕХФ (PEEK (ADR+T エ ) ) ,2);" "ssNEXT 

1680 РКІМТ: РКІМТ 

1690 РКІМТ" Кеа = "І РОКІ=52т059: 
РКІМТ КІБНТФ (НЕХ%Ф (PEEK (А”к+І) ) 2)" "š :N 
ЕХТ:РКІМТ" "“;:ҒОКІ-40Т047:РКІМТ RIGHT ま ( 
HEX ま も (PEE に (ADR+1 ) ) 。2) 』" "ssNEXT 

1700 РКІМТ: РКІМТ ТАБ (15) 』 : ҒОКІ =48т055:Р 
RINT RIGHT$ (НЕХФ (PEEK (А”к+І) ) 2) ;" "š : МЕ 
ХТ: РКІМТ" "“;:ҒОКІ-56Т7062:РКІМТ RIGHT$ H 
ЕХФ (PEEK (А”Рк+І) ) 2); " "; : МЕХТ 

1710 РКІМТ:РКІМТ 

1720 FRINT" Green = "%ҙ:ҒОКІ-64Т7071: 
PRINT RIGHT$ (HEX$ (PEEK(ADR+I)),2);" "š :N 
EXTsFRINT" ";:FORI=72T079:FRINT RIGHT$ ( 
HEX $ (PEEK (А”К+І) ) 2) з" ";:МЕХТ 

1750 PRINT:PRINT TAE(1 さ ) 』 sFORI=8O0TO87:P 
RINT RIGHT ま (HEX ま (PEE に (ADR+1) ) 。2) ;" ";:МЕ 
ХТІРКІМТ" "ssFORI=88T095: FRINT RIGHTS (H 
ЕХФ (РЕЕК (ADR+1 ) ) 2)" ";:МЕХТ 

1740 FRINTCSR( さ の 。16) "ОК = LRETURN] Key" 
з 

1750 CALL1795: 2%=1ІМҒОТФ (1) sz=ASC (7%) 

1760 IF г-15 THEN5 さ の 

1770 60701750 

1780 ' Save Data 

1790 GOSUR2430 

1800 FRINTCSR( 1 。 19) "34N". F“ +95 "СБК (4,2 
O0)“ “Кек” Key Э. "С5К (9,21) "オシ ジテ 2994 1" 

1810 PRINTCSR (5,25) "Міѕѕ = “М” Key"; 


1820 CALL1795:Z$=INPUT$(1):z=ASC(Z$%$) 

1850 IF z<>13 AND z<>%h4D AND z<>%&h1B Т 
НЕМВЕЕР: 50701820 

1840 IF z=&h1R ТНЕМ550 

1850 IF z=&h4D THENRETURN 

1860 GOSUB780 

1870 СООКО: SAVEM" CHARA» р" ,&hF400 , &hFE9 
Ø: COLOR7 

1880 RETURN 

1890 ' Read Pattern Data 

1900 LOUCATE ヨ コ 。 タテ 』 CALL&hED6D 

1910 RETURN 

1920 ' Edit Aria 一 Print Pattern 

1950 CALL&hED1D 

1940 RETURN 

1950 ' Set Сору Data 

1960 GUSUB つ 4 さ の 

1970 FRINTCSR( 1 。2 の ) " ト ~ 7 Pattern 7“ х7 ?" 

1980 PRINTCSR (3,22) "33=?"; : CALL1795: Z $= 
INF'UT ま (1 ) 』 ヨ コ 1 =VQL (7%) 

1990 IF ASC(Z ま )=&h1E THENS6 の 

2000 ІҒз21>52ТНЕМВЕЕР: БОТО1980Е ЅЕРКІМТЗ 
21% 

2010 FRINTCSR (3,23) "?ғ-?":СА11795:7%- 


` INPUT$ (1) : 2 テ 1= ニ VQL (Z$) 


2020 IF SC(Z ま )=&h1E ТНЕМ560 

2050 ІҒ?У1>ФТНЕМВЕЕР:650Т02010Е1 БЕРБКІМТ? 
71; 

2040 6050В2450:РКІМТС5К(2,19) "ヨロ シイ 7“ уд 
p ? (Y/N) "CSR (6,21) "ヨコ = "ヨコ 1 3 CSR (6,22) "タテ 
= "ダテ 1 

2050 CALL1795:Z$=INFUT$(1) 

2060 IF ASC(Z ま )=&h1E ТНЕМ560 

2070 IF 7%-"Ү" ТНЕМ2100 

2080 IF 7%-"М" ТНЕМ1960 

2090 ВЕЕР:60Т02050 

2100 AR= ヨ コ 1% フ + タテ 1 

2110 ADD=thF 400+AR#96 

2120 (.ОСАТЕ27%32ж%5,2%9%%2:САЦ1%ҺЕЕ50,,А 
DD: LUCATE ヨ コ 1 。 ダテ 1 

2150 60508780: 605081500: GDSUB 1 9 さ の 

2140 RETURN 

Kill Data 
AD= ヨ コ * フ + タテ 
ADR=%*hF400+AD*96 
FORI=ADR TO АрКк+96: РОКЕІ , 0: МЕХТ 
_ОСАТЕ27+30#3 ,2+97#:: САЦ ҺЕЕЗО, 。 


RETURN 
Print Data 
AD=33*7 +77 
ADR=&hF 400+AD%96: COLOR7 
(ОСАТЕ27%з2%5,2%77%3: CQLL&hEE さ の 。 ,А 


RETURN 
° Vertical Exchange 
GOSUE1900 
CALL&hEC の の 
GOUSUB 1930 
БОБОВ 1400: 605082220: 605082450 
RETURN 
Holizontal Exchange 
2550 6050ВвВ1900:С011%ҺЕЕ74 
2240 GOUSUB 1 9 さ の 
2250 GOSUB 1 400: 605082220: GUDSUB2 つ 4 さ の 
2560 RETURN 
2570 ' Round 90° 
2580 GOUSUB19 の の: CALL&hEC4D 
2590 GUSUE 19 さ の 
2400 GUSUB1 400: 605082220: GUSUB24 マ る の 
241 の RETURN 
2420 ' Clear Screen 
2450 FURI=19TU24sPRINTCSR (0,1) 5РС (26) ; : 
МЕХТ 
2440 RETURN 
2450 “ RGB Change 
2460 COLOR7 。 。 。 9s PRINTCSR (0, 25) "В-К=1 , В- 
б-2,К-б-5 ... key push !!"; 
2470 CALL1795:Z$=INPUT$(1) 
2480 IF 76<>"1" AND 7%<>"2" AND 2%<>"5" 
ТНЕМВЕЕР : 60702470 
2490 605061900 
2500 IF 2%="1" THEN CALL&hEC9D 。 。&hEF DO の 。 
を hF の D の 
2510 IF 7%-"2" THEN CALL&hEC9D 。 。&hEFDO の 。 
を hF 1D の 
2520 IF 7%-"5" THEN CALL&hEC9D 。 。&hF の DO の 。 
&hF 1D の 
2550 FRINTCSR (O, 25) SPC (35) ; 
2540 GOUSUE 1 590: 605082220: GUSUE 1 92 の 
2550 RETURN 
2560 ' Machine Sub. 
2570 СО 0ОК7: РКІМТСБК (10,21) "7223" +977" а 
іле таты” 
2580 LOCATE®, 0: СО ОКО: LOADM"CFONTM'"' : COL 
067 
2590 CALL&hEE22 
2600 RETURN 


ョ リリ スト ググ COLOR CHARACTER EDITOR マシ ン 語 リュス ト EBE SUV UU USU 


EC さ の の 1 ED BØ C? 11 ҒО F2 
ЕС40 10 ҒА の 1 20 00 B7 ED 42 00 C1 10 ED C9 21 CO ҒО :69 
ЕС50 CD 81 ЕС 21 ҒО F2 11 DØ EF 01 00 01 ED BO 21 СО 
ЕС6О F1 CD 81 ЕС 21 ҒО F2 11 DØ FO の 1 00 01 ED BØ 21 


06 10 С5 06 10 7Е 12 25 13 


初め まし て . ハー ド と マシ ン 語 を や ろう と 思っ て いま す . PC-1250 の RAM を 拡張 し た い の で す が , RAM は どこ に 売っ て いる の で し ょ う 
か ? (HM-6116LEP) Ф, それ か 5 6802 (JR-200) の マシ ン 語 わか ら な いん で す . だ れ か 教え て グー JUFC に 入ろう か な . P.S. 和 君 PiO を 早 


(O.D) 


る 

N“ % 
キヤ ラク 
@ ペ ッ グ ー ブ プレイヤー. 技 は お すわ り , お 
9. еі 
ジェリ ー… 敵 1. 技 は チー ズ 投 ば げ , か み 
"ОФ, 
OEH- -ж2. 技 は 感電 殺 
Өк? # 0 -:- 3. кале», 飛び 越え 
な けれ ば な ら な い . 
小鳥 … 敵 4. 技 は つっ つき ,。 つっ つか れ 
る と 死ぬ . 
ゲー ム の 説明 

この ゲー ム は , ペッ グ が 敵 を きけ , КЕ 
や っ つけ 。 犬 小屋 まで 行く ゲー ム で す 。 ジ 
ェ リ ー の 前 で な お すわり を する と , ジェ リー 
は 逃げ ます. し か し , チー ズ を 持っ て る と 
き は , 飛び 越え を て くだ さい 。 電柱 に お し っ 
こ を か ける と 点 が 増え ます . 電線 と 小鳥 は , 
きけ て くだ さい. i 
Біз 操作 キー 


ІЛ АК2 COLOR CHARACTER EDITOR マシ ン 語 リス ト 


イン ベー ダー ポケ ッ ト 


ゲー ム の 説明 


イン ベー ダー が 。 盾 を 持っ て 画面 の 左 か 


表 操作 キー 


ら 攻 め て くる . СЬ, その 盾 に は 究 が あい 
>, あな だ は , 自分 の ミサ イル の 高き 
を 合わ せ て 発射 . イン ベー ダー に 占領 され 


図 全体 画面 


① 君 の 戦車 ② ミ サイ ル 
⑧ こ の ミサ イル が 敵 に ぶつ か る まで 次 の ミサ イル は 発射 で き な い 


оо 
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+ 
+ 
HHHH 


š 
w" 


= 
3 


TE DO ЗООЛ L NI 


/ コマ ント * 9 オ ワ リリ マズ スズカ? 


м 


IG$ で 定義 むる と き に 必要 な R・G・B の 
デー タ 列 を 与え る の が 目的 で 作っ た キャ ラ 
クタ 作成 用 ツー ル で す . この プロ グラ ム で 
は , 任意 の IG キ ャ ラク タ を 組み 合わ せ , 大 
き な キ ャ ラク タ を 作る こと が 可能 で す . 


АЭА 


@ NEW ОМ O を 実行 後 , 


СЕЗЕ 
(BASIC 部 ) を 入力 

@ CLEAR, &HAOOO: DEF MAP =1 
[RETURN | を 実行 後 , モニ タ の E コ マン 
ド な ど で リ スト 2( マ シン 語 部 : B800H 
~ ВААЕН) を 入力 

テー な ど に BASIC, マシ ン 語 の 順に 
+ — 7 (5ЗАМЕ “IGEDIT : SAVEM 
"ТЕАМ5М”, &HB800, &HBAAF, % 
HBSOO ) 


プロ グラ ム の 説明 


マシ ン 語 は リロ ケー タブ ル で す が 。 位置 
を 変え だ た いと き は BASIC 部 の 60。 70, 110 
行 を 変更 し て くだ る さい. 現在 , B800H 一 
BAA2H が サブルーチン 和 群 , A000H 一 
ВТЕЕН 2167 AN · = ) 7, В80ОЗН-- 
B89FH が ワー ク ・ エ リア に な っ て いま す . 


使い 方 


まず 初め に “Width?” と 聞い て きま 
+. [PF1 | で 40 字 モー ド , 320х200 F > 
ト /[ PF2 | で 80 字 モー ド , 640X200 ド ッ ト 


に な り ま す . この 後 , 数 字 で コマ ンド を 選 


択 し て くだ る さい. 


 жжжжжжжжжжжжжжжжжжжж 
? xk IG EDITOR жжж 
” жжж BY К.М жжж 
" жжж ЅЕРТ. 1 1984 жжж 
з жжжжжжжжжжжжжжжжжжжж 
CLEAR, &HAOOO: DEF МАР-1:ІҒ РЕЕКСЕНВВОО 
) О &H16 THEN LOADM 
70 ТР5=&НВ99р:ЕХЕС TPS:CLS:FOR I=0 ТО 25 
S5: IMAGE (100, 100), I:NEXT 
Во DIM Q$(6), IMG(7, 2), ADR(2) 


90 ON ERROR GUTH74 さ OiQ ま (O)="DRTR 9704" :0 


$(1)="DATA LORD":Q$(2)="DRTR SAVE" :0% (3) 


爆発 」 
は な い の で し ょ うか 


と な ら な いよ うに , 
ぱん ぷ き ん ば いる ん , 明る い 気 持 で キー ボー ド を た だ た きま し ょ う . 
な いん だ /」 と いう こと を 親 に 証明 し て みせ だ ら ど と どうでしょう. 


ゲー ムキ ャ ラク タ 作 成 ツ ソール 


0123456789ABCDEF W7 


Í 
5. 
adel 


7% 


шый ГЕ. 
KAY 


sar" 


ォ ワ ルナ + ラ (V) 


1 : デー タ 作 成 

まず , キャ ラク タ の 大 きき さる を 入 力 し て く 
だ さい. 最大 40 字 モー ド で 4X3/80 字 モー 
ド で 8xX3 ま で の 大 きる の キャ ラク タ が 作成 
т Ж, 

右 表 に 点 減 する "х" を カー ソル ・ キ ー 
で 移動 きせ, [SPACE | キー で キャ ラク 
タ ・ コ ユー ド を 指定 し ます .。 訂正 する と き は 
|B| キ ー を 押し て くだ さい . 

する と 。 エ ディッ ト ・ モ ー ド に 移り ます 。 
矢印 が 点 減 し て いる の で , カー ソル ・ キ ー 
で 移動 , [0Q|-[Z| キ ー で ドッ ト を モッ ト し 
て キャ ラク タ を 作成 し て くだ さる い 。 УФ, 
ドッ ト ・ モ セット 後 , 矢印 は その 方 向 に 移動 
し ます . 

そし て キャ ラク タタ 作成 が 終わ っ た と さき, 
まみ: は エディ ッ ト ・ モ ー ド か 6 ら 上 ぬけ た いと 
š は | RETURN | キー を 押し て くだ さい . 
この と き に IG ヘ デー タダ が 定義 きれ ます . 

2 : an AC F 

77АМФЕАЛТЕ ЕК, チー プ d プ まだ は 
ディ スク か ら デ ー タ を 読み 込み ます . 

3 : デー タ ・ セ ー プ 

ファ イル 名 を 入力 する Lt, 右 表 に Xx" 
が 点滅 する の で , モー する IG の 範囲 を 
| SPACE | キー で 決め て くだ さい . 

4 : デー タ ・ プ リン ト 

プリ ンタ を 使う か どう か を 決め (Y/N), 
3 (デー タ ・ セ ー グ ) の と き と 同 じ よ うに 表 
示す る IG キ ャ ラク タ の 範囲 を 指定 し て く 
だ さい . IG$ で 使う R・G・B の デー タ 列 を 
出力 し ます 。 

5 : 90' 回 転 /6 : デー タ 移 動 

5, 6 と も 定義 ふれ て いる IG キ ャ ラク 
タ を 別 の IG で キャ ラク タ に 定義 し 直す コマ 
ンド で す . 5 の 場合 は 各 キ ャ ラク タ を 時 計 
回 り に 90" 回 転 き せ て か ら 6 定義 き れ ま す . 
3, 4 と 同じ よう に 転送 する 1 評 キ ャ ラク 


Ша リスト 1 IG EDITOR BASIC U x F masu 


="DRTR PRINT":Q$(4&)="QO° 
TA í4k*%":Q$(6)="END" 

100 KEY 5,"RUN9O"+CHR$(13):KEY 1, "40"+CH 
R$(13):KEY 2,"80"+CHR$(13) 

110 TP1=&HBBCB iTP101=&HBBCB : TP2=&HB969 : T 
РЗ=&НВВЕЁ: ТР5=&НВ990 : TP6=&HB9RC: TP7=&HEA 
ЗЕ: TP8=&HBR65: IMGCH=&HBBO さ 』 RMNURK=&HBBO4 : 
UMURK=&HBBO6』 GRHP=&HB9SC : IMGCOL= &HAOOO 
120 CLS:COLOR 7:INPUT"Width" ;WI$%$:W=VAL (W 
I$) 
150 
140 


7172" :0% (5)="DA 


IF WO4O AND Ы‹ 80 THEN 6070120 
M=M/ ヨ 0』SCREEN ІМТ ‹М), , 1:WINDOWCO, О) ~ 


「 コ ユン ピュ ー タ ニモ 人 格 破 壊 」 


を すす すす を を も る する ャ し 


... 
0060606060 ғ%%%% 006066 


タ の 範囲 と 転送 先 を 指定 し て くだ きい. な 
м, コマ ンド 終了 は |Y| キ ー で す . 


Kx A 


ONDE š 2 — > v Fe BIMIRE F fT — 8) 
し て か ら 人 入力 す る と 画面 が スク ロー ル し 
са A A, 

@IG へ 書き 込む と きち ら つ く 


注 意 
227 
プロ グラ ム の 最初 で IG を クリ ア し て い 
る の で , 途中 で BREAK し た と き は 必ず 
[PFS | び ス タート し て くだ さい . 


3 参考 文献 
1 ) 石 場 政 次 : 


"PATTERN EDITOR”, 


RAM, “834-118 5, 廣済堂 出版 
~ 金 自動 逆 ア セン プ ブラ"。 で 
工学 社 


2 ) 多田 昌司 : 
ー シ ッ クマ マスター 活用 研究 , 


(640*Mー1 199) :УІЕМ(О,02-(640жМ-1, 199) 
150 WIDTH W:POKE GRAP, W/10 
160 FOR I=0 ТО 15:LOCATE 23+1, 1:PRINT НЕ 
X$ (I) sLOCATE 21, I+3:PRINT HEX ま も (1) :NEXT 
170 POKE&HFFD8, &HEO 

180 ñD=&H4000-3*4&0*(W=&0)—-3*8O* (W=80) +23 
190 POKE UWORK, AD ¥ 256:РОКЕ UMORK+1 。 AD 


MOD 256 


200 AD=ABS (¢ &Н28ж (W=40) +&H50*(W=80) ) : POKE 


` AWORK, AD:EXEC TP7 


210 COLOR ,,O:FOR I=1 TO 7:LOCATE 2, I:PR 
INT 1;0%(1-12:МЕХТ 


PiO4 月 号 「 ば ん ぶ き ん ば ぱ ばい 」 さ ん へ . 確か に 「 コ ンピュータ に よる 人 格 破 壊 」 は な いと は いえ ませ ん . CFD, 「 自 動車 事故 」「 ガ ステ 
と も な り ま せん . コン ビ ピュー タコ ント ロー ル ( コ ンピュータ も 自分 も ) す れ ば よい の で 


そし て 自分 自身 で 「 コ ンピュータ に よる 人 格 破 壊 は 
(Yoshitaka) 


PiO 


リス ト 1 IG EDITOR BASIC ! АР 


6010 GOSUB7260:FOR 1=RDRCO) то ADRC1) :6O0 

50В7220:ЕХЕС TP3 

6020 IMAGE (O, 1922, І+арк‹2) -Арв‹о) 

6030 POKE IMGCH, I1+ADR(2Z)-ADR (O) :ЕХЕС TP1 

:NEXT 

6040 GOSUB7250:IF ОҒФ-"Ү" THEN RETURN EL 

БЕ 6051/В7410:60706010 

7000 ° жжж KEY ІМ 1 жжж 

7010 CH$=CHR$(SCREEN(23+X,3+Y)) 

7020 COLOR 6, , O:LOCATE 2 さ +X。 さ +Y sPRINT "あみ" 

7050 FOR І=0 TO 50:МЕХТ 

7040 POKE&HFFD8, &НЕО 

7050 POKE %Н4000-(Ү-%5) жаОж(Ы-409-(Үж59ж8 

Ож CW=80) +Х+25, ASC (CHS) 

7060 FOR I=0 TO 50:NEXT 

7070 KY$=INKEY$:IF KY$="" THEN KY$="@" 

7080 IF ASC(KY$)=28 AND X(15 THEN X=X+1 

7090 IF RSC(KY も )=29 AND Х) О THEN X=X-1 

7100 IF ASC(KY$)=30 AND Ү) О THEN Y=Y-1 

7110 IF ASC(KY$)=31 AND Ү‹15 THEN Y=Y+1 

7120 RETURN k 

7150 “жжж KEY ІМ 2 жжж 

7140 (ОСАТЕ2, 17:PRINT" ト ドコ カラ ":LOCATE2, 18 

s PRINT" ITF" 

7150 Х=0:Ү=0:ҒОК L=0 TO 1 

7160 GOSUB7OOO:IF КҮФ () " " THEN б0707160 

7170 ñDR(L)=(X*16+Y)*2&+IMGCOL 

7180 LOCATE9, 17+L:PRINTHEX$(X*16+Y):NEXT 

7190 IF ñDR(1) (ADRCO) THEN SWAP RDR(O), R 

DR(1) 

7200 RDR(1)=RDR( 1) +25 : RETURN 

7210 ° ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ 

7220 POKE IMGCH, I 

7250 AD=ABS ( &HO3SCO* (W=40) +&HO780* ( W=80) ) 

7240 POKE UWORK, AD \ 256:РОКЕ UWORK+1 , AD 
MOD 256: RETURN 

7250 COLOR 7:LOCATEO, 23: PRINT" コ / コマ ント ゞ э 
オ ワ リ マズ カカ ? オ ワ ル ナラ (Y) ";s:OF$=INPUT$(1):RET 

URN 

7260 COLOR 7:LOCATEO, 15:PRINT" モ ト / DATA" 

:LOCATEZ, 16: РКІМТ "ТОР" : LOCATEZ, 17: PRINT "r 

END" 

7270 FOR L=0 ТО 1:GO0SUB7Z50:NEXT 

7280 COLOR 7:LOCATEO, 20: РВІМТ "オフ ワリ サキ " ; LDC 

RTE2, 21: PRINT "ТОР" 

7290 L=2:GOSUB7S50 

7500 COLOR 7:LOCATEO, 23: PRINT "ヘン コウ VAN? 
ヘン コウ ナラ (Ү9";:0ҒФ-ІМРІ/Т9С(12 

7510 IF OF$="Y" THEN 6050В7410:60Т07260 

7520 6050В7420:ІҒ RDR(1)(RDR(O) THEN SWA 

P ADR(1), ADR (O) 

7330 IF (255-ADR(2)))=(ADR(1)-ADR(O)) TH 

EN RETURN 

7540 BEEP:LOCRTEO, 25: PRINT" オ ワリ サキ N° &HFF 
3 コ エ マ シタ " sFUR 1=0 TO 5OOO igNEXT : GUSUB7410 

:50707260 

7550 GUSUB7OOO 』 IF КҮ6%" " THEN бС0Т07250 

7560 LL=L:IF L=2 THEN (1-5 

7570 ñRDR(L)=X+*16+Y 

7380 POKE &HFFD8, ЕНЕО:РОКЕ &H4000-(LL+16 

) *&O* (W=&O)— (LL+16)*B0*(W=80)+6, ADRCL) 

7590 COLOR ,,O:LOCATE8, 16+LL :РНІМТНЕХФ СА 

DREL? ) : RETURN 

7400 COLOR 7:LOCATEO, 23:PRINT"A2I39 シマ ヌカ? 
ヘ ハフ コウ ウナ ラ CY)"; ::0OF$=INPUT$ (1) s RETURN 

7410 LUCRTE6。 16:PRINTSPC CS) iLUCRTE6。 17: P 

RINTSPC(5) 

7420 LOCATEO, 20: РКІМТСНАФ С&НіАЯ) : RETURN 

7450 RESUME 90 


1360 IF RSCCKY$)= さ O THEN VC=30:VX=0:VY=- 

1 : GOSUB142O 

1370 IF SCCKY$)= さ 1 THEN VC=31:VX=0:VY=1 
:6050В1420 

1380 IF АЅС‹КҮФ)) 47 AND АЅС‹КҮФ) (56 THEN 
605081400 

1390 IF АЅС‹КҮФ)=15 THEN 60701460 ELSE б 
0701270 

1400 CO=VAL (KY$):COLOR СО:_ОСАТЕ Xー7*CM= 
402 -10* (W=8O) , Y:PRINT"3" ; 

1410 PSET(X+8, Y+8) , CO 

1420 X=X-VX*(X)=0 AND X (=YD*8-1):Y=Y-VY* 
(Ү)-О AND Y(=TA*8-1) 

1430 IF X=YD*8 THEN X=X-1 ELSE IF X=-1 Т 
НЕМ X=0 

1440 IF Ү=ТА*8 THEN Y=Y-1 ELSE IF Y=-1 Т 

НЕМ Y=0 

1450 RETURN 

1460 FOR Ісі TO TA:FOR 1-1 TO YO 

1470 IMAGE (8+ (J-1)*8, B+ て エー1 ) *B) ІМбСУ-1, 
ー1 ) 

1480 POKE ІМССН, IMG(Jー1 I-15 iEXEC TP1 
1490 NEXT J, I:RETURN 

2000 7 жжж DATA LOAD жж 

COLOR7 :LOCATE2, 15: INPUT"File Name"; 


220 LOCATE 2。11:PRINT "CUMMRND ";:CD$=INP 
ОТФ (1) :C=VAL (CD$) : PRINTC 
230 IF C(1 OR C〉7 THEN LOCATEZ, 1 1 s PRINTS 
РС(192:60Т70220 
240 IF С-7 ТНЕМ CLS:END 
250 COLOR 14:10САТЕ 2, 1 さ :PRINTQ ま (ビー1 ) 
260 ON С GOSUE 1000, 2000, 3000, 4000, 5000, 
ооо 
270 6507090 
1000 ° жжж DATA サワ セイ жжж 
1010 COLOR 7:LOCATE 2。15:PRINT "ヨコ ";:ҮОК 
Ф=ІМРОТФ С1) : РВІМТҮОКФ 
1020 LOCATE 2, 16:РКІМТ"97 "; : ТАТФ=ІМРОТФ 
(1) :РКІМТТАТФ : TA=VAL (TRT$) : Y0=VRL ( YOK$) 
1050 IF (TA) 5) +‹ТА (15 +(CYO (1) + (YO) 4RNDM=4 
0) + (YO) BANDW=80) THEN LUCRTE2。 15:PRINTGSP 
СС19) :1 ОСАТЕ2, 16: PRINTSPC (19) :GOTO1010 
1040 FOR Ісі ТО ТА: ОСАТЕ 2, 1+16:ҒОВ J=1 
ТО ҮО:РКІМТ "а" ; ғМЕХТЈ, I 
1050 X=0:Y=0:CY0=1 :CTA=1 
1060 GOSUB7000:IF KY$="B" THEN GOTO11 30 
ELSE IF KY$()" " THEN GOTO1060 
1070 ІМС(СҮО-1,СТА-12-Хж16-Ү 
1080 РОКЕФНЕҒФВ, &HEO 
1090 POKE &H4000-(16+CTR)*40*(W=4&0)- (16+ 
CTA) «80+ (W=80) +CYO+1, X*16+Y 
1100 COLOR ,,O:LOCATECYO*2, 20+CTA: PRINTH 
ЕХФ(ІМС(СҮО-1,СТА-199 
1110 CYO=CY0+1:IF CYO YO THEN CTA=CTA+1: 
СҮ0=1:ІҒ СТА) ТА THEN CLS:GOTO1150 
1120 GOTO1060 
1150 СҮО=СҮ0-1:ІҒ СҮО‹1 THEN CTA=CTA-1:C 
ҮО=ҮО:ІҒ СТА ‹1 THEN СТА=1 』 CY ロ = 1 
1140 COLOR 7:LOCATE1+CYO, 16+CTA:PRINT "а" 
: ЦОСАТЕСҮОж2, 20+CTA:PRINT" ":6б0Т01060 
21150 7 жжж DATA サワ セイ MAIN жжж 
1160 FOR I=TA-1 TO O STEP-1 』FUR J=YD-1 Т 
0 O STEP-1 
1170 POKE IMGCH, IMG(J, I) 
1180 AD=J-—(&H0029+8&H28*I ) * (W=40) – ( &HOOS 1 
+&H50O*I)*(W=80) 
1190 POKE UWORK, AD ¥ 256:РОКЕ UWORK+1 , AD 
MOD 256:ЕХЕС TPS . 
1200 ñRD=&H4000+J+*8-(7+I*8*&H28)*(W=4&0)-— ( 
10+I*8*&H50)*(W=80) 
1210 POKE UWORK, AD ¥ 256:РОКЕ UMORK+1 , AD 
MOD 256 
1220 AD=ABS ( &H28* (W=40) +&H5O+ (W=80) ) : РОК 
E AWORK, AD:EXEC ТРВ:МЕХТ J,I 
1250 (ІМЕ<5,52-((Ү0%12ж8%4, CTA+1)*B+4), Р 
SET, 7;B 
1240 VC=28:VX=1:VY=0:X=0:Y=0 
1250 СО=РЕЕК CAWORK) :COLOR CO:LOCATEX-7*( 
W=40) -10* (W=80) , О 
1260 IF С0=0 THEN COLOR 7:PRINT"A" ELSE 
PRINT" 3" 
1270 CH$=CHR$ (SCREEN (X=7* (W=40) — 1 Ож (W=8O 
すい 9 る 
1280 CO=SCREEN(X-7*(W=40)-10*(W=80), Y, 1) 
MOD 8 
1290 POKE&HFFD8, &HC7 : POKE&H4000—- (Үж40+7 ) 
*(W=4&áO)—(Y*80+10)*(W=80)+X, VC 
1500 FOR 1=0 TO 50:МЕХТ 
1510 COLOR CO:LOCATE Х-7ж(Ы-402-10ж(Ы-8В0 
), Y:zPRINTCH$; 
1520 FOR I=0 TO 50:МЕХТ 
1550 KY$=INKEY$:IF КҮФ="" THEN KY$="@" 
1540 IF АЅС‹КҮФ) =28 THEN VC=28:VX=1:VY=0 
: 6050В 1420 
1550 IF АЅС‹КҮФ) =29 THEN УС-29:УХ--1:УҮ- 
O: GOSUB14ZO 


FL$=LEFT$(FL$+" " 8) :LOADM F 


EXEC TP2:FOR 1=0 ТО 5000』NEXT: ВЕТОК 


”жжж DATA SAVE жжж 
5010 COLOR 7:LOCATEZ, 15: INPUT"Fiie Name" 


2020 FL$=LEFT$(FL$+" " , 8) :GOSUB71 


SRVEM FL$, DR(O) 。 RDR(1), ADR(O) :RETU 


”жжж DATA PRINT ホホ ポポ 

4010 COLOR 7:LOCATEO, 20:РБІМТ"99129 3 wh 
AVAN (Y/N) "; : ОЕФ=ІМРОТФ С1 ) : РКІМТОЕФ 

4020 IF ОЕФ="Ү" THEN ОЕ%="| РТО: " ELSE IF 
OF$="N" THEN OF$="SCRN:" ELSE 1 ОСАТЕО, 2 

О: РКІМТОРС (36) ; :GOTO4010 

4050 GOSUB7130:CLS:WIDTH80:0PEN "O", #1, 0 

F$ 

4040 FOR I=ADR(O) TO DR(1) STEP 24:IMGB 

$=""; IMGR$="" ; IMGG$=" " 

4050 FOR J=O TO 7 

4060 IMGB$=IMGB$+RIGHT$("O"+HEX$(PEEK(I+ 

FI) 

4070 IMGR$=IMGR$+RIGHT$("O"+HEX$(PEEK(I+ 

Ј+8)), 2) 

4080 IMGG6$=IMGG$+RIGHT$("O"+HEX$(PEEK(I+ 

Ј+16)),2):МЕХТ J 

4090 COLOR 6: РВІМТФ#1, КІСНТФ С "О" +НЕХФ ССІ 

IMGCOUL ) /24), 2) : COLOR 7: РВІМТФ1, "R="; ІМСА 

64” "$ "G="; IMGGS ; " "%"В-";ІМСОВФ 

4100 IF OF$="SCRN:" THEN PRINT"ZA’-2 キー 

9 オシ テ ワ ラド サザ サイ" 

4110 IF OF$="SCRN:" AND ІМКЕҮФ () " " THEN 
50704110 

4120 МЕХТ І 

4150 CLOSE #1:RETURN 

SOOO ?жжж 90% カイ テン жжж 

5010 65050В7260:ҒОН I=ADR(O) TO арғвс1»:60 

SUB7220:EXEC TP6 

5020 POKE IMGCH。 I+ADRC2)-ADRCO):EXEC TP1 

О1:МЕХТ:ЕХЕС TP2 

5030 GOSUB7250:IF OF$="Y" THEN RETURN EL 

SE GOSUB7410:GOTO5010 

6000 7 kkk DATA イト の жжж 


mc リス に ト 2 IG EDITOR = х 81 А ЬЕ 


dd +O +1 +2 +3 +4 +5 +6 +7 +B +9 +A +B +C +D +E +F Sum 
s B3 


14S 


РАЗОРІА 7 


BASIC 十 (マシ ン 語 


Ер 


私 に と っ て 3 台 目 の マイ コン で あ 
る バ パソ ビア 7 は 。 と て も ユー ザー 思 
い の 使 い 易 いも の で , これ か ら マ イ 
コン を 始め よう と する 方 に は , も っ 


本 プロ グラ ム は , 表示 サブ ルー チン を マ て 
シン 語 で 処理 きせ て いる の で , プロ グラ ム 
を 入力 し だ た ら カ セッ ト ・ テ ー プ に セージ し 
КЕТЕ EZ. 


ンド 1 : EDI 0 
>* タ ー ン の 作成 , また は 修正 を 行なう . 
パタ ダーン は 16 メ 8 ドッ ト の モー ド 1 と 32※ 
16 ド ッ ト の モー ド 2 の 2 通り が 作成 可能 . 
まだ , バターン の 作成 お よび 修正 は カー 
ツル の 移動 (上 下 左右 ) を [ElX|s|p| キー 
で 行ない , カラ ー 指 定 は [|O|-|Z| で 行ない 
27. 0 一 7 は 了 T-BASIC の カラ ー コ ユ コード 
に 対応 し ます . 消し だ いい ドット は 0 (mg) 
を 指定 し て くだ る さい. 
な お , コマ ンド 1 に は PAINT 機 能 が あ 
IP| キ ー を 押し て カラ ー コ ー ド を 2 つ 
入力 すれ ば , 指定 カラ ー で エディ ッ ト 画 面 


E PAINT じ ま す そし て パター ン の 作成 


また は 修正 が 終わ っ た ら |』| キ ー を 押し て 

522852, АЛУужм-ТУуЕИЗ ます 。 

コマ ンド 2 : 90' 回 転 
現在 エディ ッ ト 画 面 に 表示 る れ て いる フ パ 
ー ン を 右 回 り に 90* 回 転 き せま す . 

コマ ンド 3 : Л Фенин 


51 アド レス ・ マ ッ プ (マシ ン 語 サブ ルーチン ) 


XY 座標 ( 0 ~79, 0 一 24) を V-RAM 
に 変換 、 そ の 値 を E202.E203 に セッ 
F+. 


モー ド 1 の バターン を 表示 する . 


テキ スト CLEAR :WIDTH 80 
SCREEN 2 を 実行 する . 


現在 | 変更 


2 3 
0 0 
0 0 
2 3 
0 0 
0 0 


最近 は CG, CG の 世界 で す が , 
ン で 出せ る の だ か ら 和 驚き で す . 
CM(? ) 等 の すばらし いも の を 作っ て いた だ け な い で し ょ うか ? P.S ガリ アン ・ 
ン の 走行 シー ン ( ま る で ボトム ズ ) や , 剣 を 抜く シー ン の 音 は と っ て も いい と 思う ん で す が … あ あい う 音 が , 今や パッ コン で 作れ る の だ か ら 幸 


て こい の 機種 だ と 思い ます . 
その た め に も ソフ ト は 多い 方 が 楽 

LK, また 参考 に な る も の と 思い 

540X200 フ ルド ッ ト カ ラー マシ ン 語 


現在 エディ ッ ト 画 面 に 表示 され て いる フ パ 

ター ン を 左右 に 反転 きせ ます . 
ンド 4 : DATA CALL mwa 

右 に 表示 る れ て いる (FILE る され だ ) 2$% 
ター ン の 指定 番号 を 入力 すれ ば , エディ ッ 
F 画面 に を その パタ ー ン を 表示 し ます . 

ンド 5 : DATA FILE mem 

エディ ッ ト 画 面 に 表示 る れ て いる パター 
ン を 指定 番号 に FILE し ます . FILE 数 は 24 
個 ま で 可能 で ,。 すでに FILE る され て いる 所 
へ FILE し た 場合 は 前 の パタ ー ン は だ なく 
な り ま す . 
コマ ンド 6 : DATA SAVE зани 

現在 FILE さ れ て いる すべ で て の パタ ー ン 
е, カセ モ セット ・ テ ー ジ に 指定 番号 の 小さ きい 
も の か ら 順 次 つゆ て セーブ し ます . セー ブ 
後 エ ディ ッ ト 画 面 位置 に 各 パ ター ン 
DATA の 先頭 番地 が 10 進 数 で 表示 る れ , 
本 プロ グラ ム は END と な り ま す . 

表示 る れる パタ ー ン DATA の 先頭 番地 
は 層 H0000 か ら の 計算 で あり , DATA を ロ 
ー ド する 際 に は , ロー ド 開 始 番地 十 
DATA 先 頭 番地 で 任意 の > パタ ー ン を 探し 
出せ ます . な お 。 モー され る DATA は 
図 1 の 通り で す . 


IBIG - МАМ 


サブ ルー チン 付き の , パタ ー ン ・ エ 
テオ イダ を 作成 また 、 


ンド 7 : DATA LOAD 

ロー ド 開 始 番 地 を 和 &HCO000 とし, 本 プロ 

グラ ム で 作成 され だ パタ ー ン DATA を ロー 

ド し ます . ロー ド さ きれ だ マタ ー ン DATA は 
右側 の 指定 番号 に 順次 表示 され ます . 


4 


コマ ンド 2, 3 で パタ ー ン の 回 転 が 可 能 
Ст», 当然 Y 軸 ドッ ト 数 に 対し , ХК 
ッ ト が 2 倍 で ある だ め , 回 転 後 パ ター ン が 
崩れ ます . 回 転 を 必要 ほ と す る も の は , モー 
F 1 (16 メ 8) は 8X8 ド ッ ト の つも り で , 
モー ド 2 (32 メ 16) は 16X16 ド ッ ト の つも り 
T, X 座 標 偶数 値 が 先頭 に 2 ドッ ト 同 色 で 
作成 し て いけ ば 回 転 可 能 と な り ま す . 


BASIC の 70 行 で マシ ン 語 を 人 力 し て い 
ます 。 マシ ン 語 サブ ルー チン は 表 1 の 通り 
С". 

実際 に ゲー ム な ど で パ ター ン の 移動 表示 
を 行ない た だ たい 場合 , 本 プロ グラ ム を 表 2 の 
よう に 変更 し て くだ さい. HL に DATA 先 


1 DATA の 形式 


42 メモ リ ・ マ ッ プ 


€ DATA ロ ー ド 時 は , C000 よ り 
ロー ド さ れる . 


マシ ン 語 サブ ルー チン 


ワー ルド 巡 2Z 刻 を こえ て は いい 曲 だ な あ . 


コン ピュ ー タ ・ ミ ュー ジッ ク も すばらし いも の で す . アニ メ の 中 の 効果 斉 な どの すばらしい 音 が 今や パソ п 
メソ コン の 中 に シン セ サ イ ザー が 入っ て いる と いっ て も 過言 で は な いと 思い ます . Ж», CG ば か り で なく 。 


РА? ガリ ア 


頭 番地 を モット し, &HE200 YE (0 — 
24) е, &HE201 に XX 座標 (0 一 29) を モッ ト 
L, 科 HE1D3 を コー ル す れ ば 指定 XY に >\ 
ター ン 左 上 を 基準 に パタ ー ン が 表示 きれ ま 
す . 

な お, &HE1D3 一員 HE1E4 内 で 表 1 の 
が デル ー チ シン を だ デー ル じ で いる の 2C。 то 


7 問い ココ ME えよ エエ メ エ エエ エエ メ テ テ エメ テテ マテ テテ エエ テテ ャ テテ キャ テテ そそ. 

E HE E HE E ЗЕЗЕЗЄ E 4 ¥ ¥ 

20 КЕМ ж 1985ж 1 の 月 108 

BIG МАМ ж 

20 КЕМ HHH HH HH EK HH E E E HE E E E E € E еккен 

ネエ テテ テテ キテ キテ ティコ 

40 CLSsMIDTH 80: SCREEN 2: СОМЅО Е, , „8: CLE 

АК 200, XHEFFF: DEF USR 1=%&HE 1р 

50 DIM 0С (512) , DA(7) рв (5,64) 。DD(24) ,DE ( 

5,7) „ре (15,15) ‚0р6 (15,15) : に = ニシ HCO の の : I2=1*H 

EØFØ: RESTORE 100 

6 の FOR І-0 ТО 7:READ раА‹І) : МЕХТ I 

70 READ І%:ІҒ I$="END" THEN 80 ELSE FOKE 
I2,VAL("%h"+I$):I2=I2+&H1:GOTO 70 

80 GOSUR 120: БОБОВ 250 

90 GOTO 1570 

100 DATA %ҺВ80,%Һ40,%Һ20,%Һ10,%Һ8,%Һ4,%Һ2 
4%Һ1 

110 DATA Ғ5,с5,е5,21,01,е2,46,2Ь,4е,11,0 

в,00,21,00,00,ағ 

120 DATA Ь8,28,02,19,10,4(4,11,80,02,41,Ь 

8,28,05,19,10,Ғ4,11,00,80,19,22,02,е2,еБ 
зеі,сі,Ғ1,с9,00,00,00,00,002,00,00,05,00, 

ей,Ьь0,с9,00,00,00,Ғ5,5Е,06,О5,5С,5Е,11,Гр 

5,0С,Ср,Ғ0,Е0,21,01,Е0,0Е,10,Ср,23,Е1 
150 DATA Е5,2А,02,Е2,ЕВ,Е1,5Е,22,р5,0С,0 

Е,10,С0,23,Е1,Е5,24,02,Е2,ЕВ,Е1,5Е,44,03 
:0С,0Е,10,СП,25,Е1,5Е,00,05,0С,25Е,00,032, 

5с,ҒВ,С9,01,52,01,са4,05,00,01,25,50,Ср,0 

5,00,01,24,02,Ср,05,00,с9,е5,21,60,02,19 
| eb,el,c9?9 

140 DATA fš,Ze,@6,dš,Zc,Ze,11,dZ,@c,cd,f 

0,е0,21,01,е0,0е,20,с4,22,е1,с(,7а,е1,0е 
:320,саі,25,е1,е5,2а,02,е2,еһ,е1,5е,22,с2, 

дс ,де,20,с9,25,е1,са,7а,е1 ,де, 20 ,са,25,е 
1,е5,2а,02,е2,еЬ,еі , Зе, 44,5 ,Өс де, 20,са 
‚„25,е1,са,7а,еі 

150 DATA бе, 20,са,25,е1,а+,а5,0с,а5, Зс, f 

Ь,с9,са, 67 ,е1 ,За,00,е0,ғе,01,28,04,са,82 
,е1,с9,са,2Ь,еі,с9 ,ЕМр 

160 ІЗ-0 

170 FOR F=47 TO 67 STEP 10:ҒОК І1-? TO 2 

5 STEP 5:1 ОСАТЕ І,І1:СО ОК 5: 15=15+1:РКІ 

МТ ІЗ:МЕХТ І1:МЕХТ І 

180 RETURN 

190 FOR І-0 TO 16 :LOCATE 0,1:РБІМТ " 


“EDIT BY 


т” 
МЕХТ І 


200 RETURN 
FOR 1=17 ТО 24:1 ОСАТЕ @,І:РКІМТ " 


І 
RETURN 
COLOR 4:LOCATE 0,17:РКІМТ "ЕрІТ----- 
etre ет Мерекеде карте 1"“sPRINT "9@° 
ТЕРЕТ нн нета 5": COLOR 3:Р 
RINT "DATA Са!.----------- 4":РКІМТ "DATA 
240 COLOR 4:PRINT "DATA SAVE------------ 
өзі РКІМТ "DATA LUAD 一 一 ーーーーーーーーーー 7"; sLOCAT 
E 24,21:COLOR 7:SOUND 640۵,10: SOUND 65,10: 
SOUND 640,10: INPUT "Мо FLEASE"; CL: GOSUB 2 
10: RETURN 
250 MOTOR 1:RETURN 
260 SOUND 60,12: SOUND 65,10: RETURN 
270 6050В 220: COLOR 4:LOCATE 3,22:PRINT 
"Е": COLOR. SPRINT " COLOR (0-7) ":1 ОСА 
ТЕ 2,23:COLOR 4:PRINT "54;:СОЦОК 3:PRINT 
"+"; ss COLOR 4: РКІМТ "0"; : СООК 5sPRINT " 
FAINT---F":LOCATE ®,24:СО! ОК 4:PRINT 
"X"; COLOR 2:PRINT " ЕМр----- J"ssRETU 
RN 
280 GOSUR 210:1 ОСАТЕ @,22:COLDR 4: INFUT 
“COLOR 2-һ 22 INPUT ":1,11:ІҒ 1<0 ОК I> 
7 THEN ВЕЕР: БОТО 280 
290 IF I1<@ OR 11>7 THEN BEEP:GOTO 280 
500 IF MO=1 THEN I2=15:IZ=7 ELSE 12=51:1 
さ =15 
510 FOR 14=@ ТО 12 STEF 2:ҒОК 15-0 TO ІЗ 
ЭТЕР. 2 
520 LOCATE 14,I5:COLOR І:РКІМТ "8"; :COLO 
R I1:PRINT "ШЕ: ОСАТЕ 14,15+1:COLOR I1:P 
RINT "m"; : COLOR І:РБІМТ "ЫШ" 
550 NEXT 15:МЕХТ 14 
540 БОБОВ 210: GOSUB 270: RETURN 
550 11=%HE3O00: COLOR 2:LOCATE @,21:РКІМТ 
АТ 10997 
560 РОК Ісі TO 24 
570 IF DD(I)=@ THEN 430 
さ B の I2=FEEK(DD(I)):IF I2=1 THEN IZ=&H3Ø 
ELSE IZ=%*HC@ 
590 17=рр (І) : DD( 1 ) = 1 一 &HE さ の の 
400 FOR 14=17 ТО 17+13 
410 І5Б-РЕЕК(14):РОКЕ I1,I5:I1=I1+&H1 
420 МЕХТ 14 


グラ ム を 外 き な いで くだ さい . 


この プログラム は 忙 し いい サラリー マン 生 
活 の 問 を 縫っ て , 無 計 画 に ボツ ボッ 入力 し 
が を の て で ETS 217560470 TEI 


420 NEXT I 

440 GOSUE 260:1 ОСАТЕ @,21:COLOR 4: INFUT 
"MOTOR 1 = シマ スカ <YES=Y,NO=N>";I$:IF 1%=" 
Y" OR I$="y" THEN 460 ELSE IF I$="n" OR 
I$="N" THEN 470 

450 BEEF: GOTO 440 

460 GOSUE 250 

470 INFUT "DATA 3 SAVE =/ マ ズーーーーー ТАРЕ ОК < 

ОК=Ү>";1%:1Е I$="Y" OR I$="y" THEN 490 
480 BEEF:GOTO 460 

498 COLOR 2:1=11-6НЕЗ00: PRINT "BSAVE#-1, 

DATA, &hEZØO, " 』 I: BSAVE#-1 , "DATA" 。&HE さ の の , I 

500 GOSUE 21 の :GOSUB 190: GOSUB 942: END 

510 LOCATE 0,21:COLOR 4:PRINT "ТАРЕ STAR 

т": BLOAD#-1, "рата" ,&HCØØ: COLOR 2: РКІМТ 
"ТАРЕ STOP": 1 1=&HCO の の 

520 FOR І-і TO 24 

550 12=PEE に (1 1 ) s IF І2-і THEN IZ=%HZ1:DD:( 
I)=I1 ELSE IF I2=2 THEN IZ=k&HC1:DD(I)=I1 
ELSE GOTO 550 

540 11=11+15:6050В 570 

550 МЕХТ І 

560 kA=I1:GOSUE 160: RETURN 

570 17=51+1МТ( (1-1) /8) *10:18=(1-ІМТ (1/8) 
*8-1)%Z+2 :IF 18=-1 THEN 18=25 

580 POKE %НЕ200,18:РОКЕ ҰНЕ201 , 17: I6=kHE 

оға 

590 FOR IS=DD(I) ТО І1:РОКЕ 16,РЕЕК(15»: 
16-16%%Н1:МЕХТ 15 

500 AA=USR1 (1) : RETURN 

610 FOR IQ=1 TO 3 

620 I3=Q:IF 10=1 THEN 11-17 ELSE IF 1 の =2 
THEN 11=18 ELSE 11=19 

550 IF 11-0 THEN 650 

640 12=11 MOD 2 :0Е (10,15) =12:15=15+1:11 
=INT (11/2) : GOTO 630 

50 NEXT 10 

560 FOR 1=7 TO の STEP -1 

570 с-Ф 

680 IF DE(1,I)=1 THEN C=C+1 

590 IF DE(2,I)=1 ТНЕМ C=C+2 

700 IF DE(3,I)=1 THEN С=С+4 

710 LOCATE I5+(7-I),I6:COLOR C:PRINT "B" 
:NEXT I 

72@ GOSUB 810:RETURN 

750 COLOR 4:LOCATE @,21:1МРИТ "CALL No < 
1-24>";1А:1Е IA<1 ОБ IA>24 THEN BEEP: GOT 

0 730 

740 15= の : IH=-1:IE=0: IC=DD (IA) : IB=PEEK (IC 
JsIF ІВ-і THEN MO=1: TB=&H1 の ELSE MO=2: IB 
=tH40 

75@ GOSUB 990 

760 FOR ID=IC+kH1 ТО IB+IC 

770 17=РЕЕК (10) : I8=PEEK (ID+IB) : 19=PEEK (І 
D+IB+IB): IH=IH+1: IF IH=8 THEN ІН-0:15-15 
+ 日 : IF 15-52 THEN 15=0:1Е=1Е+8 

780 16=IH+TE』 GUSUB 610 

790 NEXT ID 

8002 1G=1:RETURN 

810 FOR Т-0 ТО 3:FOR TT= の ТО 7』DE(T。TT) = 

の : NEXT ТТ:МЕХТ Т 

820 RETURN 

830 IF MD=1 THEN 11-7:12-7 ELSE 11=15:15 
=15 

840 FOR І-0 TO 11ж2 STEF 2:FOR 12=@ TO I 

3: DF (1/2,12) =5СКЕЕМ(1,12,1):МЕХТ 12: МЕХТ 
І 

85@ RETURN 

860 FOR I=@ TO 11*2 STEP 2:FOR 12=@ TO I 

Z:LOCATE I,I2:COLOR DG(I/2,I2):PRINT "ШЕ 
"sNEXT I2:NEXT I 

87@ RETURN 

BB の GOSUE 830 

89@ FOR ї=@ TO I1:FOR 12=@ TO IZ:DG(IZ-I 


.2,1)=DF(I,I2)sNEXT 12:МЕХТ І 


900 GOSUE 860: 16=1: RETURN 

910 GOSUE 830 

920 FOR І-0 TO 11:ЕОК I2=@ TO IZ:DG(I1-I 
,I2)=DF(I,I2):NEXT I2:NEXT I 

930 GOSUR 860: 16=1: RETURN 

940 FOR Ісі TO 24 :IF 1512 THEN 11-20:12 
=-12 ELSE 11=@:12=@ i 

95@ COLOR S:LOCATE @+11,1+12:РКІМТ I;:CO 
LOR 4:PRINT DD(I):NEXT I 


960 RETURN 
970 LOCATE @,21:COLOR 4:GOSUR 260: РКІМТ 
“(16-ӨЗ----<ІЗТІМЕОІ:”(52-16%---2 "МО: 
GOSUB 190 


980 IF MO=1 OR MD=2 THEN 990 ELSE ВЕЕР:б 
OTO 970 

990 IF MD=1 THEN 5Х-16:5У-8:і1-17:12-9 E 
LSE 5Х-22:5Ү-16:11-32:12-17 

1000 FOR 1=@ TO SYx8 STEF 8:1 ІМЕ (0,1) - (5 
ХжВ,1),4:МЕХТ I 

1010 FOR 1=@ TO SX*B STEF B:LINE (1,0) - (І 


_ PiO 


特に マシ ン 語 書き 込み DATA で は , ХХ 
字 と 小文字 が 入り 乱 れ て し まい まし だ 。 А 
力 に あたっ て は 大 文字 , 小文字 どちら で も 
よく 〈 意 味 は あり ませ ん . 

で は , そろ を そろ 出勤 な の で , 皆さん る よ 
うな ら 。. 


2. EDT BASIC Y А b CEE 


„SY*8),4:NEXT I 
1020 SX=SX*8:SY=SY*B:LOCATE @,21:PRINT " 
";PRINT " 
"s RETURN 

1050 FOR Ізі TO 7:PSET(C1+I,C2+I),2,XOR: 
PSET (С1+8-1,С2+1) ,2,XOR:NEXT I 
1040 LOCATE L1,C2/8:PRINT " ":LOCATE С1/ 
8,L2:PRINT " ";LOCATE L1,CY/8: COLOR 7:PR 
INT "Ф": ОСАТЕ CX/B,L2:PRINT "ә" 
1050 Р5ЕТ(С1+4,С2+4),2,ХОК 
1062 C1=CX:C2=CY: SOUND 50,5 
1 の 7 の FDR I=1 ТО 7:PSET(C1+I,C2+I),2,DR:P 
SET (C1+8-1,C2+1),2,OR:NEXT I ` 
1080 COLOR 4:LOCATE さ 6。5:PRINT "Xーー" ョ ビ 1/ 
Bs ОСАТЕ 56,6:РКІМТ "Y--";C2/8: RETURN 

IF 16<>1 THEN GOSUB 970 ELSE IG=Q 

GOSUB 27@:СХ=@:СҮ=@ 

КФ-ІМКЕҮ%:І2-0 

IF КФ-"6" ОК K$="s" THEN СХ-СХ-8:12 


IF K$="D" ОК K$="d" THEN CX=CX+8: I2 
K$="E" OR K$="e" THEN CY=CY- 日 g 12 
ҚФ-"Х" OR КФ-"х" THEN CY=CY+8: 12 


CX>SX-8 THEN CX=SX-8 

СХ<0 THEN CX= の 

СҮ<0 THEN CY= の 

CY>SY-8 THEN CY=SY- 日 

I2=1 THEN GUSUE 1030 

КФ-"Р" ОК КФ-"р" THEN GUSUE 280 
zGOTO 1110 
1220 IF K$="J" OR К%="ј" THEN GOSUE 210: 
RETURN 
1250 IF К%<>"" AND 12=0 THEN 1250 
1240 GOTO 1110 
1250 C=VAL (К6):ІҒ С>7 OR С<0 THEN 1110 
1260 SOUND 20,15: COLOR C:LOCATE CX/8,CY/ 
B8:FRINT "Ш"'":бОТО 1110 
1270 LOCATE 0,21:С0О( ОК 4: GUSUE 260: INPUT 

"FILE No <1-24>";18:ІҒ I8<1 OR І8>24 ТН 

EN ВЕЕР: БОТО 1270 
1280 LOCATE @,21:COLOR 2:PRINT "ケイ サン チュ ウ 
(! "11=0:15=0:14=0:0Х=0: 0Ү=0:ІҒ 
М0=1 THEN 15=128 ELSE І5-512 
1290 FOR І1-0 ТО 7 
1500 FOR 12=0 TO 7 
15210 I4=I4+1:DX=I2+I*8:DY=I1+(IZ+*8):DC(I 
4) =SCREEN(DX , DY 。1 ) 
1520 NEXT І2 
1550 NEXT 11 
1540 IF 14=15 THEN 1270 
1550 I=I+1:zIF І-4 THEN І-0:ІЗгі 
1:60 GOTO 1290 
1570 І2-0 
1380 FOR I=1 ТО І5 STEP В 
1590 І2-І2%1:рВ(1,0) -МО:рВ(1,12)-0: 06 (2, 
І2)-0:рВвВ(3,І2)-0 
1400 FOR Il=0 TO 7 
141@ IF DC(I1+I)=1 THEN DB(1,12)=DB(1,12 
)+DA (11) 
1420 IF DC(I1+I)=2 THEN рв ‹2,12) =рв (2,12 
)+DA (11) 
1430 IF DC(I1+I)=3 THEN DE(1 。12) =DB(1 。12 
)+DA(I1):DB(2,12)=DB(2,I2)+DA (11) 
1440 IF DC(I1+I)=4 THEN 06 (5,12) =рЕ (5,12 
)«рА(11) 
1450 IF DC(I1+I)=5 THEN DB(1,12)=DB(1,12 
) +рА (11): 0В (5,12) =рВ (5,12) +рА (11) 
1450 IF рсС(11+1) =6 THEN рв ‹(2,12) =рв (2,12 
) +ра (11) : ОВ (5,12) =рВ (5,12) +раА (11) 
1470 IF рс(11+1) =7 THEN ОВ (2,12) =рв ‹2,12 
) +рА (11) : ОВ (5,12) =рВ (5,12) +рА (11): ОВ (1,1 
2) =рВ (1,12) +рА (11) 
1480 NEXT 11 
1490 МЕХТ І 
1500 0р (18) =КА: РОКЕ КА, рв ‹1,0) :KI=%*HEQQQ 
:РОКЕ КІ,рв (1,0) : КА=КА+&Ні: I2=1: 13=0: IF 
М0=1 THEN Il=%H1@ ELSE Іі=%н40 
1510 FOR І-кА ТО KA+I1-&H1 
1520 15=15+1:РОКЕ І,ЦрВ(І2,13):КІ-сКкІЗзі:РО 
КЕ КІ,рВ(12,15) 
1550 МЕХТ І 
1540 12=12+1:КА=КА+І1:15=0:ІҒ І2-4 THEN 
1550 ELSE 1510 
1550 I=51+INT((I8-1)/8)*10@:I1=(I8-INT(IB 
/B)*8-1)*Z+2 :IF І1--1 THEN І1-23 
1560 РОКЕ %НЕ200,11:РОКЕ &HE2Ø1 , I:AA=USR 
1(1):GOSUB 160: RETURN 
1570 GOSUR 250:0М CL GOSUB 1090,880,910, 
730,1270, 550,510 
1580 GOTO 1570 


せな 時 代 で す . 


P.S.3 幸せ と は 言っ て も 新 製 品 ラ ッシュ だ け は や め て ほし いも の で す . 


(JUFC の ガリ アン きち が い 山 崎 た か し ) 
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今月 号 の フリ ー ト ー ク は , 今や PiO 読 者 の 間 
で ファン タラ ズン ま て 結成 きれ て いる 。 かわ いい 
イラ スト の 投稿 者 , 間 上 ら ぼ さん で す . > 


2 ат Plot: “-о,723 
、 Чар м, = T p 77А も 
22227 れる と て と りか に 必ず " 
122 | の まがい ぃ が" ある (3 
(8 っ た 上 3 24 2 
っ つい で に AI 


ы ба ы 
を の も の を 知っ だ の は , 小学 生 の ころ で し 
79; 

当時 の 私 は 「 グ ラフ ィ ッ ク 」 な る も の に 
の め の ご が れ で いい だ わけ で す . テレビ ビ で まず CR 
た の で すず が 。 キー ボー ド を ちょ こち ょ こっ 
と だ た だく と 画面 に きれ いな 絵 が る ー っ と 現 


Біл, それ が まだ くる くる と 動く の で す . 


あん な 「 ち ょ こち ょ こ 」 っ と の 操作 な ら 6 私 
に も で きる か な 一 な ど と 思い き や , 問題 は 
を の 中 味 に あっ だ わけ で , その こと に 気 が 
付い だ の は それ を 見 て すぐ で の こと で し た. 
Tè, この ころ は あこ が れ て は い だ も の 
о, それ が 興味 へ まで は だ と どり 着 か な か っ 
ҮЛЧӘ z жа” 


Же 


うち の 弟 が 買っ た 計算 機 を 引き 延ばし た も 
У S P shu 来 ケ コシ だ っ だ の で ずる 
れ が コン ピュ ー タ 1?」 と, その 頼り な い 見 
か け に ぴっ くり し だ の で し だ ただ. 

私 の 頭 に あっ だ 「 コ ンピュータ 」 (З, 
で っ か い デ ィ イス プレ イ と キー ボー ド が あっ 
で の な と と た いっ だ よう な も の で し た から 。 
こん な ちっ ぽ け な も ん で 何 が で きる ん だ ろ 


Г; > ° 


Ф | 
! e 数, かみ 2 も v 


рее 


“- 


w 7 ぶ に の ⑦" な か ん た" の) 
や て る くる 3 は る る 


然 デ ィ ス プレ イ の 垂直 同期 が 狂っ て し まっ た . 
っ か 一 ん /」 と いう 音 と 共に 。 


Ж Ё させ 3 の る 0 о 


8.2.4 


と , その 性 能 を 疑っ て い だ 時 期 も あり まし 
だ (ああ 。 РС-12515%), 

… が ./ 結構 遊べ ご る ん で すね , これ が . 
アド ベン チャ ー ゲ ー ム も 面白 い の が 作れ る 
よう て す も 、。 な に より も ぴか っ で 《 Че СИЕ 
っ か り で すね ) し だ の が , ポケ コン で 音楽 
が で きる の グ … と いう こま なので: し だ ) な ん た 


か びっ くり る せら れ ど お し だ っ だ の で す が , 


その だ びに 私 は ポケ コン と いう も の に 上 舞 味 
нае ROT に よう 。 


% = т” 
Су 55| 


第 が フ > ペソ コン (まだ 何 に する か 決め て いな 
いよ うな の で す が ) を 買う らし い の で , E 
れ な ら 私 は 1251 を 譲っ て も ら お うか な と と 
思っ て ます 。 

だ し か に ポケ コン に は 欠点 が 多い よう で 
т», それ と 同じ くら い 利 点 ち も ある の で は 
な いで すか ? な ん と いっ て も コー ド が な 
く と ウッ ュ ン ネモ ュ も る で で も 前 まもる た, 


お か ば げ さ る まで 八戸 市 内 の 高校 の 1 年 生 に な 
る こと が で きだ わけ で , わざ わざ メグ 〆 切 を 延 
ば し て い だ た だい だ か いな が あ り ま し た (Жаң 
に 申し 訳 あ り ま せん で し な た ). 

だ けど 私 , つく づく 思っ だ の で す が , 受 
験 生 の 大 敵 は 勉強 不足 より も 欲求 不満 で は 
な か あろ あう か … な ど と と, も っ と も この 言 び 方 
は 大 げ る か も し れ ま せん が , 現に 私 は テス 
ト 中 に 「 こ の テス ト が 終わ っ だ ら , ОО 
эл, АЛЫС ҰҮҰЕСОРАЛТ,ТА 
が 付い だ ら 答 案 真 っ 白 け っ /… な ん て こと 
が あり まし だ (この と き 私 は 60 番 近く 落っ 
こち まし だ … う )。 

話 が か な り そ れ て し まい まし た が, 今年 
受験 生 に な られ た 皆さん , どう か 頑張 っ て 
《 だ る い / 


49%, 52 
шеа ов оос дно, OQ a 20% 


事務 用 だ の 初心 者 用 だ の 言わ れ て ます けど 
(も ちろ ん , 確か に そう で す が ), いま と どん 


だ コン ビュ ー タ よう も ウレ ビビ ド усе の も 。 


そう 考え ん だい の は 私 だ け で し ょ うか … ( あ 
ん だ だ け だ 。 な ん を て 言わ れ だ ら 何 も 言え な 
(уг). 


КЕДЕ 


書き まし だ けど , 一 部 の 方 々 は 御存知 の と 
— 0, 私 は BASIC る えま と も に 使え ませ 
ее. 。 他 の 人 が 作っ だ ゲー ム で , も っ ぱ 
6 遊ぶ 立場 の ヒ と ト な の で し だ た だ. 何 も 知 ら な 
ПАТ 甘 お れ を た そうですね 。 コー 
ゲ ダキ し て や っ て くだ る いっ …、 

な ん の か ん の と 言っ て も , や っ ぱり BA- 
S!1 じ で らい は 使え る よう に な り だ いで す 。 


га. て , 自分 で も 


訳 の わか ら ぬ まま に 書い て きま し た が , い 
か あっ だ て しょう あり 

私 を この ペー ジ に 登場 る きせ て くだ さる っ だ 
方 々 に , 心 の 底 か ら あ り が と う を 言い だ ない 
DTT. それ か ら , あん まり ろく な こし と 書 
け な く て 。 本 当 に ご めん な さい で す …-。 

それ で は この へ ん に て .。 コー ゲキ の お 手 
紙 お 待 ち し て ます 次 


ゆ ゅ それ は 突然 の で き ご と だ っ た . 愛 機 , MZ-1200 別 名 MZ-turbo を ,。 カラ ー デ ィ ス プレ イ を 使い な が らい じ く っ て いた だ と きのこ と だ っ だ た だ. Ж 
「 ま だ か …」 私 は 思い な が ら 6GAL-5 を 手前 に 持っ て こよ うと し だ た だ. その と た とき, いき な り 「 ど 
ディ スプ レイ が フラ ッシュ し た . 私 は 思わ ず 電 源 を 切っ て いた だ た . そし て ,。 お そる お そる スイ ッ チ を 入れ て みた . 
文字 は 出 な い . テー プ を 早送り に し た . モー ター が 回 ら な い .「SG」 コ マン ド を 入れ て みた . 音 が 出 な い . 15 — 3 箇月 前 に MZ を 修理 


PC-1251+ ブ リン タ 


プ ブロッ クア ンド ・ ラダー 


「 ポ ケ コ ン ・ マ シン 語 入 門 」 に あっ た 
CPG を 使っ て パズル ・ ゲ ー ム を 作り まし 
た . BASIC が 主 な の で 速度 は いま いち で 
す が , パタ ー ン に よっ て は 結構 楽し め ま す . 


圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


? 


だ いた い 良 く で き て いま す が , や は 


り ス ピー ド が 気 に な り ま す . FER 
示 が 1 回 ご と に 消え る の で , ちょ っ 
と 見 に くい で すね . (Ta) 


му 
⁄ N 


リズ ト 1 を 入力 し て セー ブ プ し 、 ТАК? 
を 入力 し で スト | の 後に セー プ て と ます. 
次 に リト 3 を 太り かも, チーズ を セタ も 
て RUN す る と 4 面 分 の デー タ が セー プ き 
れ ま す . 


テー を リス ト 1 の 前 まで 戻し て リス ト 
1 を ロー ドレ し, [DEF [2] > し た 後 テ ー プ 
AA БЕТ аи a УЕ МЫ 
グラ ム の ロー ド が 終わ る と “STAGE 1 
LOAD ОК?” と 聞い て くる の で , デー タ 
の 初め に テー プ を セッ ト し て [| ENTER | を 
押し て くだ る るい 。 デー タ の ロー ド が 攻 わ も る 
と その 面 の マッ プ が プリ ンタ に 出力 る され ま 
3. 記号 の 意味 は 図 1 に 示す 通り 9 です. ゲ 
ー ム 中 は 図 2 に 示す よう に 自分 の いる 階 と 
その 1 階 を 合わ せ て 画面 表示 し ます . 
ゲー ム ・ エ リア に は ブロ ッ ク と は し ど ご, 
を し て ゴー ル が あり ます . (8|2|4|віс 
ブロ ッ ク の 上 を 移動 し た り , は し ご を 登り 
降り し な が ら ゴ ー ル まで 行け ば よい の で す 
が ,。 ブロ ッ ク や は し ご は 状況 に より 動い だ 
り 落 ち だ り し ます . 


R1 行 番号 マッ プ 


デー タ ・ ロ ー ド 
デー タ 初 期 化 

スタ ー ト 

表示 

ゲー ム ・ オ ー バ ー の 判定 
落ち る プロ ッ ク の 判定 
落ち る は し ご の 判定 
ゴー ル の 判定 

キー 入力 

プ ブロック 落下 処理 

は し ご 落下 処理 
左 へ 移動 

ブロック の 移動 ( 左 ) 
右 へ 移動 

ブロッ ク の 移動 ( 右 ) 
は し ご を 登る 

は し ご を 降り る 
ゲー ム ・ オ ー バ ー 後 処理 
クリ ア 後 処理 

[G] 入力 後 処理 

マッ プ 出 力 


図 1 プリ ント 出力 の 記号 


状態 判定 用 変数 
キー 入力 

FOR 一 NEXT 用 
ステ ー ジ 

表示 用 
パタ ー ン ・ デ ー タ 
X 座標 


Y 座標 
バーン ぃ デー タク (スタート 時) 


) スタ ー ト 地点 
マッ プ 出 力 用 


図 3 ルー ル 2 


ا 


落ち る 落ち な い 


図 2 画面 表示 


自分 の 表示 


通常 は し ご に 乗っ て いる と き 


ルー ル 1 : 自分 は 空 を 飛べ な い . つま り , 
下 の 段 に 何 $ も なく, 自分 の いる 所 が は し ご 
で も な い 場 合 に は ゲー ム ・ オ ー バ ー に な り 
27, し だ な が つて て, フロッグ や は し ご が 6 
飛び 降り だ た り 飛 び 上 が っ だ りす る こと は で 
きま せん . 上 下 に 動く の は は し ご の 昇降 と 


自分 の いる 階 の 様子 
自分 の いる 階数 


一 段 下 の 階 の 様子 


次 の ルー ル 2, 3 に よる 場合 に 限ら れ ま す . 
ルー ル 2 : 上 下 に な に も な い ブ ロッ ク の 上 
に 乗る と ,。 ブロ ッ ク ご と 下 に 落ち る ( 図 3). 
ルー ル 3 : 下 に な に も な い は し ご に 重なる 
と 同様 に 落ち る ( 図 4). 
ルー ル 4 : 向こう 側 に 何 も ちな い プ ブロ ッ ク を 
横 か ら 押 す ( そ の 方 向 の キー を 押す ) E, > 
ロッ ク だ け 横 へ 1 マス 動く ( 図 5). 

以上 の ルー ル を 利用 し て ブロッ ク や は し 
ご を 動か し て 道 を 作っ て いく わけ で す . な 


に 出し た と きのこ と を 思い 出し た .。 次 に 「MZ1200 半 40.000」 の 広告 を 思い 出し た . そし て , MSX の 連中 に バカ に され て いた こと を 思い 出 
L, 「MSX Ұ22,000, と いう 広告 を 思い 出し た . そし て 自分 で 自分 を な ぐろ うと 思っ た 瞬間 目 の 前 で と ュー ズ が 飛ん で いた . 私 は 今 で も 
を の ヒュ ー ズ を 祭壇 に 祭っ て いる . MZ-turbo 物 語 ë (RB 2 4 y TEZ) 


149 


5219) 


[04 ルー ル 3 
ga 
落ち る 
(上 に 何 が あっ て も 関係 な い ) 


545 ルー ル 4 


空白 


ЦЯ 


| [8] 自分 の いる と ころ は は し ご で も よい 


EER 


|6| で ゴー ル ・ イ ン 


|8| で ゴー ル ・ イ ン 


— ВЕ 


а а с CS ы на кз a taha DR “а”, “H”, ا‎ ем ЖЕКЕ СУ АГРА 


0 階 か ら 11 階 まで 1 階 ず つの デー タ が 
P $ (0) P$ (П) に 入っ て いる 


ә, ゴー ル は 移動 に 関し て は 図 6 の 様 に 上 
か ら ブ ロッ ク , 横 や 下 か ら は 空白 と 同じ 性 
綿 を 持ち ます の で 注意 し て ぐだ さる い .。 ゲー 
ム 中 [MM| を 押す と その 時 点 で の マッ プ が プ 
リン ト さ れ , |@| を 押す と “GIVE ОР?” 
と 聞い て きま す . や め る と き は | ENTER | 
が 人生 ち まま を と ゲー の ドー キー パー 和枝 が が) 
何 か 入 力 し て か ら | ENTER | し すれ ば , (6) 
を 押す 前 の 状態 に 戻り ます . 

ゴー ルイ ン す る と 次 の 面 へ 進み ます . 2 
м, ゲー ム ・ オ ー バ ー に な る と 次 の 面 へ 進 
MN a а, 
の 面 へ 進む と き は [IN リプ レイ する と き 


は |R| を 入力 し て くだ さい . 


ゲー ム 中 の 速度 を 上 げ る だ た め に デー タ は 
複雑 に な っ て いま す ( 図 7)、 そこ で デー タ 
ПУАЛЕВОГЛАКЫЯОЛ ГУ ANI AS g 


|AI で スタ ー ト で す . |8|2|4|6ІС<»- 

ッ ル を 動か し て , |OI で 空白 |.| で ブロ ッ 
2, сос, [| で ゴー ル で 設定 , [<] 
で 全面 クリ ア し ます . そし て 入力 が 終わ っ 
た ら , スタ ー ト 地点 に カー ソル を 置い て |*| 
だ デー ズ ゼ ネー ジ UIT. 

図 8 に ゲー ム ・ エ リア を 示し ます . 斜線 
部 分 は 必ず し も ブロ ッ ク て で て 埋め る 必要 は あ 
り ま せん が 。 ゲー ム 中 に 自分 が ここ に 入る 
と エラ ー に な る の で 注意 し て くだ さい. ま 
た , ゴー ル を 複数 設定 し た と き は すべ て 
が ゴー ル と 認め られ ます . 


一 応 行 番号 マッ プ と 変数 表 を 載せ て お き 
ます の で 参考 に し て くだ る い . それ か ら メ 
АСР аға оош CED 
СЕЕЛ ЕЛУ ORUN CI DAE OE 
Буф, 0 asuy aC pG: 
使っ て いる の で 使え な く な り ま す . 


хал? экел. LBE 


1:72” WAIT B: PRINT ` 
BLOCK š LADDER": 
CALL š11Eñ 

2:CLEñRF : DIM %$ú1)5*65 
: РОКЕ 5083408 72 (137 

5:РОКЕ $3000: Fl: SFI: & 
1H: ACE SET 657» DBÈ 
Ғ1з%98»624»8Ғ2» Йй, Š 


4: 


з 


T5083A 1D 
POKE %8010»675»851,6 
34,682 dE ESI C5; 
Ғ1зЗЕҒІ» ЭВ» РЕ, 5С4:% 
86» %59,6ҒЕ»%Е6 

POKE &8020, &Е8, 499, & 
5565В,828,%05,570% 
41>%49,%829,521,857.6 


50:М-М%1: WAIT : PRINT 
"STADE “3M5” LOAD DK 
2%: INPUT 0% сж), 
51:78” FOR I=d TÜ 11:P$ 
(1›=0$С61): NEXT I 
52:5-Ұ%ҮзИ 


70:00508 300: ВЕЕР 1: 
WAIT 100: PRINT “STA 
ВТЕ" 

IBG: CALL S11E5: WAIT 0: 


PRINT " 
SY 
CALL &11Е5: CALL &80 
BO: P=&F80F+5X: IF X? 
8 LET P=&F8ñ4-5% 
:0= PEEK P:R= PEEK ҰР 
+1): POKE P:0 DR 22» 
¿R AND 962%135: 8 AND 
962%7» CR AND 962415» 
a OR 22 

1Й4: CALL š11EB 

11B:IF МІШ% (Р%(Ү2%Х%2,1 
3="A" GOTO 260 

111:ІҒ MID$ РҮ), 2,1 


ЖҮРӨКТҮҮЛҮГҮ 


112: 


113: 


120: 


121: 
122: 
123: 
124: 
125: 
126: 


127: 
200: 


201: 


)=°Е° ІР МІр$ (P も (ヤー 
1),Х+2,1)=°В° GOTO 2 
BB 

IF MID$ (Р%(Ү)»5%2,1 
2-“СУ” GOTO 218 

A= ASC МІШ% (Р%(Ү)»Х 
+2,1)-65: IF в-4ж 
INT KRZ4)=3 GOTO 270 
D$= ІМКЕҮ% : IF D$=” 
“ GOTO 128 

IF D$="4" GOTO 220 
IF D$="6" GOTO 230 
IF D$="3" GOTO 240 
IF D$="2" GOTO 250 
IF D$="G" GOTO 280 
IF D$="M” GOSUB 300: 
5070 1880 

5070 128 

P#$¿(Y)= LEFT$ (Р%(Ү)» 
X+1)+"ñ"”+ RIGHT$ ¿(P$ 
(Ү9з12-Х5) 

РӚ(Ү-іот LEFT$ (PSY 
-12%Х%12%"Е”% RIGHTS 
(Р%(Ү-12:12-%0 


209: Y=Y-1: 
210:Р$ст+1)= LEFT$ CPSC 


ҒҒ» 6ВС»%20:%813 


18:ШІМ Р%(112ж14»09Х(119 


ж14,В%(02ж14 


20:РОКЕ 50510»0»0.0:й0зй 


:51»17»17»17»51»51,1 
8:18:18»51з14%117,17» 
21,13 


21:РОКЕ 50530,96, 32,32, 
шен リス トク BLOCK & LADDER BASIC!) Z b 2 
205:Р%(Ү-22- LEFT (Р%СҮ 


-2),А+1)+ CHR$ ¢ ASC 
МІШ% (P ま (ヤー25 5 21) 
%12% RIGHT$ (Р%(Ү-20 
1 テー) 


204: РОКЕ Р»108»9й:92»9й» 


198 


205:РОКЕ Р. 33,52, 28,52,8 


8 


206: РОКЕ Р, 48, 194, 56, 194 


48 


2ЙТ:РОКЕ Р, 96,30, 112,880 


96 


208:РОКЕ Р.64, 32,96, 52,6 


4 
GOTO 1йй 


%12%5%12% CHR$ ¢ ASC 
MID$ (P$(Y+1) s X+251) 
-8)+ RIGHT$ (Р%<Ү%1) 
12-909 


211:Р%(Үҙ- LEFT$ (Р%(Ү»» 


я%12%71%% RIGHTS (PS 
(Үҙз12-Х) 


リフ スト 1 BLOCK & LADDER BASIC ЈА F 1 


32 96 127 43; 43; 4351 
27:127»50»50.5й0,127» 
110:49.49,55.1Й9 


:РОКЕ 5йЙ55й»96%йЙ»0:йЙ; 


23: 


212: 


9612717 1751751275 
127»18»18»18:127»11й 
17»17»21»109 

POKE 5й057й0»64»52,52, 


РӚ(Ү-із- bEFTS KEST 
-12%%%12% LHR í ASL 
MID$ (Р%(Ү-12,Х%2,1) 
%22% RIGHTS (Р%(Ү-1) 
,12-Х) 

:РОКЕ Р, 62», 26,14, 26,6 
2 

:POKE P+124 (52 285525 
124 


5:POKE Р»12й0»104%56,1Й 


213: 
220: 


221: 
222: 


223: 


4,120 
:РОКЕ Р» 112,80», 112,30 
‚112 
:РОКЕ Р» 96, 52,96, 32,9 
5 

ҮсҮ-1: GOTO 100 

ñ= ASC МІШ% {PDs 
%1,12-65: IF ñ-4* 
ІМТ KHRZ4)=1 GOTO 222 
x#=x-1: GOTO 102 
B= ASC МІШ% {PYD 
4123-65: IF В-4ж INT 
(BZ4)> GOTO 128 
Р%(Үз- LEFT$ (Р%(Ү»» 


231:X=X+1: 
252:В= ASC MID$ (P$(Y),X 


52,.52.95»49.49:49;65 
95»,5й:5й.5й,65»78,4 
9,49.55»,45 


25:CHRIN 


4-12% CHR$ (B+55)+ 
CHR を ¿ñ+643+ RIGHT$ 
(P$<(Y) Í 13-8) 


224:ñ= ASC MID$ (P$iY+1) 


45%1з1)-65зВ- ASC 
МІШ% ¿(P#$(Y+1) Rs 1)-6 
5 


225:Р%(Үжіз- LEFT ま (Р%Х(Ү 


+1),а-1)+ CHR$ (B+69 
2+ EHR ま (ñ+61)+ 
RIGHT (Р%(Ү%13,13-Х 
› 


226:50Т0 100 
250:й- ASC МІП% РҮ), Х 


+351)-69: IF ñ-4* 
INT KRZ4)=1 GOTO 232 
GOTO 102 


+4,1)-65: IF B-4* 
INT ¢B/4}>@ GOTO 120 


235:Р%(Ү)- LEFT (Р%<Ү»» 


я%22% CHR$ (А+64)+ 
CHR$ (B+66)+ RIGHTS 
(P ま CTY)5 10-8) 


こんにちは ノボ ツ ッ 回 数 5 回 の 「 ぐ わっ し ゃ 」 で す . し か し , 初心 者 の 初 採用 ほ い う の は 難し いで すね . 私 も まだ 1 回 も 載り ませ ん (これ が 


С) ә “ . , 
RORO ӘішішН). LIAT, 皆さん も PiOPiO な ど に ハガキ を 出し て 不安 に な る こと が あり ませ ん か ? 
かこ 部 に 届い て いる の だ ろう か ?」 と いう 気持 ちと , i ME; - 読 : 


それ は ,「 こ の ハガキ は ちゃ ん と 編集 


「 こ の ハガキ は ちゃ ん し 編集 部 の 人 に 読ま れ て いる の だ ろう か ? 」 と いう 気持 ち だ と 思い ま 
150 OS て ム た T し か し みん な ノボ ツ に めげ ず に 編集 部 に 雨 の よう に ハガキ を 送 ろ う . 
`. é< 


(で ぐ わ っ し ゃ ) 


PIO 


リリス トク グ BLOCK & LADDER BASIC リ スト 2 
261: IF A$="R” GOTO 78” 304:R$(0)=R$(0)+"D":; 


234:ñ= ASC MID$ ¿(P$¿(Y+1) 245:РОКЕ P:Q OR Ss¢R AND AND 3)5+52 (R AND 3)+ 


Х%51)-65»В- ASC 120)+3 (8 AND 120)+1 28s (R AND 3)+5250 OR || 262:IF А$=”Н” GOTO 50 GOTO 307: 

МІШ% (Р$(ү+1),Х+4,1) <Е AND 120)%50 OR 88 265: END 305:R$(0)=R$(0)+"H°%: 

-65 5 254:РОКЕ Psd OR 48, (В 270:ВЕЕР 2: WAIT 100: GOTO 307 
255:Р%(Үғіз- LEFT$ ¿(P$¿y || 244: РОКЕ Psd OR 2, В AND AND 7)+104, (R AND 7) PRINT *CLEñR!! <STAG || 306:2$%0)=8$%(0)+°6°: 

+1),ҳ+2)+ СНВ% СА+61 124)+1R AND 124, (Б +56, Е AND 72%104,07 Е “4М:79%: СОТО 50 GOTO 307 

J+ СНЕ$ (B+69)+ AND 124)+1,0 OR 2 OR 48 280: АІТ 100: INPUT "GIV || 307: МЕХТ I: IF Y=J LET R 

RIGHT$ (Р%(Ү%12%1й0-Х || 245:РОКЕ PsQ OR 1:R AND 255:РОКЕ P+sQ OR 965〈R Е UP?*°;ñ$: GOTO 100 $(9)= LEFT$ (R$(0),X 


126sR AND 126R AND 
1260 OR 1 

246:00Т0 190 

250:й- ASC МІШ% (P$(Y),X 
%2312-65: IF ІМТ KAZ 


2 

256:00Т0 100 

240:А$= МІП% (Р$(Ү+1),Х+ 
2,1): IF ñ$="I" DR ñ 
%=°К” DR A$="L" GOTO 


AND 15)+89s(R AND 15 
2+112›‹В AND 15)+89 


281:00Т0 2680 

399:MRIT 100: LPRINT "<S 
TAGE "$M; ’> МАР” 

391:FOR 7-11 TO 9 STEP - 
1:R$(0)=""; FOR Ізі 


%12%7Д%% ВІСНТ$Ў (8$ 
0),12-Х) 
388:LPRINT R$(0);” *;] 
309:NEXT J: RETURN 
50@:МА1Т 0: PRINT "BCD" 


9 OR 96 
256:РОКЕ PB OR 64» (В 
AND 512%52(Е AND 51 


242 42-2 GOTO 252 2%963 CR AND 351)+32,0 Т0 14 : CALL %8000: CALL & 
241:60Т0 128 251:GOTD 120 OR 64 302:ñ= ASC MID$ (P$(J)+I 1000 
242:Ү-Ү%1: POKE Рэ0 OR 1 252:Ү-Ү-1: POKE PsQ OR 4 || 257:60Т70 199 12-65: UN ñ-4* INT 

15(R AND 112)+6 (В 4,8 AND 12%26, (R 260: ВЕЕР 5: WAIT 80: (8/42 GOTO 304, 305,35 

AND 1122%5 5 (R AND 11 AND 1)+14, (R AND 1)+ PRINT "САМЕ OVER >”: 06 

2)+6sÜ OR 11 26,0 OR 44 INPUT “REPLAY OR МЕХ || 3083:R$(0)=R$(0)+" ”: 


253:РОКЕ Psd OR 88, (В T "ñ$ GOTO 307 


リス ト 3 BLOCK & LADDER 画面 デー タ セ ー プ ブ ププ ログ ラム 


y 


ч У v 


S:CLEÀR : 


DIM P$ú11)*1 


4 66: DATA “FFKAACEAKBFJFF BJ: DATA “FFAAAIIIABBAFF 194: DATA "FFIFRFKFARFKFF 123: DATA "FFAAAAAAAIAKFF 
10:ҒОР Ізі TO 4: М > ° “ 

RESTORE 49+29*I Ö6T:DATA "FFKAAJAAKFEGFF 36:DATA "FFAAAAABBFEAFF 105:0АТА “FFAFAFKFAAFKFF 124:DATA "FFRRBRRRRRRKFF 
20:ҒОБ 1-0 TO 11: READ К ы ° % 

Р%(/70: NEXT J 68 DATA "FFKBBECAIECKFF ST: DATA "FFABBBBGGFAAFF 106: DATA "FFAFBFKFBBFKFF 125:DATA "FFAAFCBAAAAKFF 
30: РЕА xY + ы Ё x 
40:ЫВІТ : PRINT “5ТАбЕ b9:DATA "FFKFFBIBDAJKFF 83:DATA "FFBEFGGKJECCFF 107: DATA "FEBGGGKFFFFKFF 126:DRTR "FFDRFKFCBRRKFF 

“1%” SAYE 0K?”: y Ж x Р 

PRINT #P$(*), X TQ:DATA "FFIEEEAFNCGIFF 89: DATA “FFFBFIIKGBIIFF 108: DATA "FBGKIJJFEFFKFF 127:DATA "FFMAGKFKFCEKFF 
59INEXT I: PRINT “ЕМІ”: % ы x £ 

END ті:рАТА "FFBBBBBFFJJBFF 98:DñT8 "FFEEFRRIIGRRFF 1B9:DATñ "FFJJBGFEAEFKFF 128:DATA "FFHRIIGKFKFKFF 
6A: DATA "FFFFFFEFFFFFFF ы ы М ы 

ы 72:2АТа 4,1 9i:DATA "FFBBFBBBBJBBFF 110:рАТа "FFEEEIGCCCGKFF 129: DATA "FFRRRRIIGKFKFF 
bl:DATA “FFGEEEAEEGFFFF 80: АТА "FFEFFFFFFFEFFF ы £ 

М мет бы 92:DATA 1,1й 111:DATñ "FFBBBBJJJJJJFF 139: RTH "FFAAAAAAIIGKFF 
62:0АТА "FFKRRBBRRKDFFF 81:рАТА “FHBEEEEGEEAFFF 1494: DATA "FFFFEFFFEFFFFF に 

い { 112:DñTñ 1,10 131:DATA "FFBBBBBBBBJJFF 
63:DATA “FFKAAGFABJIGFF 82: ЈАТА "FMFBBBBKABBEFF 191: DATA "FFHEAEGEAEF GFF 124:DATA "FFFFFFFFFFFFFF ч 

v v $ v 132: DATA 9,1 
64: АТА “FFKAAKEAGEBKFF 83: DATA “FBEEEEEKAEFAFF 102: DATA “FFNBAAKBAAFKFF 121:DATA "FFEEEEE5EGEGFF 
65:DñTñ "ҒЕКААІВАКАЕКЕЕ "FFAAACCKAAEAFF 193:DATA "FFGFRBKFRRFKFF 122:DATA "FFAAAAAIAKAKFF 


84:DATñ 


リリ スト 4 BLOCK & LADDER コン スト ラク ショ ンプ ログ ラム 


42,26 (Р+4) »Х%21)-65 

8:РОКЕ 50570»0»й0»0,0,й 144:CALL &11Е0 133:P$(Y+1)= LEFT$ (Р$(Ү 
s62, 34 34 34 625 6252 118:D$= INKEY$ : +1)sX+1)+ CHR$ (ñ-4* 
As 24: 20,62, 28,34,34, “ бото 110 ІМТ (ñZ4)+65)+ 
42,26 111:1Ғ D$="4" LET Х=Х-‹Х RIGHT$ (Р%(Ү%1),12-Х 
Fl 29A: 524, 2F2: 800; 10:01М P*$ ま (11)*14 209: GOTO 100 ) INT #44) +735) + 
67,50. 234, 1р 11:Р%(0)9-”ҒҒҒЕҒҒЕҒҒЕҒЕҒ 112:IF 08-76” (ЕТ Х=Х+(Х 154:6070 100 RIbHT$ (Р%(Ү%1),12-Х 

3:POKE #8010,875,851,8 F° <11): GOTO 100 140:й- ASC MID$ (P$<Y),X ) 
24,6й2.%4Е,%й5.%С5,% 12:Р%(12-”ҒҒЕЕЕЕЕЕЕЕЕЕР 113:IF 1%-“8” (ЕТ Y=Y+(Y +2,1)-65 154:6070 100 
Flo &F1,5B,&FF RCA g F° <11): GOTO 100 141:P$(Y)= LEFT$ (P$(Y)s || 160:A= ASC MID$ (P$(Y),X 
86»%59%%ҒЕз%Е6 13:FOR 1=2 TO 18:P$(I)= 114:IF D$="2*" LET Y=Y-(Y x+1)+ CHR$ (4ж INT ( +2,1)-65 

4:РОКЕ %802й0»%Ғ8%%99,% "FFRRRRRRRRRRFF": 209: GOTO 199 8/42%66)% RIGHT$ (P$ || 161:P$(Y)= LEFT$ (P$¿<(Y), 
63. %3B 628 RS&T NEXT I 115:ІҒ D$=*9* GOTO (Y), 12-%) X+1)+ CHR$ (4* INT ( 
41: %49,%&29,&21 837, & 14:Р%(112-”ҒҒВВВВВВВВВВ 116: ІҒ 18-”.” GOTO 142:#= ASC МІр$ (P$(Y+1) 8/42%68)% RIGHT$ (P$ 
ЕҒ»%В8С»%20,%13 ЕР” 117:1Ғ 0$=°+” GOTO Х%2,12-65 Y) s 12-8) 

S:POKE 50519,0,0,0,0,0 20:Х-1:Үзі 118:ІҒ D$=*-* GOTO 143:P$(Y+1)= LEFT$ (Р$СҮ || 162:й- ASC MID$ (Р$(Ү+1) 
62,54, 345345625625 2 199i じ ERHLL &11Е5: WAIT B: 119: IF D$="*" GOTO +1)sX+1)+ CHR$ (ñ-4* ,Х%2;1)-65 
0»2й0:20:62»28»34%54» PRINESE 70% ҮН” 120:ІҒ р$%=°С” GOTO ІМТ ‹А/4)+69)+ 163:Р$(ү+1)= LEFT$ (Р$(Ү 


(Y), 12-%) 
152:A= ASC MID$ (P$(Y+1) 
sX+2:1)-65 
153:P$(Y+1)= LEFT$ (P$(Y 
+1)sxX+1)+ CHR$ CA-4* 


1:78” CLEAR : DIM X$(1 
2ж65: POKE 50940,72, 
197 

2:РОКЕ &8ЙЙЙ,&Р1,&Е5,& 
14: Lbs QET: STs SDB: & 


IF D$=° 


121:60Т0 118 


42,26 5Y 
6:РОКЕ 50550»0:й0»0:й»й 


:62:54»54;54,62.62»2 
As 20,20,62, 28,34, 34, 
42,26 


Т7:РОКЕ 50550,0,0,0›0,0 


s62 34 54, 54,62,62, 2 
0:20, 295 62 28, 34, 34, 


1Ø2: CALL &8000:P=&F80F+5 
x: IF Х28 LET P=&F8ñ 
4-5% 


| 193:POKE P,127- PEEK (P) 


5127- РЕЕК (P+1)5127 
= BEER APAT IIT 
PEEK (Р%52»127- PEEK 


初め く ЫЙ) (31, こ 水 へ ら 5 も まう し く ホ 中 いし まれ 
зк A H, ALDAR e SF HE mi 
0547 RAN- RTOIVET 

を た 和合 りす す 、 る よう が る ?. 


150: 


151: 


152: 


A= ASC MID$ (Р%(Ү)»Х 
%2312-65 

P$(Y)= LEFT$ (P$(Y), 
х+1)+ CHR$ (4* INT < 
8/42%653% RIGHT$ (P$ 
(Ү)»12-Х) 

A= ASC MID$ (P$(Y+1 ) 


144: 
150: 


151: 


+1),4+1)+ CHR$ (ñ-4* 
ІМТ ¢A/4)+77)+ 

GOTO 100 RIGHT$ (P$(Y+1)512-% 
ñ= ASC МІр$ (P$(Y)5X ) 

+2,1)-65 164:С0Т0 100 

P$(Y)= LEFT$ (P$<(Y)5 ЇТӢ:ИАІТ : PRINT “SAYE 0 
%+1)+ CHR$ (4* INT ¢ К?”: PRINT #P$(*)>,% 
8/43%672% RIGHT$ (P$ 


RIGHT$ (P$(Y+1),12-X 
) 


福井 県 PRINT.A 


151 


BASIC 


ШТКАМСЕН 


ああ た は せよ ょ よん な が こと に 。 УУЛ 
の 中 に 閉じ 込め られ て し まっ た . 

さあ , あな た の 冒険 は ここ か ら 始 まり ま 
す . ポケ コン で あり な が ら , 充分 満足 し て 
いた だ ける と 思い ます . 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


スト ー リ ー の 流れ も ほぼ 無理 が な く , 


| それ な り に 楽し め ま す . (ки) 


ォ オー ル BASIC な の で, 安心 し て 打ち 込 
ん で くだ さき さい. た だ アド ベン チャ ー 


途中 で RUN は し な い 方 が よい で し ょ う 

まだ メッ セー ジ は ほとんど 暗 号 化 し て る 
ос, 打ち 込む と き に スト ー リ サー が わか る 
ЕШ ЕТЕ ыы 2; 


1:РЕМ 1985.by Fu 
miaki Ohno 

5: CLEAR :ПІМ А$‹ 
9)*26:RRNDOI 2 
C1=19 り | 

6: CURSOR 0: PAUSE 
СІЗСІЕСІСІРСЫБ 
: IF C1<> り THEN 
6 

9: МАІТ 199:PRINT 
"St art ": ВЕЕР .8 
, 64, 10 

10: A$(8)="3nt イレ 
こ テ いつ 0 9797-67 
"; GUSUB 6500: ñ 
$( り )= ニ "ンチ スキ "ユミ 
(2° Ly スト ウチ ナグ" 
: GOSUB 6500 

20: А%8(02-"< ЕЖ? ^- 
†2¥"": GOSUB 65 
00: R$(0)=' i I$ 
P ут? ":6050В 
6500 

З30:А%(0;)-"2%17719 
Із ЭТОТ” 4-9 

г"; GOSUB 6500: 


6500 


РС-1501+СЕ-1 57 


な の で , 


R$(9)=" ニ キ ァ ヒ ウ ー ト 

27° の チ サ ナチ キリ 2 

GOSUB 6500 

49: R$〈B)=" ナ "エコ リ + 
7 ZALIO ラ エ チ "ー 
%"":605/В 6500 
:08(00- 9 ハナ クト " 
イレ ララ ララ " 3 60SUB 


58: BEEP 1, 23, 50: 
ВЕЕР 1, 26, 50: 
ВЕЕР 1, 30, 50: 
ВЕЕР 1, 36, 58: 
ВЕЕР 1, 40, 50: 
ВЕЕР 1, 46, 50 

60: A$ (A) ="?17° УЕ 
Ал? Л $u ОП" 
"; GOSUB 6500:А 
$( り )=" ス ュー チア ヒ 4 
ж л. ا‎ ad дәй? S Ды: Әй 
"3 GOSUB 6588 

2 フ 9: R$()=" 2 ロキ リ 7° 
けさ けり ウチ ンチ チト リル まり 
: GOSUB 6599: A$ 
(9)=" イ レフ 77077” 


Кек ОЬ ӨЛЕР AA 


+ /) 授業 を 聞い て いた だ 生徒 た な ち は 悩 ん だ . 


DATA と EEMAIN の 2 つの プロ グラ ム に 
分 か が れ て いま す . DATA を ロー ド し た 後 , 
RUN し て か 5 “MAIN PROGRAM 7 


ロー ド シ マ ス と 表示 る れ だ ら , カセ ッ ト 


を 用 意 し て | ENTER キー を 押し , MAIN 
を ロー ド し て くだ さい . 


“КАЛ?” と いう 質問 に 対し て は , 
動詞 を 入力 し て くだ さる い ( 英 単語 ). “ナニ 
э" と いう 質問 に は 名 詞 を 入力 し ます . < 
の と き 。 余計 な スペ ー ス は 入れ な いで くだ 
さい . な お お , LOOK と 入力 し , 名 詞 を 入力 
し な けれ ば 回 り の 状態 が 見 れ ま す . 場所 が 
変わ っ だ と き は 必ず や っ た 方 が いい で し ょ 
2% 


それ か ら , この ゲー ム は 前 と 後ろ の 2 方 


и” PA GOZER BASIC! Z FII 


88: GOSUB 6500: A8 ( 
ロラ ラビ ルル ニチ ナビ で ナナ 
257": 6050В 650 
り 

98: A$(8)=" 937Z «FP 
(Е9999Э9": БО50В 
6500 

100: BEEP 1, 7, 200: 
ВЕЕР 1,9, 200: 
ВЕЕР 1, 50, 30: 
ВЕЕР 1, 8, 300: 
ВЕЕР 1, 30, 250 

110: МАІТ 89:FOR 1-1 
ТО 100: GCURSOR 
RND 156-1: 


CURSOR 9g:PRINT 

120:0%8(0)-"99»6 ミー 
チリ хУ299494% 4 
-#7":6050В 650 
а 


130:А$%‹0) ="7= 
きじ 
299%) 


p 
150:ВЕЕР 1, 10, 6208 
120: CLS: :МАІТ 5: 
ВЕЕР 1. 180, 10 
180: BCURSOR 55: 
GPRINT "404048 
40400000404048 
40400040404048 
40404040404040 
404000000048" 
182:ВЕЕР 2, 100, 10 
185: GCURSOR 55: 
GPR ІМТ “406050 


187:ВЕЕР 3; 80, 10 

190: BCURSOR 55: 
GPRINT “605048 
58600000605844 
58600040860545С 

40406050585454 


「 な ん だ あれ は ./ ノ あれ じゃ 無限 カー プ で は な いか ググ 」 和 彼ら は , 1 教官 に 注目 し た だ. 
2 教育 は , 説明 を 始め た 「 こ の プロ グラ ム は , 1 が 永遠 に 回 り 続 け ま す . だ か ら 愛 は 永遠 な ん だ ば よ 」 ち ゃ ん ちゃ ん . P.S. 近頃 の PiOPiO に は 合 


向 し か 進め ませ ん . 移動 は GO, BACK で 
入力 し て くだ さい (これ も 名 詞 は 何 も 入 力 
し ませ ん ).。 あと いで ぐつ か 動詞 に つい て 
説明 し ます が , 座る と き は SIT だ け で す 
(DOWN は 不要 ). また , 建物 に 入る と き 
ZIN, 出る と き は OUT で す ( 名 詞 は 必要 
СЗ). 途中 で や め た いと き は | BREAK | 
再開 は | DEF |AlI で す ( 問 違っ て も RUN は 
し な いで くだ さい ). 

書き 忘れ まし た が , その 他 の PC-1501 か 
ら の 質問 に 対し て は | ENTER | を 押し て , 
"Y/N デ コタ エ テ ネ " と 表示 きれ て か ら 入 


Г. 


プロ グラ ム を 作る と き に いつ も 協力 し て 
くれ る ,A 高 校 1 年 7 組 の は ん の ひろ し 君 
に 感謝 し ます . それ と Robin さ ん 見 て ます 
か ? PCUC 頑 張っ て くだ さい 、. 

3 参考 文献 
1) ЕЕЕ: 

'844F..0 H > 
2)" ア ドド ベンチャー 制作 講座 ", 

PC マガ ジン , 新紀元 社 


“Magical Vision”, РіО, 


406018143С40" 
193: BEEP 4,50, 10 
195: BCURSOR 55: 
GPRINT "204С41 
467000007842741 
46289962524R4E 
40402084С4В4948 
40280Е192Ғ40" 
197:WAIT BEEP 5,2 
0, 10 
200: GCURSOR 55: 
ӨРКІМТ "2Ғ4141 
517310007۴4142 
422E9D161514345 
43402Ғ49434948 
402Ғ0319294Ғ" 


42%ғ 


GUSUB 650 


PRINT CHR$ < 40600000406050 || 210: PAUSE "WAIT А 
RND 30+65): 60400040406060 MINUTE. ": GOSUB 
ВЕЕР 1, 1, 28: 404040605050408 7000: BEEP 1 

NEXT I:WAIT : 404020102040" 220:685(02-“%9-2? 27 


TRETI ンタ 
GOSUB 6500 
239: R$(9)="NBJO QS 
PHSBN ァ フアナ "スミ セ 
г"; GOSUB 6500: 

CHAIN 


1 教育 は FORTRAN の DO 文 の 説明 の ヵ 


その 注目 の 中 で 1 


ーー て し 午前 4 時 3 分 35 秒 恐怖 の 影 先 輩 か ら 聞 いた 話 編 、 くれ は , ある 日 の 2E の 情報 処理 の 時 間 に 起 っ た 、 1 教育 は FORTRAN の DO 文 の 説明 の た 
ең > 午前 4 時 3 分 35 秒 恐怖 の 影 先 輩 か ら 聞 いた 話 編 . それ は , ある 日 の 2E の 情報 処理 の 時 間 に 起 っ た . 1 教官 P 5 
ЖОС, め に 黒板 に プロ グラ ム を 書き 始め た . FOR 1= 1 TO 10:1=1— 1 : NEXT( 本 当 は ちゃ ん と FORTRAN で DO 10 一 て 書い て あっ た ん で す 


419, 


リス ト 1 GOZER BASIC リ スト 1 
8900: H$="": A=LEN $ 


2181:DATA "МРЫЕ", 


6500: CLS WAIT ө: 


E ま (1 ): GOSUB 


CURSOR 8:A= 8000:Е%<15-Н "БН", “ТШ Е%(1):ҒОЕ J= 80902: B=B-1: H$=H$+ 
LEN А%(0): $:NEXT 1 ", "ЅЕВЕ", "QU 1ТО А: B$= CHR$ В: МЕХТ 
FOR 1-1Т0 А: 2002: ҒОВ 1=gTO 13 LIS "НЈМЕ" ID$ (Е9(1), J: RETURN 
В%-МІП% (А%( :РЕАП F$(1): || 2300: рата "XPNBO" J, 12:B=ñSC В 8010: RETURN 
$ 


‚ "IPUTF", "ES 
BHP0", "МВО", 


02,4,19:21Ғ 1 
=RTHEN MRIT 


GOSUB 8005:Ғ 


%(12-Н%:МЕХТ 8002:В-В-1:Н%-Н%- 


В-А5С В%:В-В 1: 60Т0 8010 “ОРҮ”, EJBSZ CHR$ В: NEXT 
-1:РВІМТ 7190: DATA "MPPL", BUFS "0 J: RETURN 
CHR$ В; : МЕХТ “UBEFE UBML JHIU", "DBTF" || 8885: Н%="": A=LEN 
1: RETURN ", "Роу", "СЕ 2381: рата "TUPSF" Е%(1):ҒОЕ J= 


2000:ПІМ E$(15), F Ві", ESJOL”, ТАРОӨР” "СУ 170 A:B$= 


8(13):ҒОВ l= 
ВТО 15: РЕАП 


РЕР ТУЗ 
ІМ Ur; K=O. 
201: М=0: GOSUB 6000 


"10", "НР", “г 
Вог", "ОІЅРХ" 


3 


398: IF П-ӘТНЕМ 300 


UUPO", " TUSBO 
HFS", "HPJFS" 


Pe SAFE JIETTE 
ERC GE SUB 
60009 : 


МІП% (F$(1), 
J, 12:В-А5С В 


ØLET L=g:R$(Bg) 
воне турап 
r": GOSUB 6000 


ДО リス トク GOZER BASIC!) Z F IL шак е 


1: РЕМ GOZER МА1М||205:4%(0)-"7%Е イロ ヒ GOTO 300 658: IF С%-Е%(72АМП || 828: IF C$=E ま (14) 
2:ВЕМ 1985 BY FU резуси Тү 400:Р-4: $0) = "Әд G=QLET А%‹0) =" АМО ОФ=ЕФ (11) 
MIAKI OHNO GOSUB 6000: V жы D жайып A айыр AS es "ӨР" “от SSS E LET ASCII Ny 
19: BEEP 3:PAUSE " GOSUB 50 a 07"; SDSÚUB: 60 AEE: GOSUB 6 х カス ト 990068: 
боор ЕК? : IF 上 =1LET А%(0 00:%6-1:Н-1: Q00 GOSUB 6000: 
20: "B"K=0: 6=0: H=0 ご "用 ユ モ n ミ オ ァ ЛЛ GOSUB 50 698: IF D=gTHEN 600 GOSUB 6105 
: GOTO 100 | ш SPE н а ЫРА 410: IF 1=16050В 680 || 699: 60508 6018: 838: IF C$=E$( 6AND 
58: C$=""; D$="";: D= GOSUB 60080:1 =0 10:1 =0 GOTO 600 D ま =F$(1) 折 ND N< 
1: RANDOM : IF С%-Е%(10) 4280: IF C$=E$(1)ñND || 2008: Р=2:А%(0) =" 291 >9LET А%(0ә-"Л 
まま た に らち INPUT рУ AND M=1AND 0%= П%-Е%(1026050В rr ra “АТТ” 
フス ヌル 7% С9 ҒЕ%(1021ЕТ А%С0 6055 GOSUB 6000:6-0 ": GOSUB 6000: 
52: IF C$="" BEEP 1 5-"3%пПҒУ 9-7 F H450: 1F C$=E$(9)RND : H=0: GOSUB 58: GOSUB 6120 
ぅ 200, 5: 60Т0 51 Pak Fp Bar A 1 D$=F$(1g)LET А N= 840: IF C$=FE$( 6AND 
53:ІЕ С%-Е%(22АМ0 :GOSUB 60002 %(Й)-"ЛЛО2 ОАК ||220:1Е C$=E$%$( 6AND П%-Е%(12АМП N= 
G=1LET 620: ‘IF С%-Е%(Й)АМП 6р7"; GOUSUB 600 D$=F$(9)LET ñ$ SLET ñ$(0)=" p" 
GOTO 10ӨЖЕР-1) П%-Ғ%(С102АМП М り (Өзек усу: фе дйн КГУ, ЧЁ е Се шабан) ЛЫҚ 
55:ІҒ С%-Е%(82АМП =QLET ñ$*(0)="+*||498:IF D=ØTHEN 400 : GUSUB 6000: 0= GOSUB 6000: 
Н=11 ЕТ Н- : リキ リア サル テウ トミ ET |1499: GOSUB 6010: 0:ІЕ- М<91 ЕТ M= GOSUB 6130: м=1 
БОТО 100¥(P-1) "; GOSUB 6035 | GOTO 400 9 0: 6=0:Н=0 
56: IF С%-Е%(2720Р SIF C$=E$(12) . ||500:Р-5: А8(02-"%>4 ||230: IF С%-Е%(02АМП || 850: IF C$=E$(3)RND 
じ ま =E 上 $(8)RE TURN | | AND D$=F$( 10) С, азо E N E D$=F$(8)AND M= П%-Е%(121ЕТ A$ 
あじ に あま 小粒 た くち まこ LE PEIRCE 22” GUSUB 6000: 6-1 SLET А$Сй)="+#°" (В) =" 22457": 
ラ ( ト ) ts 0% し ЖЫР б Ep ドル y :Н-1:6050В 58. UP PS Ts ETE EDT GUSUB 6000: N=8 

60: IF C$=E$(95)ñHND 7"; 56050В 6000: || 5ІР”ІҒК 1=11 ЕТ 1-0: た : ロニ : 日 1 
D$=""LET 11: М=1 | 60508 6010 GOSUB 6090 855: IF C$=E$(2)RND 
RETURN : IF: Сӛ-Е%(0208 ||520:ІҒ С%-Е%(021Ғ 249: IF L=1ñND H=9 П%-Е%(ЙУ)АМП N= 

65:ІҒ О%="°ВЕЕР 1 C$=E ま (13)1F D$ || D$=F$(6)0R П%- LET LØ: A$ (0J: 181 ЕТ А$% 0) =". 
› 200, 5: БОТО 52 =Е$%(5) АМО М-2 "RIUER"LET А$‹ оппо, pP) таты カキ? 9 СТЭЛТЕНР 

28: RETURN LEF 内 ま (B)=" ナ コチ фу ЕГЕТЕ ° Ф207": GOSUB «ЕЕт-іетак:%: 

1 りり :P=] 2 内 $(B)=" ス ォ レ Сее REE г"; GOSUB 6000: 6008 | GOSUB 6000: 
ETDE m E A JE 47"; 6050В 604 GOSUB 6060 245: IF C$=E ま (9)RND GOSUB 6150 
GUSUB 6000: ð 538: IF C$=E$(5)AND D ま =F$(4)RND M> || 890: К-800 
GOSUB 50 : IF C$=E$ (7AND П%-Ғ%(621ЕТ A$ =9LET $(g)=" ト | 832: IF М=10 ЕТ K=8 

1895: 1F 上 =1LET А%(0 G=QLET А%(05-" сй көл кг» WE z ae 95 

АЕ а, жайы ЖУ аФТАРТҰТ ЯЫ +" t. SU ITED ytl zy": GOSUB || 898: IF D=BTHEN K 
う エ ト Pt て 7 "3 Б050В 97": GOSUB 6000 7"; GOSUB 6000: 6000 899: GOSUB 6010: 
6008 : IF П-ЙӨТНЕМ 205 IF K=QLET К-1 750: IF C$=E ま (4)RND GOTO K 

186: IF І-ПЕТ 1-0: GUSUB 6010: 598: IF D=ØTHEN 508 D$=F$(8)AND М= || 900:Р-9: А%( 02-157 

А$ (0)="I22>2 22 БОТО 205 599: GOSUB 6010: LET ñ$(0)=" 37 m a K t ta 

йыр. 222516 B: А. Sia) :Р=3: А%(0) ="272 GOTO 500 re Yaa 7": M= GOSUB 608088: 
209° ": GOSUB 6 フス ナチ ТАЎ" [| 6007Р=6: ASCOT 10: GOSUB 6000 GOSUB 50 

000 : GOSUB 6000: G= よう で "26 ロ 0SUB 255: IF C*#=E$(1)ñND|| 918: IF L=1LET 1-0: 

119: 1F C$=E$(11) 1: GUSUB 58 6000: GOSUB 58: П%-Ғ%(42АМ0 M= EE EE рне Ы ыы з 

ーー BET 朋 $ ま (9)=" ネ トレ : IF L=1ñND K く >3 0=1 1860508 65028: A pI TF 78122812 
Жа ст EAR A e ү, ЕТ ASCOT || 6ІРШІҒ LSTAND К<4 зсбуат UTE 6000: GOSUB 630 
3° 77 ":GOSUB 68 l Бен пыр a e ды у. ЗДІ LET AS(B)=" kaa イン ソリ ソリ ー ナ 、 ナ キ ウ ト イル а 
08 9207"; 560508 60 Е ык Ж бшш р >> 21°": GUSUB 609|| 920: IF С%-Е%(22АМ0 

140:ІҒЕ C$ ま =E ま (2 フ )LET pO: 上 = $° 7"; GUSUB 60 g D$=F$(2)LET A$, 
ロ $()=" モ ハロ ミオ ヒ + : IF C$=E$(9)AND 00:1 =: GOSUB 6 || 768: IF C$=E$(3)AND ( り )="」 有 月 ロ 上 ヒ ヒ リ キ " 
блет ее тотты D$*$=F$*$(35ñND K< 025 D$=F$( ヨ )LET ñ$ о ТАТЫ pa s 
: GUSUB 6000: >3LET А%(0;)-"7 || 620: IF K=3AND С%-Е 426 ANKET GUSUB 6000 
GOTO 6050 ーー セル ルリ トウ ト 用 2 エ ァ %(112АМП П%-Ғ% GOSUB 6000:0-11|| 930: IF C$=E$(1 1 ) 

128:K=K+1: IF K>2 «290% 7": 605УВ (2)1ЕТ ASOD =" || 298: 1F DSATHEN 200 AND 0%=Е% (2) 
LET А%(0) ="ГӰГ 6000 ュ ウ トト s う 7 ヤ ノンノ ママ " || 299: 6050В 6010: (ЕТ ロロ $(9)=" イ マチ 
ナメ トウ レギ ネリ イッ ロト える ¿IF C$=E$(11) オト ウフ 、" 3 GOSUB 6 GOTO 2008 в 39 Оа Ут; шер AN 
-$":1=0: GOSUB LET ñ$(0)=" 4" 000: GOSUB 6022 || 800:P=8: IF М№‹ >10 : GUSUB 6000 
6000: GUSUB 603 koya з ЫШЫК бы | H: Ккд LET $(B)=" ウ オキ | 940: IF С%-Е%(0>АМБ. 
0: GOTO 199 Eos kas ts 622: IF K<3RND C$=E е イル ミセ ET 2 6050В D$=F$(2)LET A$ 

198: IF D=OTHEN 188 GOSUB 6000 $(112AND D$=F$ 6000: GOSUB 50: (の コリ う チ や ロア 247 

199: GO0SUB 6010: : 」F К-2АМП С%-Е ( フ )LET А%(05-" G=Ø Att" ":6GOSUB 6 
GOTO 188 $09) АМО П%-Ғ%С ウミ ロロ イニ チト "上 Ғғ || 805: 1F М=101ЕТ А9 008 

200: Р=2: 内 ま (B) ニ "エン ィ 1 り 9)LET А$%‹0) =" EAL ZY“ "+ GOSUB B)=" の オハ 248927 || 950: IF C ま =E ま (て 9)RND 
アア ー a コキ リカ ウリ トヨ SIRES EREDE 6000 "; 60508 60080: П%-Е%(121ЕТ A$ 
サン ノン "2 60508 60 7": GOSUB 6888 ||640:ІҒ C$=E$( 8AND GOSUB 50 COTO EI 
00: R$ ま (B)= リ ウト トン : GUSUB 6080: К- H=QLET ñs*$(0)=" || 818: IF L=1ñND N<>1 a pr's GOSUB 600 


2 


960: IF C$=E$(15) 


AND D$=F$(4) 


399: GOSUB 6010: 


わな い 話 題 で すか ? (HITAC8250 の カー ドリ ー ダ ー と 仲の 悪い ロー ディ スト で も アウ シタ ン で も な い 裏 コピ ー ニ スト の USSR ナ ター シャ ) 


1S3 


Pio 


リス トク 2 GOZER BASIC リ スト II 
ГЕТ $(8)=" コ ニタ 


に きき 


6055: IF K>=1G0SUB 


R$ (0)=" 4199 ": 6050В 6000 


АЕ Lapas nia GUSUB 6000 6020: K=2: о р рж ot S :Р-39:60Т0 900 
GUSUB 6000: IF D=gTHEN 1 RETURN : GOSUB 6000: : A$(8)=" NDE 
БОТО 6310 100 60527: А$ (0) ="ЛГ7ЬА RETURN ау ак??? 
IF C ま =E$( フ )LET GOSUB 6010: Bh 6115: RETURN <": GUSUB 600 
A$(CO)=" BIL リリ БОТО 1100 GOSUB 6000: 61208: A$(8)=" 37a? 0: A$(0)=" Dz 
Отан: б Р-12:А8(0)-" RETURN ӘТЕР et s A Жоош е аР 


0008 ДИДЕ USS 6060: А% (0) =" "P :) IEE ":6050В 6000 


998: IF D=ØTHEN 900 
999: GOSUB 6010: 
GOTO 900 
1000: P= 10: ñ$ (0)=" 
IANN EAREN 
: GOSUB 6000: 
GOSUB 50 
IF C$=E$(Q) 
AND D$=F$(2) 
EET $ C€ 3 = y 
уе ды E ta r nus 
GOSUB 6000 
:1ІЕ C ま =E ま (6) 
AND П%-Е%с12 
ЕЕТЕЙФО@ y = "Е 
М1 84 Se ats 
GOSUB 6000: 
GOTO 1100 
: IF D=OTHEN 1 
008 
: GUSUB 6010: 
GOTO 1000 
:Р=11:8% 0) =" 
e E а, КТО! 
: GOSUB 6000: 
GOSUB 50 
: IF C$=E$(3) 
АМО D$=F$(1) 
ЕТ А$%(0) =", 
А зо. еб 
GOSUB 6000: A 
$00) ="ғ97° ЈЕ 
スミ ー チ 「"" : GOSUB 
6000 
Е EZ2 TAND M< 
23LET 1-0:6% 
(補う デパ ミレ ルト” д? 
EE E ез 
GOSUB 6000: 
GOSUB 6350 
: IF C$=E$ ま (けり) 
AND П%-Ғ%с13 
JAND: H<29L ET 
内 ま (9)=" 有 2 フス ウ 
Tj) Б аар" 
: GOSUB 5000: 
GOSUB 6380 
:1ІҒ C$=E$(1) 
AND D$=F$( 10 
JAND М<291ЕТ 
А%(0о0-"?21 22% 
7"; 6050В 600 
0: GOSUB 6390 
IE C ま =E$ ま (9) 
AND D$=F$(10 
JAND M=3ƏLET 
内 ま ( り ) ご "ウス ヒ з 
"ааа Лига 
593°": GODSUB 6 
000: GOSUB 64 
08 
EF С%8-Е%(140 
AND П%-Ғ%с13 
JAND M=31LET 
бжеЙйҙзатаяаба? 
ー、": GOSUB 60 
008: БОТО 6420 
:1ІЕ С%=Е%$<7) 
СЕТ АСЯ) = "Е 
СА: kl ТА ЕР, а 
co 
": GOSUB 6000 
ІР: С9=Е9%(11) 
AND 0%=Е$ (13 
ЕТ А$‹0) =" 
也 PS "21 


154 о 


: GOSUB 6000: 
GOSUB 58 
ІЕ 上 =1LET E= 
り : R$(B) ニ "モミ 
Е га айын АУ 
г"; GOSUB 6008 
Ø 
IF C$=E$(11) 
AND D$=F$(2) 
LET А%‹0) =" 
TAT FWN ZET 
FIT 'z:.6G0OSUB 
6000: GOTO 65 
вө 
ІЕ О=0ТнНЕМ 1 
208 
GOSUB 6010: 
GOTO 1200 
СЕ5 ZS MEET _ 6; 
CURSOR 0: A= 
LEN A$(8): 
FOR ІгіТ0 Rx 
В%=М10% (A$t 
本 まま が も まま だ 
“АТНЕМ WAIT 
0=0: ВЕЕР 1,1 
+50, 2:В-А5С 
В%:В=В- 1: 
PRINT СНР% В 
FINEST 1: 
RETURN 
IF С%-Е%(0) 
(ЕТ А$ (0) =". 
pe TES: З ТЕС, 
7"; GOUSUB 60 
88:1 =й: 
RETURN 
РЕШЕ СӘ” УТ 
Xa 2 RETURN 
$0) = "ヒス" ЕҒ 
Оа ТЕЛІ dr "у 
77"; GOSUB 60 
00: RETURN 
GOSUB 6000: A 
PODS IF) 
ЖАСТАР s 
Gs GUSUB 600 
OQ: RETURN 
GOSUB 60020: A 
O E EE IY 
S mes SA ru 
: GOSUB 6000: 
бе} 
А%$С02ә='”2+°73 
829/2 fG: PIF 
„үе. (Аз 
GOSUB 6000:а 
$(0)=" Y-F] 
ТИ5ВОНЕ5 ナウ エ 
Аа е 
GOSUB 6000: A 
(て) ご" ノンノン 、 
ササ ミト" スキ キキ ウト ミ 
SUBRSS 
000:РЕТОРЫ 
ELS PUT 
YZN SZ 2 エチ ネ 。 
“35821ІҒ 5$ テ “ 
Y"GOTO 200 
1 だ いら まぐ で かみ YY 
ЕТ 骨 ま (8 け )=" ト 
А к ЖЬ od са = сы た 
> ジウ 7 "2 GOSUB 
22 С%2'" 5 
GOTO 100 


6028: 


6025: 


6022: 


6080: 


6082: 


6084: 


6090: 


6091: 


6095: 


6100: 


6105: 


6110: 


ФЕ 3 “ЕЛУ? 
Жайын с сой А. 
GOSUB 6000: 
RETURN 
ASCII" pus z+ 
927":;6505УВ 60 
00: RETURN 
A$(O=" NDE 
HEPSI ZPA- T 
TI 。 5 8124902; 
6000: А$% (0) =" 
ササ ホリ リカ ヒジ ウキ キッ 
598" "660508 
6000: RETURN 
内 ま () ニ リコ フリ ミ ァ 
Аа дал < 
: GUSUB 6000: 
A$ (0) =" FE 
e аа ы 
GUSUB 6000: G 
=]:Н=0: 
RETURN 
ASCL U 2 ж” 
= s но заба. 
Зе” ҒАС? 
GUSUB 4000: A 
$C(Q)=" fa ¥ 
HPYFS ァ チカ スト 
Т" 
GOSUB 6000: а 
%(0)-",222%2 
A Жыз ка лае 
す 、": GUSUB 60 
00: А$ (0) =". л 
ВАУ Spy pap 
RAIT 
GOSUB 6099: A 
まま () ニ "2 スト 42 
ТЕ ЖОҒ Py ys ü 
“?Д#”"2:6050В 
6000: RETURN 
GOSUB 6000: A 
O By Кз 
г+9": GUSUB 6 
9 り 99:CLS : 
INPUT "им т 
“2791745959 
Тер: ІНЕ 6$ ミ "Y 
"ЕТ А$ (0) =" 
999949 = КЬ 
Р Y? 
: GUSUB 6000: 
GOTO 6190 
ІР 6S$="N"LET 
内 ま (9) ニ =" エア" J 
2 ОРО ы 
: GOSUB 68008: 
А$‹0) ="706 4 
жҰСаОТТа O 
GOSUB 6000: 
RETURN 
CC Улы ti 
ドロ フ P a 
GOSUB 6000: 
GUSUB 6838:M 
=0:№=0:К=0: 
GOTO 100 
BE に ESE” 
YZNJ“ 2983154, 
り 3 6 る 2 IF 5%=" 
Ү"РЕТИЕ К КЕЗ 
CHR$ 223; "ント 
Er PHRES: 2238; 


IF S$="N"LET 


GOSUB 6000: A 
ま $ ま (B)=" イ ニチ ヒ Л 
Сетора 
GUSUB 6000: 
RETURN 


6139: R$ ま (BB) ニ リュ イリ 2 


Т8. В0БЫВ 
6000: RE TURN 


565150: $0) = "0А 


ие еу 73 
uD. ": 6050В 
6000: n$ (0) =" 
SID IES EVEN 
29 агуу ヌー トレ ロ 


6151:65050У/В 6000 
басы AN RE 


еу 59: 
IF 5%-Ғ%(12) 
(ЕТ ñ$(0)=" 

ЗГ 099999"; 

GUSUB 6000: 

GOTO 6200 


6160: А$% (0) ="_ 914% 


HE VS 7000508 
6000: CLS : 

РРР EAN 
Л41) 2"; СНКФ 
2237899992 
"2 60Т0 6152 


6200: ВЕЕР 1, 200, 9 


ӨзЗВЕЕР `1, 120 
‚ 200: BEEP: 1, 
20, 300: ВЕЕР 
1, 200, 50: 
ВЕЕР 1, 20, 30 
B: BEEP 1,200 
‚ 58 


6210:ВЕЕР 1, 20, 23 


00: BEEP 1,48 
y 2000: ВЕЕР 1 
» 98, 13900: 
БЕЕР-1; 150,1 
500:ВЕЕР 4,2 
08, 200 


6220: МАІТ Ø:FOR 1 


-1Т0 100: 
GCURSOR RND 
156-1: БРРІМТ 
КМО 255: ВЕЕР 
1, ВМО 256-1, 
40:МЕХТ 1 


6239:FOR 1=gTO 8: 


MRIT 1: 
GCURSOR 65: 
PRINT "ーーーー" 
: BEEP 1, 1+28 
; 15 


6233: IF 1=8THEN 


WAIT 


6235: GCURSOR 63: 


GPRINT “0000 
りり 9282C662F66 
2С542В2Е?Е5А 
5Е5А2Е2Е2В54 
ノ C662F662C28 
20900900": МЕХТ 
1 


6237: R$ (0) =" $P әу 


как COSA 
": GUSUB 60008 


6240: A$(89)=" ND] 


オキ "イリ シロ チリ 
: GUSUB 6000: 
A$CQ)= "HPJTFS 
ҚЫЗЫР а ЭР 


: RETURN 


:А%(00-" 」 ス キチ すこ 


ES p= z" =E 
91. "60508 
6000: A$ 0) =" 
И ОЗОНЕ ЕТИ 
дъга 
GOSUB 6000 


:8%(0)-",7%27 


НА суа 
GOSUB 6O00: A 
$ CDS "0779р 
PEPE EENE] 
КОЛЛАП ОВ 
6000 


:GOTO 1000 
: АФСӢ) =" ENA» 


ателе", 

4и": GOSUB 
6000: А$‹0) =" 
КЕБУ тт 
аы еее СКЕ 
GOSUB 6000 


: A$(8)="HPJFS 


беер: 
80508 688A: A 
$00) ="_37772 
а. Та. 
GOSUB 6000 


ASL =" 5027 


SEXTE 
: GOSUB 6008: 
RE TURN 


SA$(CO)="E +P 


DTA OL a: 
: GOSUB 6000: 
F$ е Кел RE 
Жүз пат-Гез 
CIE EOS eS 
000: RETURN 


:A$(0)=" 3а 20 


y uya su pn 
の と て BED 
GUSUB 6000:М 
=39: RETURN 


АФ) =" 2422? 


м а 
GOSUB 6000: A 
%(Й)-"НРТЕ5Е 

3F NOD 
ба":605УВ 60 
00 


:Я$(Й) = “ІК? 


МЕ? スト 2-2У 2 
DIF ARS 
GOSUB 6000: T" 
=31:RE TURN 


:А%(00-"НРТЕ5 


озаты тағ 
IERTE 
GOSUB 6000: A 
8(02-"1-3)"" 
:GOSUB 6000 


: まま (BB) ニ "テウ ァ Б 


T YfG HPFS? 
FRAR": 
GOSUB 6000: A 
(И) =" АҒХа うい 

299329" 
GOSUB 6888 


:А$ (0) =" ^^ 


№9999": 

GOSUB 6000: A 
йз” А? 
“ҮР SCARE が 
%,/.": GOSUB © 


p РіО 1 月 号 p.94 の モー ルス 信号 練習 プロ グラ ム は , PC-1245 で は ERROR が 出 ま し た . そこ で PC-1245 で 実行 する に は ,。 10: CALL&IEBI : 
GOTO 10 と し て RUN す れ ば で きま す . PSL WATS ARIDA Si, Р.5.2 つい で に 1EB1 を 1EBO に する と 少し か わり ます . 


( 胡 成 の バカ ヤロー) 


りり 
円 ま (りう) ご リリ ニ ウ ナ キ " 
"149%. Жы 
GOSUB 60009: P 
ғ12:60Т0:12й 
0 
ABAS" 423%» 
ナウ TZAR 
21.2 6050В 6 
0008: А% 0) =", 
НЕЕ БЕ IIT 
кйш dr アプ T 
GUSUB 5000 
ASCII IT. 


: GUSUB 6000: 
а%(Йо)-"ЭӘпт) 
СЕ TAIPE 
х7": 56050В 6 
ваа 
А$(0) =" 1275 
ея 
= ys С": 
GUSUB 6000: A 
йе O paj t 
ZS EEE 7 
таре". 
GOSUB 6000 
А$ 0) =" ерке 


"+ GOSUB 60800 
$0) = "731722 
の うま アラ ラウラ 
33223" :4050В 
6000 
а Са ата 
ъззезуэ. "т 
GOSUB 6000: 
РОР 81-0Т0 3 
: ВЕЕР 1, 50, 2 
П: ВЕЕР: 1, 16, 
390:ВЕЕР 1, 12 
2, 60 


БЮ 


リス トク GOZER BASIC リ スト II 


5: ВЕЕР: I 208 

ы ЗӘЗВЕЕР: 2,7 

2, 34: ВЕЕР 2, 

39,:5:ВЕЕР 1; 

64, 50:ВЕЕР 1 

11,6 

МЕХТ А1: ВЕЕР 

1, 20, 450 

А$ (И) =" П 

2 ン 2 
“:605УВ 

6000 


6600: ロ ま (りり )="U ン B ン H 


/ HPYFS 


6288 
ASLAN = RE 
TREIA 
: GOSUB 600и. 
ЖЕЙ За от T. 
05ВОНЕ5"”: 
GOSUB 6899 


6999: ЕМО 
2800: "а"СОТО Рж10 


2 


ト w ご の 9 ナ セ аа 


аЛЛ?22а ЭХЮӘЭЭ 


БЗЗЗЕВЕЕР 1 
6540: ВЕЕР 2, 162, 1 


ЕОЕ": Б050В 


жж ж жж ж СОМРАС BEST 10 ж ж ж ж ж 


ПАДУА 22 аба ЕЙ 
前 月 の “ラグ ラン ジュ L2" 同様 , 他 の ゲー 
ム を 追い 抜い て , 新 製 品 な が ら 堂 々 1 位 の 
座 を 確保 し まし た. この ゲー ム は 惑星 メロ 
ー ザ を 舞台 に , 高度 に より 変形 可能 な 愛 機 
L, 敵 メ ロー ザ の 戦闘 機 や 機甲 戦士 と で 繰 


り 広げ られ る , 迫力 ある シュ ー テ ィング ゲ 


ー ム で す . 


ンー ラ ッ パ ニッ ク ” は 。 かわ いい キ ャ ラク 
AOR ео, 3 彼 階 に の びる ガン ・ ロ 
ー ジ を 使い 入り 組ん だ 岩 か ら 岩 へ と 渡り , 
怪物 た ちの 生命 の 源 を 拾い 集め る パニ ッ ク 
リア クシ ョ ン ゲ ー ム . 4 位 の “ウッ トイ " 
は , これ まで 発売 る され て きだ ウッ トイ シリ 
ー ズ の FM-162 用 で す . 

そし て , 根強い 人 気 で ベス ト 10 中 に いる 


トシ リー ズ に も , 近く PC-8801 mk IISR 用 
版 が で きま す .。 こち ら の 方 も 発売 きれ れ ば 
БОС уд чи уты ST SE EE 
ご の ほか に も , まだ だ た くさ ん の 新作 ゲー 
ム が コム パッ ク か ら 発 売る され る 子 定 で す の 
С, 来 月 の この コー ナー で も 登場 し て くれ 
る こと で U: kus 


さて 2 位 以 降 で す が 。 こち ら の 方 で も や の の あの ナイ ドッ マラ マンディ イシ ダグ の ザー 
は り 新 製品 の 嵐 が 強い よう で す . 6 位 の “ ノ Ы МАТАСА СОРТ あッ 


順位 | 前 月 度 の 順位 商 品 名 
FM-7/NEW7/77 
X1/C/turbo 


PC-8801/mkII \5,800 
FM-168 y6.800 


FM-7/NEW7 
MZ-1500 
FM-7/NEW7 


e SS 
СИВ Е яа: 

ザ ・ コ ッ ク ピ ッ ト 
226.21 Жауы X1/MZ-2200 
EXAS FM コン パイ ラ FM- 77 


[у оул 


注 : メデ ィ ア の D は ディ スク 版 ,。QD は クイ ッ ク ・ デ ィ ス ク 版 ,。C は カセ ッ ト 版 を 示し ます . 


新 


8% y REIS ORO „„„. 
Т 
і ӛшңіжйшш 9 
ғ SORE 
% Ф ә à Уд: 
„панни ЕН 
$ Ж шше 
“ШЫПЫ шш) 
% * „Н Чаш 
„йә Шш... 
% 


155 


РС-1245 


BASIC 十 マシ ン 語 


ST 人 RU@@LG T 


スト ラグ ル 


Дре 


PC-1245 で , ス クロ ー ル ・ ゲ ー ム を 作ろ うぅ あな た は , 点 減 し て いる 点 を 操作 し ( 図 この ゲー ム 上 の きま り 
と 思い た っ た の が つい 5 日 前 . それ か ら 3 [5] [oO] で 上 下 に 移動 し ます ), 画 面 上 に 出 нонун 
日 前 に 作り 始め , 今日 で きた と いう も の で て くる すべ て の 物 に 当たら な いよ うに , と a 
7. どう ぞ , ゆっ くり と 楽し ん で くだ さい . に か くん く よ け て くだ きい 、。 
し か し , か な り 目 が 疲れ ます . あま りつ づ また コー ス は 迷路 に な っ て お り , 行き 止 
け て や ら な い 方 が いい と 思い ます よ . まり も あり ます . 一 定 方 向 ス クロ ー ル で すか 
田 プ ログ ラム ・ イ ン フ ォ メ ーション br その コー ス に 入っ て し まっ だ ら あ きら ぶつ か ら な い 


roar め て くだ さい. 
マシ ン 語 | С430--С5А? そし て ある て い ど 進む と, “CLEAR ん " 
と 表示 る され, ボー ナス が も ら え , 始め に 戻 
り ます . 
ФЕ, 5 回 “CLEAR/" を 出す と “GIVE 
ゲー ム と し て は や は り 遅 いよ う TT. ОР” と 表示 る れ , ゲー ム が 終わ り ま す . 


また , 部 分 的 に し か 表示 し な い 点 は 
ak し た 方 が いい で すね . (Ки) 


272, LEEFT が 0 に な っ て も ゲー ム ・ オ ー 
жататы а 


自分 も し て は 。 スク ロー ル ・ ゲ ー рут 
れ だ こと に 満足 し て い 


HORO ФОФОФОФОФОФоФо 3 озен し か し , この ゲー ム は な か な か “CLE- 

まず , リス ト 1 の BASIC 部 を 打ち 込み , BASIC 部 の 23 行 に ある IF W > =354 АВИИ" が 出せ な いと 思い ます . や は り 迷 
スッ の に と か らち チョ ちあ の が し て くだ GOTO 500 の W の 値 を 変え , &C5A0 か ら 路 で すか ら , 何 度 も や れ ば 必ず "CLEAR ん" 
る い . 次 に リス ト 2 を 何 か の モニ タ ま だ は コー ス の デー タダ を 書き 込む と, ユース が 5 変 を 出せ る と 思い ます . で も , 5 回 目 を クリ 
POKE で 打ち 込み , リスト 1 の 後に セー | わり ます . ア し て “GIVE UP” を 出せ る 人 は , ほとん 


TETES 

実行 は まず リス ト 1 を ロー ド し て 
| DEF |Al ほ や る L, リスト 2 を ロー ド し 
LN SARAN ЕКЕТСЖІШІЗІШЕ 
か ら は RUN で ゲー ム が スタ ー ト し ます . スピ ー ド は 決し て 運 く は な いと 思い ます . 
し か し , メイ ン を マシ ン 語 で や っ て い ぃ る プ Г ДА. Ltr FLEE REL 
ログ ラム と は , ゃ は り 比 べ 物 に な り ませ ん . エラ ー が 出る と , エラ ー が 表示 る れず ゲー 
p t, BASIC プロ グラ ム は あま りら 付け ム が 始ま っ て し まい ます . シス テム の 関係 
加え な い 方 が 身 の た めで す よ . で エラ ー が 出 や すい 場合 , CLOADM で リ 
_ スト 2 を ロー ド す る こと を お 勧め し ます . 


どい な いと 思い ます (私 は で きま す )。 


140:РОКЕ @+8,1+Р: IF I 
AND P THEN 350 

141:00Т70 30 

MU:LALL RI WAIT 99: 
PRINT: СЕВЕ 
S=S+1BBX:M=B,P=8: 


2:К=2,1=4576,Р=3,0=635 
AH, 2=28480, 5=ӣ, U=&C4 
4A, И=2»4=1 
5:МАІТ 99: PRINT °“ 
STRUGGLE”: PRINT "HI 
"ҮМі9:9:0%: GOSUB 8 


6B:IF INKEY$ =°й” 
564 LET Р-Рж2 
61:IF INKEY$ ="5" AND P 
21 ЕТ Р-Р/2 
70:5-5%3: GOTO 20 
100:РОКЕ @,й+Р: IF ñ AND 


AND P 800: WAIT 99: PRINT " LEF (ЕТ М=5: INPUT ” NAM 
ЖА се 52 Е? "50$ 

81Й:РРІМТ ° ROUND 905:PRINT ” REPLAY ? (Ү/ 
A=ds В=й,С=й, D= N>": CALL L 
Е=й,б=й,Н=Й,1= 910:ІҒ ІМКЕҮ% -"Ү” THEN 


82B:PRINT " SCORE : : 2 


19 P THEN 850 PRINT ” BONUS; CALL R: RETURN 311:IF ІМКЕҮ% ="N" END 
1Й:МА1Т B: PRINT 99: 101:5070 30 . STR$ (100X) 850:ҒОР Т-й TD 3: POKE Q 912:050Т0 918 

CALE L 110:РОКЕ 0+2,С+Р: IF C 510:Х-Х%1: IF Хо-б THEN +2xX-2 P22+P*2 P | P #2+ 2398:”A" CALL &6ЕА2 
20:РОКЕ QrAsBsCsDsEsFsG AND Р THEN 354 700 Рж2: POKE 0%2Х-2эР,Р 999:00Т0 2 

HIJ 111:00Т0 30 515:К-Кж%1: 00508 398: /2%Рж2эР: NEXT Т 


120:РОКЕ 0+4,Е+Р: IF Е 
AND P THEN 358 


23:1Ғ М>-354 GOTO 500 
25:0М x GOTO 100,110,12 


86ġ:K=K-1,P=8,W=W-20: 
С050В 800: IF K>=1 


GOTO 18 
T99gi MRIT 99: PRINT ° 


Ar 134,148 121:00Т70 30 IVE UP !!”:5=5+1000 THEN 19 

38:ñ=B:B=C sC=DsD=E+E=F+ || 138:PDKE O+6s5+P: IF б К+ RND 1880X: GOSUB JØ: WAIT 99: PRINT " ба 
F=Gxsb5=H:H=IsI=J:J= AND P THEN 358 324: GOTO 900 МЕ ОЧЕР 119%: IF SIM 
PEEK “U+M) Í И= +1 151:00Т70 5й 


= `, ` ` . ` ` r қ ж j a » Ж ж 
ゅ こんばんは, ネアンデルタール 渡辺 で す . 僕 の 親父 は PiO の マシ ン 語 リス ト 欄 を 見 て 「 う ー ん , わか らん 」 と うな っ た か と 思う と , 突然 
「 お 前 の パソ ンコ ユン は ワー プロ か ? 」 な ど と た 訳 の わか ら な いこ と を 言っ た り し ます (「 ワ ー プ ロ で は な いけ ど ワ ー プ ロ に も な る よ .」 と 言っ た ら 余 
<< 計 わ か ら な く な っ だ り し て ). (ね あん ) 


ЙЙЙЙЙЙЙЙЙЙЙЙЙЙЙЙ:ЙЙ 


5 ЙЙЙЙЙЙЙЙЙЙЙЙЙЙЙЙ:ЙЙ 


ЙЙЙЙЙЙЙЙЙЙЫЙТӨТЗ:5Й 
ТЙТЙТ517315757577:96 
ТТТТІЗТЕІЗБТЙЙ1Й: C6 
й82828285ҒйЙ54565:6В 
6345449444143918: 2B 
ЗЕЙ2620А035130348: 357 
6Ғ4й50й0103С0й0С4:ЙҒ 
7С08132й7Сйй206й0: B3 


88й4111Ғ51404008:й0 
BB487D408B81811717:2D 
10581242424Е6ййй: SL 
550й28й0ййЙйЙ541414:ҒВ 
14140ЙИЗ2А2А2А2А: D3 
2828285822262Е28:56 
202720501Е501037: 4С 
2000121509407С58: 74 
1ЙЙЙЙЙ2А2А2А3А22: EA 
222Е22235207С1017: 958 


| 


> ЖУ СТС, NAD AD ағаға ла 
Р 1 


107С40400йЙ1ВІҒЙЕ: 54 
4444184424844394: 35 
121Е426208282828:5С 
2828282й82Е680424:56 
2421282828583207:4й 
6444249414141414: E8 
1477йЙ2й268686848:14 
5й57525654547404: 79 
0412484828252425:44 
501й5й01йЙ57185518:5Е 


muu!) -2 STRUGGLE マシ ン 語 リス ト 


353H39195B496141:EC 
476573й0078141214:СҒ 
BZM692 り HHR2HZRT 30 
2В282Е246600180С0:51 
6570000014141436: 45 
22222H2H2H2R9R3Hi 30 
222664445С486В28:27 
2Е680В84848580Ғ0й:7С 
58424338й0й6Ғ6868:56 
485850045410547С:й8 


ゆい 


48й092526242С6820:72 
3302020000000000: 3С 
33222F 6001233002: 3F 
6572737911051719: 98 
10185222285Ғ0000: ET 
ロロ ロロ けり は ロロ けけ けり けけ けけ: ай 
4444234444442304: けり 


TR 


` еее 


КС SSS S SSS ережеде ор a A 


panarama 


この フロ グラ ム は , 文献 1 の マシ ン 語 ライ ダ タ , 
文献 2 の 16 進 キ 一 化 の ゲロ グラ ム を 合わ せ だ も 
の で す . 

マシ ン 語 ライ タ は , ダ " ン プ ・ リ スト の まま マシ ン 
語 リ スト を 入力 で きる も の で , 16 進 キ 一 化 は , カ 
ナ モ ー ド の と き に 右 の 16 個 の キー を 0 一 F に 変え 
ます ( 図 1) . 

アド レス $B00 か ら 実 行 す る と , コマ ンド 入力 モ 


ー ド に な り ま す 。 コマ ンド は , М: マシ ン 語 ライ タダ, 


E BASIC М: モニ タ で す . 
入力 方 法 


プロ グラ ム は $0B00ー に ある た だめ, 文献 2 に 載 
っ て いる チッ クサ ム ・ ブ ログ ラム で "は チェ ッ ク サ ム 
の 確認 が で きま せん . そこ で , POKE 8, 31 
| RETURN | を 実行 し た 後 , $2B00 一 を リス ト ど お 
り に 入力 し , 入力 し 終わ っ た ら 6 チェ ッ ク サ ム を 確 
認 し , モニ タ の コマ ンド で $2B00 一 $2E7F を 
$0B00 一 に 転送 し て くだ さい 、. 


zga SD 
2808 70 
2810 27 
2818 26 
26820 вв 
2628 Fü 
2830 27 
2838 84 
гвав 32 
2848 39 CE 
ев5@ BD 
евзе ағ 
2BS@ СЕ 
2868 DE 
2870 35 
2878 32 
CHCK=SUM : 


2880 Яғ 
2833 Яғ 
2870 88 
2878 00 
ZBA ТЕ 
28A8 ай 
2884 ^2 
гввв 5а 
гевсе 20 
гвсв uD 
2806 81 
2808 84 
BE9 81 
2BES DE 
2BFG 27 
ら BF8 7C 
CHCK-SUM :30F2 


гсвв СЕ 
есев ØC 
есій 16 
есіз аз 
есгй 945 
сга 00 38 
2C39 0B 


“ЕСЕЙ 20 
'2CF8 05 


. 2068 50 f 0245 


語 ライ タ 
әгі プ 
マシ ン 語 ライ の 機能 


初め て マシ ン 語 ライ タ を 実行 し た と き に , マシ ン 
語 を 書き 始め る アド レス を $ な し の 16 進 数 で 入 
HL, 最後 に | SPACE | キー を 押す と , 入力 し 

- ア ドレ ス 以 下 80 バ イト が 表示 る れ ま す . 新しく ア 
ドレ ス を 入 力 す る と き は , | 』| キ ー を 押し ます . 

入力 し た マシ ン 語 は 。 [Z], [x], 
キー が 押さ る れる と マシ ン 語 を や カー ソル ($9D) の ア 
ドレ ス に 書き 込み , 次 の アド レス に カー ン ソル を 動 
か し ます (|[Z| キ ー は 1 つ 戻 る , [х] SPACE | 
キー は 1 つ 進 む ). な お [Zz], [X| キ ー は 2 秒 以 
上 押し 続け る と , リピ ー ト 機能 が 働き ます . まだ , 
入力 ミス は | BL | キー で 訂正 で 9. 
| RETURN | キー を 押す と コマ ンド 入力 モー ド に 


な り ます . 
16 進 キー 化 


16 進 キー マシ ン 語 ライ タ マシ ン 語 プロ グラ ム 


есзв 70 
гсав өз 
2C48 SA 
2C5@ во 
гс5в #0 
2С68 ОЕ 
2с58 70 
гств 83 
2с78 58 


ecsa во 
2C88 00 
2С90 DE 
2C?8 аз 
гсай 05 
гсев РЕ 
есве $A 
есез 84 
ессе зс 
гссв з? 
SL ЕР 
есов 20 
есей 81 
2CE8 38 


Z044 зс 821 
2003 Яғ 029Е 
2018 FF вгСсв 
2018 В? аззз 
2020 3? азаг 
2028 8 る ва47с 
2030 33 ! 8317 
2038 вй し じ ま を スコ 
2040 30 А 6108 
2043 в4 8427 
2050 85 баг8 
2058 85 8287 
2068 98 6198 


f 2 
Во 4 


@ レ イカ | 
マシ ン 語 ライ タ 実 行 中 に カナ モー ド に する と , 

図 1 の よう な キー に な り ま す . [3], [2], [x| キ 

ー の 機能 は 変わ り ま せん . 

3 参考 文献 

DAEA マシ ン 語 ライ タッ シス テム 

プロ グラ ム ・ ラ イブ ラリ ②, 工学 社 

2) ふっ きゃ あ : 21 2 

進 キー 化 "。 ベー シッ クマ スタ ーー 活用 研究 , 

学 社 


> =a 


41 キー 配列 
1701517764 
ШЕШСЕ 
__|[+][5][#][7| 
ӘЗІРМІЗ» >) 
СЕЕ) 


20780 41 4E 44 20 20 00 09 
2078 85 85 85 85 85 85 85 
Сснск-50м :20са 


20308 85 
2088 85 
2090 uD 
2098 41 
2040 04 3 
ZDAS ûû 
2080 85 
ど D88 44 
осе 3? 
ど DC8 81 


2000 BE 


2008 26 
20ЕЯ аз 
ZDES 84 
20۴86 35 
еоғв 39 


2Е@@ 81 
геЕйв D? 
2Е10 26 
2Е18 03 
2Е20 845 
2Е28 5A 
2ЕЗ@ 3? 
#E38 00 
2Е4ӣ FF 
2E48 FF 
2ЕЗ@ FF 
コー ュー FF 
2Е66 ҒҒ 
2Е68 ҒҒ 
2Е70 FF 
2676 РЕ 
CHCK-SUM +3385 


157 


РС-1245 


BASIC 十 マシ ン 語 


PiO12 月 号 を 見 た 友人 に ,「Number 
Attack を 1245 で 作っ て よ 」 と むり に 頼ま 
れ ま し た . し か し , その ころ は 受験 の た め 
時 間 が な か っ た の で , オリ ジ ナ ル の ゲー ム 
作っ で も まい まし た 。 


画 プ ログ ラム ・ イ インフォメーション 
BASIC 


マシ ン 語 C3B8 ~C5CF 


な か な か 良く で き て いま す が , や は 
り 音 が な い の が 気 に な り ま すね . 


(Ta) 


入力 方 法 


マシ ン 語 は モニ タ か POKE で 入力 し て 
а ОКО ОТУ. 
СЅАМЕМ"СО”; &СЗВ8, 


& C5 CF 


i 


BASICS 入力 し, 
а to yup: S 


遊び 万 


一 緒 に セー し て お 


初め に CLEAR を や っ て お きま し ょ う . 


| DEF [AI で スタ ー ト し ます . 

1 面目 は 右 の 数 字 が あな た で す . 左 か ら 
( る 数 字 に | ENTER | と | BRK | 以外 の キー 
で 合わ せ , [ENTER | か [BRK | で 消し ます 
(| BRK | は 加速 する の で 使わ な い 方 が よい 
у 5 Ж, р я 


7T8634BF1ñFF1EB1B8:ñC 
CICO C5CRD58873C4C3108:7D 
С3С8 (5(8575478С4417Ғ:14 
し 3D9 С58910С5С85705С4:й0В 
С308 F1F1827C03F8F1EE:3ñ 
C3EB 02045424272Ғй051й0:С7 
СЗЕЗ CS9978C4992F2278i ER 
し 3F9 C49B18F33B576700:60 
СЗҒВ 595210С502051057:2Е 
C400 11CF57432803020B:B2 
52377F7F417F7F90:C6 


6601SR が ほし いな 一 . 


カワ シタ ー 


COUNTER W 


両側 か らく る パタ ー ン の メイ ン 
乱数 用 カウ ント 

数 字 デ ー タ 

キー 入力 ルー チン 

スク ロー ル (¬<) 

スク ロー ル (—) 

乱数 

左側 消去 & 表 示 

右側 消去 & 表 示 

左 か らく る パタ ー ン の メイ ン 
ボー ナス ・ ス テー ジ 用 
REM ( ? ) 

スピ ー ド 


乱数 用 カウ ンタ 


2 面目 は 真ん中 に いる の が あな だ た です. 
両側 か らく る 数 字 を 1 面 と 同じ 要領 で 消し 
673509. 

そし て 3 面 。 491 5, 後 は この マタ ー ン の 
繰り 返し で す . また 得点 は , 位置 や 形 に 関 
係 な 〈 一 定 で , 上 位 6 人 まで 名 前 が 書け , 
ゲー ム ・ オ ー バ ー 後 また は | DEF |[Z] с ж 
示し , DEF マ ー ク を 付け て 終わ り ま す . 

な お , だ ま に ボ ー ナ ス が 出 ま す . 数 字 が 
回 転 し て いる の で 何 か キ ー を 押し て 止め て 
くだ さい . その 数 が 点数 に 加算 きれ ます . 
“600” は 千 点 の こと ょ と です. 


プロ グラ ム の 説明 


乱数 は , ある メモ リ を 常時 カウ ン 


F ë + 


D837822303F3F1F1:89 
С470 F1EE92213425272FiB1 
L478 0302002700121129:73 
С480 В8181128В819117В:66 
C488 5711385242401160: 34 
C490 В818116ЕВ8191160:9Е 
C498 140057025С05Ғ8Ғ1:535 
С48й Ғ1Ғ1ЕЕЙ258542527:8С 
С4АЗ 2Ғ050200275710С5:67 
(480 CFST34929974952Fi 04 
0511СЕ525710Ғ800: 73 


> だ れ か 助け て く で 一 / 僕 の デー タ ・ レ ュ コ ュー タダ "が 壊れ て な ん と 1 週間 も ゲー ム を や っ て な い / ノ 中毒 の 僕 に は 耐え られ な いよ . 
ちな み に 僕 の マイ コン は P6 で す . 


(無理 や り ). 


sm リス ト COUNTER マシ ン 語 リ スト ag 


027Ғ7Ғйй7979494Ғ:88 
0418 4F4149497FTF1F1FiSE 
C420 187С7С4Ғ4Ғ497979:Е1 
С428 TFTF497979979791:48 
C430 TFTFTFTF497FTF4Fi 92 
L438 4Ғ49ТҒТҒТСЗ6ТЕЗ6:ҒС 
C440 ТСҒҒ4410С5С95804:9В 
C448 04005 767003581А67: 2В 
C450 0758165767802981:49 
L453 050111С857740567:Е8 
4128050208520157:12 


82081F78C46E11CC:E3S 


«лез оС KER CUT 
リタ ー ン ) 


呼び 出し た と き の そ の 数 を 使っ て いま す . 
この よう な ゲー ム だ か ら こ を そ を , 使い も の に 
な り ま す . 

まだ た, な ぜ |BRK | キー を 押す と 加速 す 
る か と いう と , キー 反応 を 良く する だ め に 
キー 入 カ ルー チン を 回 転 き せ て WAIT さき 
せ て いる の で す が , [ВЕК | キー は 他 の キ 
ー と 違い , ポー ト な ど を 調べ な く て も 判断 
で きる だ め に 速く 帰っ て きま す . それ が 重 
な っ て 速く な っ て いる の で す . 


рос 


この ゲー ム は 3 日 ほど で 作ら され まし だ 
を その だ め あ まり よい プロ グラ 
ム で は な いで し ょ う 。 まだ この ゲー ム は 授 
業 中 スペ シャ ル で す . その だ め に 音 は 付け 
ませ ん で し ただ (言い訳). 

近 成 人 さん に 負け な いよ うに 頑張 り た い 
と 思い ます . 

3 参考 文献 

1) “ポケ コン ・ マ シン 語 入 門 "。 工学 社 
2) "РС-1250/51 = і м #5 М”, 
POPCOM7 一 9 月 号 


С8575478С4417ҒС5:14 
5205С4Ғ1Ғ1020065:00 5910С5С85703С4Ғ1:0Т7 
Е8Ғ1Ғ50204542426:62 F1922393FSF1F592:F9 
2ҒЙ55710Ғ8600200:ЕЙ 045424262Ғ0310С5:89 
0ЙЙЕ1Ғ112800151Ғ:98 0078С4002Ғ2278С4:С9 
78С48Е11С05205С4:Е1 5H19F82257679938: 8A 
F1F1927293F8F1EE: 39 8718C5D2D5183711:DB 
02045424272Ғ0537:ЕЕ 28576700290С79С5:59 
78684BF1RFF1E919: AC 1610С5СА8578811СС:71 
С5С8й02085211СЕ57:23 55(7581711С055С7:65 
78С4С678С4Е810С5:ҒВ CC53611CB574352: 3F 

PS; P<: 
алта) 


9i0 


リス ト 1 COUNTER マシ ン 語 リス ト 
C5B8 FF442B1337EEEEEE: 82 


CS88 5610С5СА578811СС:91 
L598 55СТ77ССЗЕТ?11СВ57:75 
С598 45525809005В78С4:40 


C570 380778С40В79С556:СА 
C578 5В5711СВ57455239:93 
C584 08002278С4В079С5:61 


С5Ай BD79C3E75B37F1E9: 43 
CSAS 10С50078С40078С4:40 
CSB9 C39289344E592F93: 49 


CSC9 EE1984EE124SEEEE: АС 
. じ 5CG 9999999999999999: 80 


1:5%- RIGHT < "#000 °+ 
STR$ Уз50: PRINT ” . 
5:9: STR$ М:7-7:5%: 
RETURN 

19:°А” WAIT 99: RANDOM 
: PRINT © << COUNTER 
! >>":M=BsV=B,T=26sR 
=3 

.20:5050В 1:М=М+1,Т=Т-(‹Т 


М/52 THEN 68 


1 1 : ご =9 
25:0=6С3В88: 


L L жарса; = адыш агарса р; 

| 47” 3 7 L ® 
ОО 

| ж А v 


ау Дт . Чу 


88 や 98 に し か で き な か っ だ ラベ で ベル ・ ジ マ ャ 


a NEL A ASS a ЧИР に 


PC-600] で ラベ ル ・ シ ジャ 


>0)*2: IF Ы/3= 


22:РОКЕ %С5С8.Т»0»0,50» 
As Bd, RND 11ж545» RND 


IF М/2- ІМТ 
(CMZ2)=9 (ЕТ 0=&С500: 
POKE &CSC8 T+15 

38:CALL 0: CALL 4581: 


リリ スト COUNTER BASIC!) д F E 


INT ‹ IF,Z=8 LET Y=¥+175: 
GOTO 20 

55:У-У%15й- PEEK %С5СВж 
5:8=8-1: PRINT ” LE 
FT:00"; STR$ R: IF R 
>9 THEN 22 

44:PAUSE "САМЕ ОЧЕР”: 
505ЦВ 1:Р=6: FOR Y=5 
ТӨ 1 STEP -15 EAL 


1 


X<Y LET ñ<(Y+1)=ñ(Y) 
ñ$(CY+7)=ñ$(Y+6)sP=P- 


45:NEXT Y: IF F<V PñUSE 
“NO.” SP:ACP)=Y: 


INPUT “НАМЕ? "5 А$СР+ 
6) 
50:72” FOR Y=1 TO 6: 
PAUSE STR$ Y+":"+ 


STR$ ñ<Y) Í ñ$<(Y+6): 
NEXT Y: POKE ЕҒ85С»1 
: END 


60:РАЦ5Е ” 99 BONUS”: 


CALL &C5A6: ВЕЕР 0: 


BEEP B: ВЕЕР ñ: CALL 
4581: り =V+( PEEK &CSC 
Е-12жЕ2: GDSUB 1: 
GOTO 22 


ADA DADA ая 


таза азы азаннан нана 


Б нан аи а 


ル * ン ヤン ノ < 


2 J8/-— 
@PC-6001 turbo 52 را‎ 2 


АҒУ ス 


な お , 


は リス ト 2 を 参考 に し て くだ さい. 


ンプ "を パピ コン で / と いう こと で 作り ま |», リス ト 2 は 2 ペー ジ を 使う の で , How | ラベ ル 名 に 子 約 語 を 使っ て も 構い ませ ん . 
ЕУ? Many Pages? ? に は 2 一 4 を 入力 し て くだ | 同じ ラ ベル が ある と き は 行 番号 が 小さ い ほ 
使い 方 зо, あと は 。 リス ト 1,。 2 を それ ぞ れ 入 | うに ジャ ンプ し ます .。 まだ , ラベ ル が 見 つ 


リス ト 1 の 1000 行 か ら を 自分 の ブロ グラ 


ЖЕСЕ СТ АУ; 


СЕЗЕ ? UL Errori 2 b š +. 


ム に 組み 込む か , リス ト 1 を 前 も っ て 実行 リス ト 1, 2 を それ ぞ れ ロー ド し て RUN | 最後 に 

し て いれ ば ラベ ル が 使え ます . また 。 自分 に で みて (を だ な < この ブロ グラ ム の 感想 を PiOPiO で お FN 
の プロ グラ ム で DF00HーDFFBH を 使う 人 | ラベ ル ・ ジ ャ ンプ の 文法 ら せ ぜ せく だ さい 。 

は 。 リス ト 1 の 170 を モッ ト す る アド レス に | GOTO,GOSUB,RESTORE,ON 一 GOTO, | 参考 文献 


変更 し て くだ さい . その と き は 140 行 も 自分 
の プロ グラ ム に 合わ せ ぜ せ て 変更 し て 《⑥ だ さい 
な お , この まま で は PC-6001 以 外 で は 動か 


な いか も し れ な い の で ご 注意 を . 
デモ プロ プラム を 動 ひ そう 


gm リス ト 1 ラベ ル ・ 


129 
138 
140 
158 


CONSOLE 0,16,0,0:С15. 
IF PEEK(&HFDSC)>2 THEN 150 
CLEAR 59 ,%HDF00 


LOCATE 7,7:РКІМТ "rik tsk 


. 1030 
1040 


READ A$ 


IF АФ="//" THEN GOUSUB 1098: 


100 РЕМ __ GRAPHIC DEMO 2... УА 
118 DIM 5(652,С<65) 

120 CLS 

139 LUCATE 7,7 
ちく た "で es“ 

144 50508 ЖІМІ 
150 SCREEN 3,2,2:COLOR 
144 RESTORE ҰбАата! 

178 GOSUB #MAIN 

120 RESTORE храта2 

198 GOSUB ҰМАІЫ 

200 EXEC %Н1й058 

210 XL IF INKEY$="" THEN XL 
220 END 

238 XMAIN 

240 READ X,Y, LC,P1,P2 

258 COLOR- LC 

28й RESTORE %GRAPHICDATA 
278 XLOOP 

280 BREAD MODE 

298 IF MODE=9 THEN RETURN 
300 ON MODE GOSUB XCIRCLE, 
BOXFULL ,XPAINT 

310 БОТО Ж(ООР 

320 REM 


:PRINT "20% FZ” $F 


MELS 


*вОх,% 


ON 一 GOSUB,IF 一 THEN に ラベ ル が 使え 
2%. 

ラベ ル の 途中 に スペ ー ス まだ は コロ ン (:) 
が ある と , そこ か ら は 命令 に な り ま す (f 
サス も 2 07210: 3302 4ОТЖЕК ДУ 


READ АФ: B=YAL ( "tH" +АФ) «АО 
РОКЕ І,В-ІМТ<(Б/2542 X256 
POKE 1+1,ІМТ‹В/256) 
І-І%1:КЕТОЕМ 


й,.есі,ер,еЗ2,45,е5,1а,Бе,2й 
1278 бата 24,23,13,08,1а,Ғе,За,2 


XCIRCLE READ A,B,C 
A=A+tX : B=B+Y 
РБЕТ<С<02 ҰСҰгғАа,5<й) ХС+В) 
FOR 1=1 TO 44 
(ІМЕ-<С<1І>ХҰСҰ2гғА,5< 12 ЖС+В) 
МЕХТ 
RETURN 
# BOX GOSUB ※SET 
LINE〈A。B) - て C。D) ,Е,В 
RETURN 
ХБОХҒІЛІ BUSLUB XSET 
LINECA,BD -(C,D) ,Е,ВЕ 

A RETURN 
ЖРАІМТ 


READ А,В 
атазх:В-Вжү 

PAINT (A,B) ,P1,P2 

RETURN 

xSET 

READ а,В,С,б,Е 

A=A+X : B=B+Y : C=C+X : D=D+Y 


IF E=2 THEN E=LC 
RETURN 

КЕМ ニオ ニョ ャ ライズ ド 

ЖІМІ : 

FOR I=0 ТО 6.5 STEP . 


ジャ ンプ BASIC U z F #mm 


“РС Techknow 6000”, アス キー 
注 : PC-6601 で は リス ト 1 を 実行 後 , BASIC が 


お か し く な り ま す . 他 の プロ グラ ム を 実行 させ 
た いと き は 必ず 電源 を OFF に し て か ら に し て く 
回 


だ さい . 


10 РЕМ __ LABEL JUMP a 8,87,Ғе,2й0,28,032,57,2й0,й6с 

20 КЕМ ___ Ву РС-40081 turbo --/ се? رو ی ر ر‎ ғал ыы 
34 РЕМ * * s * * 3 s * 

100 REM Ұ%ҰЖҰ SET ※※※※ 1298 DATA е1,41,с5,41,41,27е,Б57,с 
118 SCREEN 1,1,1:COLOR 1 8,Ғе,За,с8,23,18,47,ег1,41 


1388 DATA еЗ,ер,18,ЫЬ2,ҒҰг,сс,с2,8 
%,87,0е,й0З3,са4,Бй,3З34,с1,е5 
1810 DATA е5,2а,52,Ға,еЗ,З2-е,8с,4 
5,838,с5,18,65,Ғе,сс,с2,а0 


ЗАБ" РЕМ Хда+ах 1320 DATA 07,с4,//,41,с3,а3,07,с 
168 LOCATE 9,9:РВІМТ "し は “ ら < お まち < DATA 21,//,27,22,А,ҒҒ,Зе,с а,19,35,Ғе,сс,с2,19,35,са 

E Sa | S;32;35S;£1;,21;Z7 51911,71 1830 DATA //,41,с3,23,85,с4,аБ,4 
179 ар-%ноғай 1220 DATA Ға,й1,0а,00,ег,Ь0,21,/ ғ,сві,е4,04,7е,47,Ғе,8с,28 

188 GOSUB 1099 Z CS 22 03. #4, с9, е. ас, 81 1340 САТА 0З3,с4,88,25,45,04,78,с 
199 CLS 1239 DATA 07,//,е2,//,Ь?7,//,94,4 а.0Ғ,07,а7,с8,Ғе,2с,20,Ға | 

200 LOCATE 3。Z:PRINT "LABEL JUMP 7.Ғе,4с,с0,78,41,41,7е, ғе 1358 рата 18,43,са,8%,08Б,7е,Ғе,8 
ready." ; 1248 DATA Saca 1960257 en ви 8,28,03,с%,с7,2Б,еҰ,са,е2 

218 END 5,Ғе,20,23,20,41,25,с3,09 1360 DATA й7,47,4а,а0,й?7,Ғе,сс,2 
1994 REM ҰСЕТҰ 1250 DATA 07 ,е5,еа,5ь,5+, ға, &2, < 8,b3,c3,Be,87 

1910 Аб-ар-(сар<02%55536 b,5e,23,56,7a,b7,ca,b7,87 

1820 FOR 1=aD TO AD+&HFB 1260 DATA 23,4е,23,44,47,Ғе,сс,2 


リスト の サン プル ・ プロ グラ ム BASIC U х F E 


5С1%102-С05451):С<1%102-бІМСІ 


&9й 
&1@ 
520 
15. 


xGRAPHICDATA 
648 DATA 1,45,40,35,1,45,4й,16 
558 DATA 2,5,48,28,105,2,3,8,48, 
28,99,1,4,19,194 

る る 9 DATA 1,192,33, 19,4, 102,35 
678 DATA 1,192,450, 10,2,90,40,112 
,105,2,3,92,50,110,70,1 


484 рата 4, 105, 104 


る 9 DATA 1, 
.4,166,104 
708 DATA 9 
710 хгатаі 
720 DATA 20,48,3,3,3 
720 «рата? 

748 DATA 30,30,2,4 


154,65,41,1,144,44,20 


‚2 


159 


Q 
PC-1350 


BASIC 


JS 


С 
LAN“ > Ф) 
再 早 川 裕一 


今 , 我 が 地球 は 減 び る 寸前 に な っ て し ま 
っ つた. な ぜ な ら , エル ザ (ERUZAR) が + 
物 を 殺し 始め た か ら で あ る . 

そこ で 平和 を 願う フォ ー ク スタ ー は , あ 
な た に フォ リオ ニオ ン と いう 物 を くれ た . 
それ は 一 度 に た くさ ん の 武器 が 使え る オニ 
オン で あっ た . あな た は , それ だ け で 地球 
の 平和 を 取り 戻す の だ . 


画 プ ログ ラム ・ イ ン フ ォ メ ーション 


к S 


ロー ルプ レイ ング に し て は , た だ の 
戦闘 力 に 頼っ て いる よう で す . も う 
少し 工夫 が ほし いで すね . (Ku) 


ォ ー ル BASIC な の で , 楽に 入力 し て さく 
だ さい . ただし, POKE 文 の 番地 は 間 違 
えな いで くだ さい 


RUN す る と タイ トル が 表示 る され, ЖС 
最初 か が ら ゲ ー ム を 行なう か どう か 聞い て く 
る の で , 最初 か ら な ら [YI|, 前 回 の 続き か 
ら な ら |NI で 答え て くだ さき さい. た だ し [|N| t 
答え た 場合 で も , 前 の ゲー ム で 自分 の H.P 
(耐久 力 ) が な く な っ た と き は で きま せん . 

さて | Y| と 答え た 場合 は , 次 に 名 前 を 聞 
いて くる の で 7 文字 以下 で 入力 し て くだ きる 


ҮТ ара ңуңҢ)ұүұҢҢӛ 7” АУ” 
280:ІҒ ІМКЕҮ% -”5” GOTO 


18:CLS : WAIT 4: 
CURSOR 24: PRINT 72» 
-729-°:Х=0:Ү=0 

20:11МЕ (й0%72-(70»15)»Х 
«ВЕ: FOR U=1 TO 399: 
NEXT U: ВЕЕР 5 

35:CLS : INPUT “99994 7 
SGF RI СҮМ): 9:28: 
IF 2$=°ү” CLEAR : 
GOTO 199 

45:IF 2$%=°М" (15: 
GOTO 200 

50:С15 : GOTO 35 

1B8:H=108:E=100:P=80:6G=5 


Ad: CLS : 
E: "5 ñ$ 


.D="5065 7. 
Е 


230 
226:00Т70 225 


INPUT “МАМ 


299i IF H<=B GOTO 35 

2220:С15 : CURSOR 0,0 

222:PRINT "МҮ. МАМЕ: "ñ$: 
CURSOR 0,1: 
.P="sH: CURSOR 0,2: 
PRINT "Р.И=°;Р: =Y-1: GOTO 1888 
CURSOR 0,3: 


PRINT °H 


PRINT "5 
LANE -Х%1: GOTO 1000 


225:IF INKEY$ -”й” GOTO -Х-1: СОТО 1800 


с, 入力 する と 自分 の デー タ が 表示 る れ ま 


er 


表示 の 方 は H.P が 耐久 力 , P.W が 攻撃 力 , 
GD が 財力 で , L.JM は H.P の 最高 値 を 示し 
ます . な お ぉ , LM は 町 で 特殊 な 手術 を 行 な 
うと こと た で ヒア る こよ が で あま すず 

を し て |O| キ ー を 押す と 移動 モー ド に な 
り ま す (|@||4||2|[8| で 東西 南北 で す ). 70, 
0” な どの 表示 は 町 か ら の 距離 を 示し ます 
(XE, YEE). 弱い うち は 町 か ら 離 れ 
な い の が ユ コツ で す . 

それから, "0, 0" の と き に 町 へ 入る に 
は |5| キ ー を 押し て くだ さい . 町 の 中 に は 
いろ いろ な 物 が あり ます が , 買い だ い 物 が 
あれ ば その 商品 の 番号 を 押し て くだ きい. 
を し て , も う 買 わな いと き は |[O| キ ー を 押 
せ ば 町 か ら 出 られ ます . 

町 の 外 へ 出る と , あな た を 狙う 悪党 が 出 
現す る の で , 戦っ た り , 話し た り , 逃げ た 
り し て 〈 く だるい 。 ヒン ト の だ め に 言っ て 
きま す が , 相手 の パワ ー は 表示 る れ な い の 
で わか り ま せん が , 耐久 力 で 判断 し て くだ 
る い . な お , 強い 相手 の 場合 に は , アタ ッ 
ク す る と 一 撃 で 殺さ れる 場合 が あり ます . 

それ か ら , 敵 の 出現 と 同時 に 相手 の 名 前 , 
мл, 耐久 力 が 表示 され , |O| キ ー を 押す 
と 戦闘 モー ド に な り ま す . また 一 戦 ご と に 


230:С15 : CURSOR 0,1: 
PRINT 9% Ү:90 А 
CURSOR 0,3: PRINT "B 
ole РІазіпэ Game” 

240: W=0: IF INKEY$ ="8" 
LET Y=Y+1: GOTO 1000 

250:IF INKEY$ =”2” LET Y 


300 


240 
268:IF INKEY$ =°6° LET X 


270:IF INKEY$ ="4" LET X 

499: ELS 

275i IF INKEY$ ="9" BEEP 
1: GOTO 228 


ッ マ ワー が 2 ずつ 増え , 武器 を 買っ た と 同時 


285iLINE (12959)-(1499) 
: LINE -(149531.): 
LINE -(120%510: 

LINE -(120,й02: GOTO 


399: IF Хай AND Y=9 CLS : 
PAUSE "IN СІТҮ.°: 
BEEP 1: 

310:60Т0 240 

PRINT *2*+#:19> 

サッ (199) 、2T リ (299) 、 3 オリ 

(500). 4720500)" 


БЕШЕНЕНЕ НОН GSG eccoreenrs rrr 


| 現在 地 (町 か ら ) 


FOR~NEXT 用 
判定 用 
自分 の 耐久 力 
自分 の L. м 
自分 の 攻撃 カ 
自分 の 財力 


自分 の 名 前 
INKEY$ 用 
商品 値 

ラン ダム 
敵 の 攻撃 力 
敵 の 耐久 力 
кой» 

敵 の 名 前 
逃げ よう と する 回 数 
ラン ダム (脱出 用 ) 


に パワ ー が 増え ます . 当然 で す が HL.P が な 
く な る と 死に 27; 


僕 は も t PC-1251 ユ ー ザ ー の た め , グラ 
フィ ッ ク 時 の POKE が 抜け きれ ませ ん . 
まあ いい として, ポケ ュ コン で 数 少な い ロ ー 
ルプ レイ ング ・ ゲ ー ム で す 。 楽し てく やり ま 
し ょ う . それ と , ポケ ュ ン PC- 友 の 会 (会 
RONS AECA ІН??? 


402:РВІМТ "キス *! 5.(199)、 
6.015)": PRINT ILN? 
sJ": 7.(2002” 

405:B$= INKEY$ : IF B$=” 
1" (ЕТ C=199: GOTO 5 
99 

496: IF B$="2" (ЕТ C=200: 


GOTO 500 

408:IF B$="3" LET С=300: 
GOTO 500 

410:IF B$="4" LET C=5808: 
GOTO 500 

412:IF B$="5" LET С-100: 
5070 500 


GOTO 400 


状 八 号線 に な っ て し まひ まひ た だ た, 


ぽん 酢 な アン ケー ト を や っ て し まっ た 影丸 で す ノ 今 か ら 考 える と モノ スゴ デズ ク 疲 れる 作業 を し て いた の に 気付 きま し た , な か げ で 頭 ん 中 が 環 
あん まし や る も ん ぢ ど お ゃ な ひで すね ./ あ ー い う 個 人 企画 は …. 
ィ ス カウ ント ショ ッ プ で 3800 円 の JOY STICK を 恥 も 外 聞 も す て , か な り の 大 声 で 値切っ て て , 10 分 間 の 激闘 の 末 , 2,750 円 で 買い まし た . 

その間 “アカ の 他人 " し て た の は 私 と 友人 JJ] で あっ だ た の は ゆー まで も な い ( 友 人 パン ツ は いっ し ょ に 値切っ て いた ). 大 声 で 値 切 る の は や め 


P.S. つい 最近 の こと で す が , K NO *rptz” 


414: IF 
50 
415:IF 


500: IF 
РЕ 
йй 


2010: 


2020: 


413:IF 
GOTO 500 


502:BEEP 3: 
LET б-б-10й0:Р-Р%5 


88-76” LET C=15: 


В$=°7° LET C=200: 
TU 500 
B$="0" CLS : 


GOTO 250 
416:60Т0 405 


C>G ВЕЕР 1: 
INT 7992947: GOTO 4 


IF B$="1” 


529iELS : PAUSE "F249": 


IF F=1 OR Ғ-8 LET 
РР=З?:НН=39:60=18: 
AA$="NOUMIN” 

IF Ғ-2 OR F=9 LET 
РР-42:НН-55:00-12: 


RH$="KIKURI" 

2939: IF F=3 (ЕТ PP=T9iH 
Н-45:00-50: йА$= "КО 
LAYE” 

2040: ІҒ F=4 (ЕТ РР-252: 
HH=296:6D=89:ññ$=”" 
HERMIT” 

2050:IF F=5 LET РР-218: 
HH=121:6D=438:ññ$=”" 
KENSHI” 

2055:IF F=6 LET PP=386: 
НН-688:00-557: AA$= 


H: PRINT “0.0-”%00 


Ø): LINE -(149:510 
: LINE -(120%51): 
LINE -¢120:0): 
LINE (1299)-(1495 
18) ҳ› ВЕ 


5010:ІҒ F=1 ОР F=8 
CALL 4576: POKE &7 
825»72,45»51»,45»76 

5й20:ІҒ Ғ-2 OR Ғ-9 
CALL 4576: POKE &7 
825,127,435,72,4›,15 

5020: IF F=3 CALL 4576: 
РОКЕ &783258855 8 
3:55:38 

5048:IF F=4 CALL 4576: 
POKE &7825,111,55, 
114555»111 


LINE (120»02-(149» 


RANDOM :EE= ЕМІ 8 
6010: IF W=EE ВЕЕР 1: 
CLS : CURSOR 031: 
PAUSE "SEIKO": 
GOTO 230 
56915:IF Н<-й GOTO 11999 


“Де 


フォ ー ク スタ ー BASIC リ スト 


6929:CLS : CURSOR 0,1: 
ВЕЕР 1: PAUSE "sn 
= イツ sH=H- RND 10: 
CURSOR 0:5: PAUSE 
“Мү.Н.Р-“3Н: GOTO 
5000 

7009: у= RND 5: IF ¥=1 

| CLS : CURSOR 0,1: 
PAUSE "793 п. "FAA$ 
: GOTO 250 

7005:IF Н<=й GOTO 110йй 

7010:ВЕЕР 1: (15: 


(ӨР-РР2/29: ВЕЕР 1 


RND 9: ВЕЕР 1: 
CURSOR й, 1: PRINT 
“рәЗ-”: CURSOR 0,3 
: PRINT Ай$5” Н.Р- 
"3HHI FOR U=1 TO 2 
00: NEXT U 


19932:IF 0-2 (ЕТ Н-Н- 
RND 9: ВЕЕР 2: 
CURSOR 0%1: PRINT 
“рЭ/9-”: CURSOR 0, 
5: PRINT "MY。H。P=" 
SH: FOR U=1 ТО 200 
: NEXT U 

19935: IF НН<=0 ВЕЕР 3: 
CLS : PRINT "YOU G 
000%: PRINT "G. р=+ 
"360: PRINT "P.M=+ 
2":6=0+60:Р=Р+2: 


504:ІҒ B$="2" LET б-б-2й “CONTOR” 5050:ІҒ Ғ-5 CALL 4576: CURSOR 4,1: PAUSE GOTO 150990 
B:P=P+7? 2057:IF F=7 LET PP=987: POKE &7825,15›104, "ウジ ナイ" Н=Н- RND 1993?:IF H<=9 ВЕЕР 4: 
596: IF B$="3" (ЕТ б-б-2й НН=1257:560=5548: АА 51,107,8 10: CURSOR 0,3: GOTO 11000 
giP=P+12 $="ERUZRR* 5955:IF F=6 CALL 4576: PAUSE "MY.H.P="jH 19240: GOTO 5000 
598:IF B$="4" LET 5=5-59 2060:65070 4000 POKE %7825,8,8,127 7011:6070 10057 11000: СІ БАР : CLS : 
B:P=P+30 4000: РР=РР+ RND 25:HH=H ,8»8»Й»79,4й0,28,45 10000:С15 : IF P<PP LET PRINT "PASA. 297: 
51Й:1Е B$="5" LET б-б-1й H+ RND 25:GD=GD+ 475 H=H-((PP-P)Z2): END 
9iH=E RND 29 5058:ІҒ F=7 CALL 4576: ВЕЕР 2: CURSOR 0,1 || 15999:FOR U=1 TD 200: 
512:1Ғ В%-”7” LET б-б-20 4020:С15 : CURSOR 9,9: POKE 878253%17»13» : PRINT ‘Pov: NEXT U 
B:E=E+30 PRINT “МАМЕ: 72883 25:8,72,45,31,45›7 CURSOR 0,5: PRINT 15995:IF Ғ-7 GOTO 20000 
514:IF B$="6" LET б-б-15 : BEEP 3: CURSOR @ 2 2%8»28,62»28»8 "MY Qh P” sn 15010:GOTO 230 
: GOTO 1500 ‚2: PRINT "H.P=*;H || 5059:IF F=7 OR F=6 19919:IF P>PP LET HH=HH- || 29g9g:BEEP 5: CLS : 


PRINT ññ$;"3 9437 


GOTO 230 4939:TIF INKEY$ ="9" 31),Х,ВЕ : CURSOR 091: HF ОТАСЫН 

1000: РАМО0М :F= RND 2: GOTO 5009 5068:IF INKEY$ -717 PRINT “79-7: CURSOR 0,2 

BEEP 1 40409:5070 4030 GOTO 10000 CURSOR 9,5: PRINT 20010:PRINT 88:77) オメ チト 
1929:IF F=1 GOTO 2000 5000:CLS : BEEP 1: 5979: IF INKEY$ =”2° AASI” Н.Р-”3НН 9%: LINE (9,9)-(14 
1939:GOTD 239 / CURSOR 99: PRINT GOTO 6000 10020:ҒОР U=1 TO 206: 9,31), Xr BF: CLEAR 
1599:H=H+15: IF H>E "1.7957 2.2754": 5080:ІҒ ІМКЕҮ$ 5735” NEXT U: IF Р-РР<8 : ВЕЕР 8: CLS : 

(ЕТ Н-Е CURSOR 0,1: PRINT GOTO 7000 (ЕТ PP=PP+29 END 
1502:00Т70 230 МЫ ығы 5090:65070 5060 10050:С15 :0- RND 5: IF 
2999: RaNDDM :F= RND 9 599?:LINE (12959)-(149 6000: W=W+1: IF И=1 0-5 (ЕТ HH=HH- 


= |10 (отт) MUSIC by T- GRAPHICS 


М 22 |‏ 
ي لے سے ”2 ИІ‏ 


Е ОЛУБ Ко Жету. 
f UI} FAN BGM に どう で し ょ う 
名 目 7 ア レッ シ U< Të O +. 


/ғ/90-209 


。PSG も うん Z3 機 粒 4SOK/ 
С 11А BT. 

* ジ ュー ランゲ ゲー ムク き の 、 
29-478 7 (12 ), 


(ус т/-4% 


ет bu AVGUU 


た っ た 2ND HTT. アニ メー ショ ン ゲ - ム 等 に 使え を うな 感じ で 
$. (BGM て し < ) X ロ ギャ ー だ け で も UHR БА 90, (80), 
コー ド と ペー ス を 付け る て A あい し く な りき す s 。 $ な み に 、 こ 

の 曲 は YAMAHA N MK-100 て イ f り まし た 。( ミ ニ RRT) 


ょ же; こっ ち は ハ ズ カ し 一 ん だ か ら っ っ っ ググ (文章 構成 力 に 欠け る グリ ー ン ベレ ー 影 丸 ) 


161 


Q 
РС-1261 


BASIC 


PC-1261 を お 持ち の 方 々 に , 地下 迷宮 を 
お 贈り し ます . 

3 層 か ら 成 る 地下 迷宮 の どこ か に 隠さ れ 
て いる 「 青 い エ メラ ルド 」 を 地上 に 持ち 帰 
っ て くだ さい . 迷宮 は 下 に 行く ほど と 広く, 


モン スタ ー は 強く , 宝 は 高く な っ て いま す . 


お 気 を 付け て …. 
プロ グラ ム ・ イ ン フ ォ メ ーション 


| わり と 良く で き て いま すね . Tb, 
| や は り ス ピー ド の 点 で 工夫 が 必要 か 


入力 の 前 に 


前 作 の KEY HOUSE2 同 様 小文字 を 使用 
し て いる の で , POKE& 203C, O を 実行 し 
で て だ さい カナ モー ドイ 小文字 が 打てる 
よう に な り ま す . 心配 性 の 方 は , 


EMERALD: 


ха АУАЛЫ, Чие 


Ж ис. 


地上 . 呪い は 解け , 体力 も 回 復 す る . 手持 ちの 宝 は ポイ ント に 加え られ 武器 の 効果 も 消え る 。 
部 屋 . モ ンス ター が 出れ ば 戦う か 逃げ る か 選択 . モン スタ ー が 出 な いか 戦い に 勝て ば 宝 を 獲得 。 
一 度 通過 する と 空 部 屋 に な る . 


広間 . 何 回 通過 し て も その まま . モン スタ ー は 出る が 勝っ て も 経験 は 増え ず 宝 も な い . モン ス 
ター が 出 な いと き は 一 階 真 下 の ブ ロッ ク へ 落下 、 

階段 . 

空 部 屋 . 手持 ちの 宝 に 応じ て 呪い が 起こ る 


blue emerald フラ グ 
コマ ンド 

場所 Code 
移動 で きる 方 向 
逃亡 する 方 向 


) 汎用 
汎用 


青い エメ ラル ド , ゲー ム の 
ЕНЕ, これ を 持っ て い 
る と 呪い が か か ら な い . 
サー ベル . 攻撃 力 ア ッ プ . 
1 階 に ある 

ライ フル . 攻撃 カ ア ッ プ 。. 


*=”POKE&203D,1 


いざ と いう と き に も | DEF |[=] 


表 1 モン スタ ー に つい て 


巨大 な どぶ ね ずみ 
E О 


巨大 な さそ り 
狼 
どろ どろ し た 化物 


死 肉 を 喰う 披 
スフィンクス 


人 身 牛頭 の 怪物 
生き 返っ た 死体 
骸骨 

炎 の 化身 の 竜 

と か げ 男 

= 
暗黒 の モア イ ( ? ) 


Oo i 表紙 が 明る く な っ たせ いか", 
ょ 売っ て くれ と うる さい . 
С Жы. 70275 Һ1ё®% 51 と 相談 し て きた の で 


2 階 に ある 

ж. 防御 カ ア ッ プ . 
3 階 に ある 
ブランデー. 体力 回 復 . 
3 階 に ある 
トパーズ 

ルビ ー 
サフ ァ イ ア 

エメ ラル ド 

ダイ アモ ンド 
金塊 

王冠 


で SMALL シ ン ボ ル が 消 を える よう に し て 
と ks で し まう 


る る ふる る る る る る る る る も る る る る る 
入力 の 隊 に 


DATA 文 に 注意 し て くだ さき さい. 特に 130 
ー210 行 の 変態 的 な 文字 列 は MAP な の で , 
間違っ て 入力 し て 路頭 に 迷っ だ た だ り し な いよ 


ЖОЛ 


場所 名 
宝物 DATA 
モン スタ ー DATA 


汎用 


移動 コス ト 
Escape フラ グ 
瑞 種 別 Code 

敵 攻 撃 力 


座標 


最初 か の ら や る と き は | DEF |А) 途中 か 
6 再開 する と き は | DEF | |(SPACE) で 
始め て くだ さい . サブ ルー チン が 先頭 に あ 
る だ た め RUN は 使え ませ ん . Жаз, 宝物 や 
モン スタ ー に つい て は 別表 を 参考 に し て < 
ғас, コマ ンド は [Ns [gwlul[p] て , 
それ ぞ れ 北 南東 西 上 下 に 移動 し ます が , も 
し その 方 向 へ 進め な か っ だ りす る と, 体力 
を 消耗 し ます . 当然 , 体力 が な く な れ ば ゲ 


自分 の 友達 の FM-New7user と 又 1user は 1 月 号 か 6 買い 出す し , P8mkII の user 
まる に 「 マ イコ ン ・ ゲ ー ム の 情報 誌 」 の 役割 を 果たし て いま すね . P.S. X1ck の user の 友達 が 「 マ シン 語 の チェ 
「 を そん な も の , チェッ クサ ム を 調べ れ ば いい じゃ な いか 」 と 言っ て し まっ た . 


(ひら が な だ と 「 て 一 くん 」 と 書く T 告 ) 


9i0 


ー ム ・ エ ンド に な り ま す . 
主 が メッ セー ジ を 表 に 書い て お きま す 


る か る る る る る る る も る る で る る $e る る 
ブロ グフ ラム に つい て 


それ で は 納得 し な い 方 々 の た だ め に 言い ま 
す と , 文字 列 を ASCII ユ ー ド に し て 。 ある 
数 だ けず ら す と KEY HOUSE2 と 同じ 形式 
の ガータ に な : り ます 、 ы а БаР а Е м 
加わ っ だ た ので, 


すでに お 気付 き の 方 も いる で し ょ う が , 
この 作品 は 1I/O'82 年 8 月 号 の ,FX-702P 用 
"TINY DUNGEON” の 移植 拡張 版 で す . 


な っ と もち プロ ラム はまら っ た だ た で 参考 に 
て いま せん し , ルー ル も 多少 違い ます が …. 

大 し だ テク ニッ ク は 使用 し て いな い の で , 
デー タ さ きえ ぇ 理解 で きれ ば ほとん ど 理 解 し 
ちな み に こ の デー タ は, 
暗号 化し よう と し て 作っ だ も の で は あり ま ©; 
TUR: 


た も 同じ で し ょ う . 


せん . 単なる 偶然 で す 


IPI" БОТО "B + STB$ 


zi"BH" IF 5 ТНЕН М” 

30: A=À+E, В=й, С=5й0,.Е=1, 
Ғай.Т-й, B#úB =" 0000" 
: DD TD Эр" 

40s "HU ВЕЕР 5: CLS : 
WAIT 188: PRINT "You 
gare п successi": 
5070 "Е" 

Ji "BE1"B ま (Bi=B1 ま (T)k 
GOTO- YP” 

6A” B2" BiA =p2$iY): 
6070 “Рр” 

Үй: ES ESC = 

B8B:"P”H$= MIDE ¿(B#éeB) 8 
3+1 3) I= YAL MID$ 
(H$ s 2 153 (Í J= ASC 
RIhHT ま (M$ + 13-47 Í Үс 
ASC (ЕҒТ% М: 1)-65: 
RETURN 

ЭЙ: "А" CLS š CURSOR 3: 
WAIT B: PRINT "ЕМЕРА 
LD LABYRINTH” 

1B8:CLEñF : RANDOM : DIM 


В%(й2ж2й,С%(53ж65,1%( | 


152%15,Е%і24)ж11.В1% 
(43%15»82%(52%18»85% 
(92ж3й 

110: С=5й0,1=1,Е=1,Т=1,%= 
1,ү=2,2=0: RESTORE " 
ВТ” 

120:ҒОК [=й TÜ 4: READ В 
18519: NEXT L: FOR L 
=й TÜ 5: READ B2#<L) 
: HERT L: FOR L= TO 
9: READ В5%(1): NEXT 
L 

130: "IT" ПАТА CEILS 

も Bi A Paa TT 

5F23", "622Y4DY19Y16Y 
19” 

14B:DATñ “Ү1623-Ү1>82:62 
27,”24Ү1<828Ү14Ү4Х” 

150: DATA "Ү15Ү19Ү15М2:Ү1 
ҺҮ197»7Ү1212451:715Ү 
1-128”»“Ү4Р2351728Н26 
Ү18Ү40” 

160:ШАТА “Ү15Ү18255Ү71<К2 
942й”»"Ү16259Ү16Ү19Ү 
4ҒҮ19”»"Ү14М2<Ү18М2й 
Y14L28" 

178:DATñ “Ү15Р2:729255Ү1 
2Ү19025Ү19Ү15719%,"Ү 
12Р25Ү1>Ү18Ү16У28Ү12 
Ү16М2:252” 

180: АТА “Ү4ҒҮ18522Ү15253 
:2Ү4СҮ18234Ү18Ү12%,%0 
24Ү19Ү1612<Ү1:М25Ү19 


か ? 


Y15R29K22 

190: АТА "L25Y1:Y14T2=Y1 
5Ү18252Ү12Ү14Ү1:%7Ү 
162:Ү15Ү18И25Ү719Ү16 
SATIVA: ° 

28B8:DAT8 ”254Ү1502<Ү1-25 
sY13K22P25Y1=028”, "lU 
25Y1=Y13Z34Y13T25Y18 
Ү1402<Ү19” 

210:0АТА “Ү12Р22Ү16У2925 
2Ү12Ү15Ү1-М29Ү12937Ү 
14Р2<Ү18Ү14Ү1<71<Т2< 
Ү18Ү14238" 

220:ҒОР L=0 TO 5: READ С 

{ $C NEXT- L 

230: DåTÀ "around" "floor 
"s "room" "hall" "sta 
rs empty” 

240:F0R [=й TH 15: READ 
1%(12: NEXT L 

250: DATA "blue emerald”s 
"crustal": "neck lace" 
* "ngnte"s "garnet " 

25HIHHTH "Platinum rina” 
"silver cross” "ons 
>” "silver Pot", "toP 
02° 

278:ШАТА "rubu" I "snFPhIF 
е", "emerald": "diamon 
d argola іпзо%”% CTO 
wn” 

28B:FDR [=й TD 24: READ 
Е%(19: NEXT L 

29B:DRTñ "1Rat" 7108179)” 
25паке” » “2Уайріге”,” 
25согріот” 

3AA:DATA “4М801%”» "45| іше 
"| "5Tarantella"s"65h 
ost": "TOctopPus” 

31A:DATA “ТМишач”»"8В0згғе 
*. "ВСУс1оР5 "з": бћоці 
"s" SPhinz" 

320: DÁTA “ібовііпт”» "< Ser 
pent "s "Hydra", "Min 
otaur "ss "JZonbie” 

330: АТА “Бӛкеігбот”, "D5 
alamander”s”JLizardm 
ап”, "ZDrazon”:s "aDark 

Moai” 

340 ЕГА THEN “В” 

35ӣ:6050В “РІ”: CES ` 
WAIT B: PRINT 5ТР% Z 
Wa д а Yi а 

56й:В%(йЙ0-””: FOR [=й TH 
5: IF Ј АМ 241 LET 
EB ま C=B ま C+ MIDS ¢" 
Nos SsEsWHslUsDs ”зі ж241, 
23 

570: МЕХТ L: PRINT °С”; 


410: МЕХТ L: 


SIEROT 


最後 に 


1 月 号 の KEY HOUSE2 は いか が で し だ た だ 
近ごろ な く な っ て いる 正統 派 ア ド ベ 
ンチ テ チャー を 目 条 し だ も め の だ っ た の で す が , 
な に ぶん 速度 が 遅い に うえ に 部 屋 数 が 多かっ 
だ も の で , 友人 の 間 で も 投げ 出し た 者 が 多 
クリ ア し だ の は 石田 幸広 と いう 男 だ け 


LEFT ま (B ま ()。 LEN B$ 
05-17970” 

580:СОР5ОВ 19: PRINT "<" 
s RIGHT$ ("BB"+ 5ТР% 
oS T=" STR を 
В” 5=°; SIRS- С 

590: "I "UU=d: CURSOR 36: 
INPUT "Command: "+ Н$ 

400: "CO" RESTORE ”СМ?”ІМ- 
-1: РОВ L=g TH 5: 
READ N$: IF H$=N$ 
LET M=L;L=5 

IF М<й 
CURSOR 44: PRINT ” 

YR Ер 

428:IF J AND 24M THEN "M 
y" 

420: BEEP 1: CLS : WAIT 1 
BB: PRINT "There із 
closed.” 

44B:C=C-5: IF C4 LET C= 
B 

45B:CURSOP 26: PRINT "Yo 
ur stapini =з” [F 
C=0 THEN "DI" 

458:G0T0 " `“ 

470: "CM" DATA "N (| 95", "Е 
Me ШЕ 1 ly 

434: "MV K=M+1-(M225> INT 
(М/20эж9: GUTO *Ü*+ 
SIRS М 

490: “ГЙ”ҮсҮ-1: GOTO "MO" 

5BB:"C1"UY=Y+1: GOTO “МП” 

910:"C2"x=4+1: GOTO “MO” 

520: "C3"x%=x-1: GOTO "MD ° 

55й0:"Г4"2-2-1.Т-Т-1: 
GOTO: “MO” 

54й:"Г5”2-2%1.Т-7%1 

939: "MO" GOSUB "РІ”:С-С- 
Т: IF Шай CLS : WAIT 
194: PRINT "Go to 7: 
HES (5-”; 5ТР% C373 


568: IF С<1 THEN P DIS 

THIF I=2 DR I=3 OR Із5 
CLS : PAUSE “Хз С 
ке? 

580:ІҒ І-й OR ¥=24 OR U= 
El 7 

390: IF 1<5 THEN "АР" 

BAA:IF ЕМІ ¿(B*B+1)<=B* 
RND (3+B)+1 OR b=} 
ЧЕН т 

61B:CURSDR 27: PAUSE "Cu 
rse!”:T=T+ RND (В/10 
+1): 650107“ ” 

620: "HP" IF ¥=25 (ЕТ ¥= 
RND 8%2ж8-8 

53giIF I=2 AND RNI (58/2 


:ІҒ 020 ELS : 


ООЛУ, 


と どうか, 最後 まで びあ きら め ず に や っ て くく 

これ は 今回 の ゲー ム も 同じ で す . 
と ころ で , KEY HOUSE2 の 前 作 は , 

S も ANIDS3 と いみ アデ ギド ペン チャ テー ゲ が co み で 


し だ . こ れ は , ゲ ー ム 終了 時 に それ まで の 行 


動 に つい て の 得点 が 出る , 


72. 


Б 9 ЖГ, 


t Lt, MAP を 作っ て か ら 実 際 に 作り 
始め だ た の が 3 箇月 も 後 ど っ だ うえ ぇ に, 後半 


C bL ©; 
қ Ж са; МЖ 


Бы «лар. лы 


sa EMERALD LABYRINTH BASIC リ スト musasasa 


は KEY HOUSE2 と 並行 し て 開発 され だ た だ 
D, 完成 は し た も の の 不 完全 な も の と な っ 
日 の 月 を 見 る こと が で きま せん 


Ы, アイ デア に 困ら て いる 方 は %25 
いっ た だ 新しい アド ベン チャ ー に 挑戦 し て み 


ӛзі THEN “ОТ” 


:ІҒ I=3 AND RND 8-1 


ВМО 255 THEN "PF" 
М-( ASC LEFT$ (Е%(У) 
912-470ж% ІМТ ((Z+。5) 
71.59 


CLS : WAIT B: PRINT 


MID# (E#$(V) 2 lds て 
МГ ТАБАҒЫН ABBE 
ағей.” 


“СІ” CURSOR 24: FOR 


L=9 TU 20: PRINT "” 
s: NEXT L 


CURSOR 25: PRINT ”5- 


Vi STR$ Су" Е="; 
5ТЕ% Ds: INPUT ":Pow 
er=";M 


:ІҒ Мей THEN "ES" 
:ІЕ M>D THEN "CL' 
:C=C-M: 


ІР С<1 THEN ” 
рі” 


:0= INT (Мж( RND .5+ 


ЕНІ .52/(Ғж1)-ЕжМ) 
HAIT 15 
B: PRINT "You шеге d 
efeated. ”":C=C-0-M- 
INT 41/020: GOTO MID$ 
(“Е5ШІ”91%(С<12%2,29 
CLS : WAIT 158: 
PRINT "You won a vic 
tors. ”1D=D+ú1+(V=23)5 
ж2)ж2ж( 1-2) 
ТЕЗІКЖЕСІНЕН 7:2 
“БТ” IF ЕМІ 9>5-2 ОР 
y=23 THEN “ТР” 

IF 2-5 THEN “ПТ” 

IF 8(17%2) THEN "TE" 
Е-Езг/2зі-2эЙй(17%29- 
1: GOTO GE” 


"ОТУ IF RND 421 OR Q 


=1 THEN “5Н” 


:С=500,1=4,0=1: GOTO 


“БЕ” 
NOR ТЕЕ THEN ХТЖ? 


:F=1sL=3 
:"GE” CURSOR 25: WAIT 


Й: PRINT "You sot a 


ys 


Ы 
:PRINT МІр$ ¿"saber r 


ifle shisldbrandg "5L 
キ ら ー り ょ りす (ヒッ 2 ナ う 9 。 
GOTO “5Р” 

"TR"L= RND 5%2ж5-5: 
IF "=23 (ЕТ 1=0,6=1 
CURSOR 25: WAIT 1980: 
PRINT "You sot * 51$ 
(9%. 2 B=B+L 


:75Р” 50SUE “РІУ:В%(Й 


)= LEFT$ (В%(0)»Хж5% 


1)+°5°+ MID$ BCA}, 
қж5%5,5Й) 

900: 60508 "S"+ 5ТР% 2: 
CETO 

910:"51"В1%( Үз-В%(й): 
RETURN 

920:”"52%р2%СҮ)-В%(Й): 
RETURN 

95й0:”55”р5%(Ү)-В%(0): 
RETURN 

940: “РЕ” CURSOR 24: 
PAUSE "Рії#а11!°:2=2 
%1зТ-Т%1.Г-С-Т: GOTO 
MID$ ("DI 951%(СӘ<>0ж 
2,2) 

950: "ES"H$= MID$ <" МЕМ 
YsK+151) 

960:СЦИР5ОЕ 24: WAIT 188: 
PRINT" Escarpe t 
о FHSS к 

37B8:C=C-T s гі: GOTO "CO" 

988:"DI"B=B: CLS : WAIT 
100: PRINT "You died 


99й0:“Е” CURSOR 26: WAIT 
: PRINT "You зо% 7% 
5ТР% (А%В)!” Points. 
“: END 


163 


Q 


BASIC 
© 


た だ ジャ ン ケ ン を し て 女の子 を 脱が す と 


い ” ; 単純 な ゲー ム で す . 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


アイ デア は 良い の で すか, 
ケ コ ン で は 多少 無理 が ある と 思い ま 


PC-1251/55 


や は り ポ 


1:КЕМ # РОСКСОМ 

tt 
2:REM #8 
2 


YRKYUKEN 


21 
19:CRLL &11E9 
28:M=3:N=4 


120:CALL &11Е0: IF 


1: IF S=9 (ЕТ 5:1 


=5+1: 
148:IF ІМКЕҮ% ="5" 
250 


ТНЕМ 


150: РЕМ 
160:ІЕ №4 THEN ON 5 


り 550,560 
170:ІҒ N=3 THEN ON 5 


9 559 560 
180:ІҒ N=2 THEN ON 5 


9 629639 
199:IF N=1 THEN ON Š 


0,620, 638 
299:IF М-й THEN ON 5 


0,670,680 
210:GOTO 120 
220:CALL &11E9 


24 


20 


5: КЕМ ШІ BY.KOKEBOZU。 


INKEY$ =°8° (ЕТ S=S- 


139:IF INKEY$ -”2” (ЕТ 5 


IF 5-7 (ЕТ 5-6 


b0SUB 510, 520, 558, 54 


GOSUB 570, 538, 598, 68 


50SUB S70, 580, 590,61 


GOSUB 640»650»660:61 


GOSUB 64Q, 654, 660,61 


221:IF %=1 THEN РОКЕ &F8 
@5,112,124,124,124,1 


222:IF X=2 THEN POKE &F8 
05»112»127»127»120,1 


223:IF X=3 THEN РОКЕ &F8 
05»112,127»127»127,1 


27 
22S: IF 2-1 THEN POKE &F8 
0Ғ»112»124»124»12431 
24 
226:IF 2-2 ТНЕН РОКЕ &F8 
0Ғ»112»127»127,12031 
20 
227:1Ғ 2-5 THEN POKE &F8 
0Ғ»112,127»127,127,1 
27 
228:IF ІНКЕҮ% -”” THEN 2 
28 
229:60Т0 120 
250: РЕМ ЛТАНКЕНДІ 
255:ІҒ М=0 THEN WAIT 200 
: PRINT " ANATA NO M 
AKE!”: END 
257:IF N=8 THEN WAIT 200 
: PRINT "ANATA NO KA 
CHI!”: END 
260:Z= RND 3 
265: INPUT ”1=GU;2=PE;3=P 
А "x 
266:WAIT 0 
267:BEEP 1 
270:IF %=1 THEN 308 
THEN 320 
THEN 340 
THEN PRINT ” 
AIKO!” 
391: IF 2-2 THEN PRINT ” 
KACHI !”:N=N-1 
302:1Е 2-5 THEN PRINT * 
МАКЕ!”:М-М-1 
510:60Т0 220 
329: IF 2-1 THEN PRINT ” 
MAKE! ”:М-М-1 
321:IF 2-2 THEN PRINT ” 
AIKO!” 
322: IF 2-5 THEN PRINT ” 


デー タ を 間違え る と 悲惨 な 絵 に な る の で , 
жаска А ЫД 


ゲー ム は RUN で スタ ー ト し ます . r. [в] 
[3] で 上 下 に スク ロー ル す る の で 好き な 
所 を 見 れ ま す . 


グー は [1| チョ キ は [2| パー は [3] で , 
© 


ポケ コン 野球 魏 BASIC リ スト 


KACHI!" :N=N-1 
330:60Т0 220 
540:ІҒ 2-1 THEN PRINT ” 
KACHI ! " :N=N-1 
341:IF 2-2 THEN PRINT ” 
MAKE!” :M=M-1 
342:IF 2-5 THEN PRINT ” 
AIKO!” 
359: GOTO 220 
500: КЕМ DATA 
510:РОКЕ &Е819›,0›0,0, 64, 
48, 120,44, 2,2, 126,6 
6 33 ぅ 32 5 352 
515:РОКЕ %Ғ828»64»64»49, 
10;6»4»68;56»24»16»6 
4050508050: RETURN: 
520:РОКЕ &F81999 120,7 
0:18:4, 24: 32:6465, 6 
464 52,24 
525: POKE &F82867 3232 
16:8»6»1»52»64»0»531 
24595959: RETURN 
550:РОКЕ ЕҒ819,0»0:51»96 
ぅ 39 ぅ 9659595959512。12 
5 1275 1962 
555:РОКЕ &F828999599 
ぅ 59564563595625 1,8, 
0:0: RETURN 
540:РОКЕ ЕҒ819;0»0»0:0»5 
16, 35, 76›112›64› 95, 
127» 71»95»124 
545:РОКЕ &Е828,64, 64,64, 
64,96,96, 48,111, 48,1 
2595959:959: RETURN 
550:РОКЕ ЕҒ8В19,0;0,0»0»й 
0»126»1»0»120»0»0,1 
2700 
555:РОКЕ &F828 9 9 3 124 
»1»120,5»12»115,127, 
9 ぅ 9595959: RETURN 


> 1 月 号 の BOMB BOMB(FM-7 用 ) で スペ シャ ルフ ラッ ク が 1 面 で 出 ま し た . 


ҲО) ер 
ООО mm clr. PS ts 
چ‎ , 2 


戻り ます 。. 
な お, 


ー ト Z 


絵 を 見 て いる と き に |5| を 押す と ジャ ン ケ 
ek もら を ます ИР 
ン が 終わ っ た だら 。 


何 か が キー を 押す と も と に 


自分 は 3 枚 で 女の子 は 4 枚 服 を 着 
て いる の で , 頑張 っ て くだ さき さい. 
別に あり ませ ん . で は , さっ そく 入力 スタ 


あと は 


560:РОКЕ ЕҒ819>0»,0»0,0,й 
5127595951265159126 
ぅ 1959 

565:РОКЕ &F828 1249 9 1 
5126595 了 5 12959 ぅ 12759 
ぅ 9 ぅ 9 り ぅ 959: RETURN 

570:РОКЕ &F81999 ぅ 9645 
52,8,4»4»124:4»2»231 
ぅ 959 

575:РОКЕ &F828 99 1 98 ぅ 
50,2,4;4;4:8»96»0э0; 
0,0: RETURN 

580:РОКЕ &F81999 9 127 
‚@,64,48,8,7,4+16,352 
ぅ 649509 

585:РОКЕ &F828 161223 
ぅ 2856459 ぅ 9 24,96›0›7 
5 12959 ぅ 9: RETURN 

590:РОКЕ &F81999 126 1 
595 15129 ぅ 16516 32 1 
658555255 

595:РОКЕ &Е828› 24, 32,32, 
52,16,9,6› 2,114, 15,8 
3112»15»0»0: RETURN 

600:РОКЕ &F81999 9 3 1 
2396»1»66»124»64»64» 
64,64, 64,64 

605:РОКЕ &F828: 64,64,64, 
64,6464, 96,124: 67,6 


4 ぅ 14。 195959: RETURN 
:610:РОКЕ &F8199595 9 3 1 


2,96›1:66›124,0,0,0› 
9,09 

615:РОКЕ &Е828,0›,0,0,0,0 
70,90, 124,67›64›14› 1 
0,0,0: RETURN 

620: РОКЕ &Е819,0,0,0,0,0 
595 152512759。34566 4 
‚4,4 


625:РОКЕ &Р828›4,4›4,2›2. 


し か も 2 回 で すま よー が だ. 


生 の うち に GAME を 作る つも り だ っ た の に 卒業 し ちゃ っ だ よー だ. 


お どろ いい だ の な ん の っ て , 


66»48»11»125»0:0»0» 
0,0,0: RETURN 

650:РОКЕ &F819999958 
ぅ 9595953125 1225 4 
120 

655:РОКЕ ЕҒ828»8»4»2,1,1 
»й»й»120»7»0,0,0:0»0 
s0: RETURN 

640:РОКЕ &F81999 9645 
а ары отеу Тив 
‚@ 

645:POKE &F828, 9,6。 1 2 2 
5 の 545454585965095 9 9 
9: RETURN 

650:РОКЕ &F819959595127 
ぅ 95645565459595959 1 

、 6596,16 

655:РОКЕ &F8289 9 999 

»Й»й»й»24,96,0,7»120 
. 30:0: RETURN 

660:РОКЕ &F81999 126 1 
‚@,15,122,8,16,16›,8› 
0:й0,5,12 

665:РОКЕ %Ғ828»18»16»16» 
0:0,0›0,0› 112, 15,01 
12,15,0,0: RETURN 

670: РОКЕ &F819995999 
0»1»2»127»0,0,0,0,0 
ぅ 9 

675:РОКЕ &F828999959 
,й»йЙ»3,124;0,0,0,00 
s0: RETURN 

680:РОКЕ &F819999599 
;Й»й»й»5»124»0,0»2»4 
120 

685:РОКЕ %Ғ828,4»2»,0:0,8 
ぅ 959 ぅ 128 7505950598 
9: RETURN 


得点 は 200 


(メデ ィ ア の 読者 が 増え た ら な 一 と 思う と ぅ らん ふぁ t) 


болді 


54 7 ゲー ム 


аро «25 
«©, GUD < 
ШОсе し ゅ ん こう 

PiO に は メモ リ 拡 張 さ れ て いる プロ グラ 


ム が ほとん ど で , OR- 1 を 持っ て いな い ユ 
ー ザ ー に は 気 の 覆 な こと で す 。 


R2 行 番号 マッ プ 


距離 計 用 カウ ンタ 
そこ で , OR- 1 が な く て も 遊べ る ゲー ム | 自 機 の 残 数 veva 
を 作ろ うと し た の が これ で す . 自 機 の 位置 ルー プ 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 自 機 の キャ ラク タ 初期 設定 


カウ ンタ 
面 ク リア 


キー 入力 

自 機 キャ ラク タ 読 み 込み 
画面 読み 込み 

画面 表示 

面 の パタ ー ン が 3 種類 し か な い の は MISS 判 定 

残念 で す . も う 少 し 増やせ ば , も っ 操作 し て よ け て くだ さい . 自 機 は 3 機 ほ ど жалап 

と 良く な る と 思い ます . (Ta) љо, 全部 ミス る と ゲー ム ・ オ ー バ Сҹ. ハイ ・ ス コア 

また 右 の 数 字 は 距離 計 で 。 25 で ゴー ル で K amia 

7. そし て スコ ア は 走っ た 距離 X10 で 。 面 
は 3 つ ほ ど あり, 1 周 す る ご と に 速く な っ て 


図 キャ ラク タ 


6 周 目 で 最高 速 に な り ま す . 先 を 読ん で キ 自 機 の キャ ラク タ 
[МОРЕ [1 |VAC| EXE |CLEARA| EXE | な お , 今 ま で の ハイ ・ ス コア が 見 た いと М 
と し て , 間違い の な いよ うに 入力 し て くだ き は H| EXE | し し て くだ さい . [m] 自 機 が 中 の 位置 に ある 
ылар Га) 自 機 が 下 の 位置 に ある 
障害 物 の キャ ラク タ 
= 自 機 が 上 の 位置 の と き 以 外 通 れる 
Гвнит ||O|l て ゲーム ・ ス ター ト で す . どう で し ょ うか . 少 メ モリ の 割 に 結構 楽 自 機 が 中 の 位置 の と き 以 外 通 れる 
右 か ら ス クロ ー ル し て く 〈, る 障害 物 に ぶつ か し め る と 思い ます . 
自 機 が 下 の 位置 の と き 以外 
ら な いよ うに , 自 機 を |OQ| で 上 , |2| で 下 に PB に は グラ フィ ッ ク が で き な い の で наел т алаг 


障害 物 キ ャ ラク タ の 設定 が 少々 こじ つけ に 自 機 が 上 の 位置 の み 通 れる 

な っ て し まい まし だ た だ. 最初 は や り に くい で 
し ょ う が , 慣れ れ ば 大 丈夫 で し ょ うぅ う 
БИТЕ, ЖА 


自 機 が 下 の 位置 の み 通れ る 


PRINT CSR Li +1155 PRI 15 FIR 2-8 70 SINE 
HOSUR Тізені 2-51: H] yT? 
ПЕ B= THEN 17 iCS 3070 15 


сү 


С | 


THEN 2 


ады дын , g 


THEN 5 


29824751 


「 


e 


9 ЕЕ Т; 


RET RN 


т 
i 
й 
1 
IF 

に 
- 
7 
і 
` 
と 
т 


ғ 


{ = 
: 


ІНЕН 5 
Жз к ЕН; 


1 THEN 5 


Қ 
.. 
3 L 

р 

- 

Pa 


“al Fe e 
+ ph у 


оша ОШ) ӨЗ сқа 


Tie n ICES, 


PU кеч кеч k H 


э 
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Q 


PB-300/100TOR- | 


BASIC 


B 


S 


ある 日 , 少年 人 は 友人 か ら "WARP 
BOX を 全部 手 に 入れ る と , 魔力 と いう カカ 
が 付く ん だ っ て …」 と 聞か され , 体 が 弱い 
A は その WARP BOX を 手 に 入れ る べく ., 
「BREAK BILL」 と いう 家 に 向かっ た . 

し か し , その 家 に は お ば けが … 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


少し 難し いよ う で す . も う 少 し 簡単 
に し た 方 が 良い と 思い ます . 


入力 前 に ALL RESET を し て , 必ず DEFM5 
を 実行 し て くだ きい . あと は 間違い な 〈 入 
力 す れ ば 動き ます . 


いろ いろ 


| KAF Е 

[SHIFT |[о| сх Z— F C+. 自分 は |4| 自分 の 数 お ば け の 進行 方 向 
|@ | で 左右 に 動き ます . 自分 の X 

家 は 5 階 ま で ある の で , 一 番 端 に エレ ベ 5; | 
ー タ が あり ( 図 1, 2), 開い て いる 状態 で бех Ç ) А SOE ERT 
(9 ||3| キ ー を 押す と 上 下 し ます が , 閉まっ お ば け C の X 
て いる と 乗れ ませ ん (あたり まえ で す が ). 4 

z し て , [5| キ ー を 押す と POOL ВОХ T А RS 

| % & これ が 「 擦 り 抜け 」 
(%4) を 壊し , 10 個 壊す と WARP BOX が POOL い くっ ? “--” ' 
現われ , それ を 取る と 1 面 ク リア で , ЗО エレ ベー タ の Y ке 
取る と (つま り 30 面 ) 全 部 あつ ゆめ た こと に な т; н 表 2 паат 
> р e f: P ғ” пая: а 

” & = Қт, は オ て す . お ば け A の TIME 

まだ お ば け で す が , ある 時 間 が すぎ る と お ば け B の TIME タイ トル 
HT š £ 3. お ば け は 聖 剣 (POOL BOX を お ば け C の TIME 初期 1 
壊す と た ま に 出 て き て , も う 1 回 [5| キ ー ЕС 初期 2 


初期 3 
メイ ン ・ ル ー チ ン 


を 押す と 取れ ます . な お 面 が 進む に つれ て 
出る 確率 が 減り ます ) で 退治 で きる の で 
みう きよ た 岳 し そく だ さい 。 Іі, TRN 


エレ ベー タ の TIME 
WARP BOX いく つ ? (ROUND) 
TIME の 減り 方 


$ 用 サ プ 


や られ サブ 

| MID 関 数 用 BREAK サ プ 
| айы CLEAR#Z Ü 
お ば け や ら れ サ フ 
n7? お ば け 復活 サブ 


PPiO な イラ スト て 常連 に な ろう と 思う けど , な か な か た い へ ん で すね . 頑張 っ て 投稿 し て る けど , 1 月 号 に 載っ た っ きり で , その 後 は さっ 
ば ぱり …. 間 上 ら ぼ きん の よう な イラ スト を 描き た いな 一 . と ,、 い うこ と で 皆さん も 常連 めざし て 頑張 り ま し ょ う . 最後 に , FM- 7 バン ザー 
ィ ク ら ぼ さん, 応援 し て る の で 頑張 っ て くだ さい . (MAKO) 


pio 


で きる お ば け と , で き な い お ば けが いる の 


ぞ 注 意 し て くだ る さい 、 
上 下 に いっ て も お ば け は いつ も 自分 と 同じ 
階 に いま す ( メ モリ が だ た だら ん の じゃ /)。 Ф 


と , お ば け は 左 に 行く と 右 , 右 に 行く と 左 


に 出 て きま す . 


だ 。 


メモ リ が た だり ない の で 相当 苦労 を し まし 
表 1 に 変数 表 , 表 2 に 行 番号 マッ プ を 


Ж.Т; 


P4 


iñ PRINT "WBRERK В 
ШЕ 

20 VAC 18-59 21: Ұс 
ЕН БАҒЫН ар 
(т 2 А, 


30 PRINT "Ма: 4": 


4A R=INT 〔RHNW*(+ 
5=INT (RANES? 
riHF R=5 THEN 
4 
38 = "0": 5-8: 6050 
Е 500: Х-5: 60506 
500: 23010-3: МЕ 
KI Y 
ӨЙ PRINT :PRINI "S 
MarpBoxRB";U-1: C 
=4:D=1:0=18:P=2 
9:0=30:1=1:1= 
55 Е=-1:Р=-1:6=-1: 
$=2%(1):Н=1 
18 PRINT CSR й: "8" 
:2$(DISCSR 9;" 


Лаг, з 
зу? 


ӘЙ ІР L=D:PRINT 05 
R 93 "=";:6070 i 
96 

90 PRINT CSR ӨБ 


108 PRINT CSR с; "9" 


千葉 県 


な お , エレ ベー タ で 


“зе 


忘れ RDS ボー ナス “x 


190 IF 028;E=E-1:1F 


БІР HM=1;:PRINT 

CSR CN; =°; 

ita FOR Y=B Tü 2:1F 

ӘСҮҘЕЙІРЕІНТ E 

SR КЇН ҮН 
IF КҮҮЗ-б THEN 
588 

115 ІР 04774031 に 
LIF U+N=zËZ072; 
0508 300 

120 ІР ОСУЯИІКСУҘ- 
ӘКҮ9-ТНІР ЕТЕ 
ЗІР 0072205505 
UB 980 

158 NEXT IF C<9;1 
Е МТОСС,1)=*Е“ 
THEN 758 

140 ІР KEY="4*; C=C- 
SN (C-i)iN=-1 

158 ІР КЕҮ=*5":С=- 
SGN (C-3)1:N=Í 

160 IF KEY="S";50SU 
B 788 

170 IF KEY="%9"; IF Û 
=; IF L=D:0=D+S 
ӨҢ i5-0)iL=pi T= 
5:4=2$(0) 

188 ІР KEY="3"; IF 
=; IF 上 =DiD=D- 
GN (0б-ілніг:І 
S:$=2$(D) 


Ë 
5 


IRF FR 


カ * ら , 


は ムズ イ . 


表 3 POINT 


が あり ます . あえ て 教え ませ ん が …. 
1 回 死ぬ と 聖和 剣 が な く な り ま す 。 な 
お , POINTI23# 3 に 示し ます . 


2 うーん. 自分 で 作っ て お き な が ら , これ 


ЕСІ: Ей 

200 IF РейҒ-ЕНІР 
Fy8;F=1 

218 IF 048; 6=6+58 
(5-8) 

240 T=T-1:IF 17-015 
НЕТ 
Lsi 

250 2$(D)=$:80T0 79 

s0ñ IF 1 本 時 HID 
(2):RETURN 

510 ІР X=7:$=HMID(I, 
6)+M$: RETURN 

520 $=HID(1,2-i)+8$ 
+MID(X+1):RETUR 
N 

608 $=*00000#+-. ° 

s _ IFOR Y=1 TO 11: 

` PRINT CSR СП 
«ЕНГІЗ 

610 B=8-1:1F Вей TH 
EN 630 

520 PRINT :PRINT ' 
LAST": В:М=8: 607 
0 68 

510 PRINT :PRINT ' 
GAME OVER”, "5С 
ORE":R:INPUT "A 
GRIN(YZ) 2 

Бай IF 24-47! THEN 
28 

650 END 


も も 30 ІР? У7 LRG PIO 
PiO で 教え て 《 く だ さる いな. 


お ば け A 
お ば け B 


お ば け C 


それ POOL BOX 


WORP BOX 
E # 
(持っ て いる と き は “一”") 


最後 に この ゲー ム 。 ドル アー ガ に 似 て 
ませ ん か 2? 相当 意識 し て 作っ た ん だ と 思 
っ ら て いま すず す : СТС 7 572%. 


つれ いし まだ бО 
(se) 


BREAK BILL BASIC リ スト 


=11-Y:PRINT CSR 
ейік: 03" 
"ЗІМЕАТ 

ТЫЙ PRINT :0=0+1:#= 
Y+ SIF UPSD TH 
ЕН #1 

779 8070 30 

З $=*00000%+,-*:Р 
OR 2=1 Т0 3:PRI 
NT CSR C+N;BIDO 
КҮЗІ, 2460 

310 R=R+19*(Y+1):0( 


TAA PRINT CSR 2-1:! 
HDS IFOR Y=B T 
0 18:NEKT PRI 
NT CSR 6-1; “ХЕ 


782 IF C28 RETURN 

TBS IF ШО £" 
}И$=*_":Х=01605 
uB 500:R=R+5BB 

1% IF MID(Ü;, i=" 
i8R=1:R=R+50:R$= 
*_°:Х=(016050В 5 


BB Үз ҮННЕН 
707 IF MID(C 125407 )=-1:$4#R@2$(D):RE 
; RETURN TÚRN 


30A ЕСТ)-ІНТ (RANE 


198 ñ=R+10;K=K+1;IF 
FRAC (U/K;=B;H 
$=" /"ix=C15OSUB 
©й@:60Т0 715 

799 IF К=С:$=°%":5 
=£: BOSUB 508: 60 
Т0 715 

710 Ш$=*_*:Х=(6:6050 
8 500 

7:5 IF eriet": 
=SiG0SUB 5MW 

720 RETURN 

750 FOR Y=0 TO 11:2 
=11-YIPRINT ESR 
Y;"-"CSR 2;"- 
wiNEXTY 

155 FOR Y=0 TO 11:7 


T+1):IF ABS íC- 
EtY))z1 THEN 90 
B 
910 $=" ..+*0Ü";FÜR 
2-0 TÜ 6:PRINT 
CSR ECY) MIDCZ 
+i,1)? 
920 NEXT Z:PRINT CS 
R КҮНІН 3 
=Z2$(D):RETURN 


Pt 
19 PRINT "You зе} 
all ‘Harp бох’, 
8,4 The end." 


SLURP» (( 


この ご う PIF DS 25, 
う へ と ТАЗ ту, 


ONTA o F- e ge 


ғ) 
М2-2оооэ% 
この ご 3 あま り は わ .? な みい (。 y 
760808 #423 и 


福岡 県 大 刀 洗 原 人 
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Q 


FX-702P 


BASIC 


РТ 
Ш 58 


あな た は , と ある 工場 の 中 に いま す . Ж 
械 を 動か し て , 時 間 内 に 完成 品 を 作っ て く 
だ さい 、. 

較 プ ログ ラム ・ イ ン フ ォ メ ーション 


動き が 遅い の が 気 に な り ま す が , だ 
いた い 良 く で き て いる と 思い ます . 
(Ta) 


DEFM4 を 行ない , 間違い の な いよ うに 
KIUT ORDO, 


あな だ は “М” を 操り , 原料 を 機械 の 所 
に 置い て いき ます . 機械 は 自動 的 に 原料 を 
加工 する の で , で きた 物 を 次 の 機械 に 送っ 
て や り , 最終 的 に すべ て の 原料 を 完成 品 に 
すれ ば よい の で す . 

な お , НЕНАЕЕ-А-С-Т-О-К-Ү 
の 順に 移動 きせ ます . まだ 1 つの マス に は 1 
つの 原料 し か 置く こと が で き な い の で 注意 
CENT O 

それ か ら , この ゲー ム の ポイ ント は いか 


ACTORY BASIC リ スト 


42777) 


表 1 デー タ の 変更 点 


画面 の よう す (15 マ ス て 機械 が も し “C" 
まで と する な ら F と A と C は 少な 〈 と も 


1 つ は 必要 ) 

必要 な 時 間 

余分 な 機械 が あれ ば その 個数 に マイ ナス 
を 付け て 入力 


表 2 プロ グラ ム ・ マ ッ プ 


メイ ン ・ ル ー チ ン 
画面 デー タ 


に 時 間 を 節約 する か と いう こと で す . 機械 
が 原料 を 加工 し て いる 空き 時 間 を 上 手 に 利 
用 し , 原料 を 次 の 機械 に 受け 渡し だ た つい で 
に 近く に ある 原料 を 取っ て きだ り し ます . 


画面 の ゲー タ は P1 に 格納 きれ て いま す . 


これ を 変え る こと に より , 自分 の 好き な 画 
面 を 楽し むこ と が で きま す ( 表 1). 


ルー プ 

メモ リ 節 約 用 

ハイ ・ ス コア 

キー 入力 

機械 の 数 

原料 の 数 

稼動 し て いる 機械 の 数 ( 十 29) 
ラウ ンド 数 

ат 

残り 時 間 
自分 の 位置 ( 十 4 ) 

自分 の 動く 位置 ( 十 4) 
自分 が 手 に し て いる 原料 の 
完成 度 

機械 の よう す 
原料 の よう す 

加工 途中 の 原料 の よう す 


原料 を 持っ て いな い プ レイ ヤー 
原料 を 持っ て いる プレ イヤ ー 
原料 

完成 品 

文字 の 1 つが 1 つの 機械 

文字 の 1 つが 1 つの 加工 途中 の 原料 


追加 し た いも の に 次 の 2 つが あり ます . 
Oir 7, ニセ の 原料 複数 個 の 原料 , 
スペ シャ ル ( ス ペ シ ャ ル は 取る と いろ ん な 
特典 が つく も の で , タイ ム 延 長 、 ニャ 原料 
発見 器 , 画面 の 両端 が 切れ た りつ な が っ た だ 
りす る な ど ). 

@ 敵 キャ ラ に 原料 を 投げ 付け て いじ め る チ 


ャ レン ジ ・ ス テー ジ 


38 Т-1-1 148 ІР K$#=238":55B 3 
iaa РЕТ CSR НЕТ 38:8070 168 
; ]58 IF K$=22”;65B 3 
118 НЕКЕ ІР K$ 18 
THEH 168 108 IF Р=29 THEN 78 
120 IF K$=242;85B [Їй Ва ЕРНІНІҢ) 
SB:6010 158. tt[+T+57 
138 IF ЕЗУ ОВ 2) 188 FRADE 
15070 168 88538597217 


598 ASRKI ACSR 
54 һе ІР Юз” "B 

YRR: 66 PRG: 1369 á = 時 1 Әк 
; ой NEXT A:PET CS 
iL 


#%% PRG LIST 


РӨ: ИТЕР + ` R HH Т0 14k 318717 
18 SAC STAT H: VBC ñij _ Же: 6010 
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° (O) 0 © pFP で プロ グラ ム を 作っ て いて 気 を 付け る こと (特に SUB CPU コン トロ ー ル な ど ). それ は Reset し た 場合 に FBF 0 以降 数 バイ ト が 書き か え 
Ол Ол られ て し まう と いう こと で す .。 そこ に プロ グラ ム が な けれ ば いい けど , あっ な だら 当 然 壊れ て し まい ます . ん で 本 題 で す が 。 PiO 1 月 号 の 
б С "HARD SHIP」 の FBFD 以 降 (…02,、 FF, FF) と な っ て いる の は , そこ が サ プ ブルー チン で ある こと も 考え る と (…F9, C9, 00) が 正しい ん 


168 で は な いで し ょ うか ? リス ト を 取る と き は 。 気 を 付け まし ょ う 。. P.S. 実際 を それで 動き まし た . (デバ ッ ガ ー・ サ ム ・ ハ ロス ) 
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PC-1245 版 


ファ イル 名 表示 の CLUAD ブ ログ ラム 


の 領域 に 表示 し ます . あと A= テ &C5DpO と L, 


ポケ コン ・ マ シン 語 入 門 で 。 PC-1250, 
51, 55 用 の ファ イル 名 表示 CLOAD プ ログ 
ラム が あっ て , 1245 用 の は な か っ た の て 
1245 用 の を 移植 し まし た . 


入力 方 法 
ポケ コン ・ マ シン 語 入 門 に 載っ て いる マ で マ 
ジン 語 モ ニタ , ま だ は PiO'"84 年 11 月 号 D-179 
に 載っ て いる 簡易 モニ タ な ど で 入 力 し て < く 
だ さる さい. そし て 入力 が 終わ っ た だ た ら CSAVE 


M'LOARERACADO, &C625 と し セー プ 
ссе 


使い 方 


使い 方 は ポ ボケ コン ・ マ シン 語 入 門 DP.91 の 


- と お り で す が 。 ファ イル 名 は LCD の 右 半 分 


3 >”. рд 


эхэ 4 
ха 
b=. ves 3 
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п 


FH HATES 
38 РЕТ 5; Ti 90 
й="°:й:5=8:1Е 5: 
Hi 時 S 

IF Rs5 THEN 2 28 
Я РЕТ PUNA KUITSUT 
КЕСІР 478 
A HARIT ӘЙІРЕТ CSR 
j; Т ыы 09 


"CURE" 9: 
SCORE”; Hs END 


DO 


FACTORY BASIC リ スト 


= "Т0 ВЕТ. 


0-1 T=380:BET 
Š =”ーー--F---[--- 
--"1T=688:8ET 
7 $="-F-R-(-T-0-R 
ーー i T=6BB:RET 


sP 


YU 


RRR RRR 
k ОКИ 


“САА” СЭі VO OOS HCA. 
&С5р0 U7?: Lt 3 L, CAJA と し た と き の 
画面 を 比較 すれ ば わか り ま す . 


ーー プロ グラ ム の 説明 一 一 


PC-1251Ver. 1 用 の プロ グラ ム で ,。 内 部 


ROM を コー ル し て いる の で 。 マシ ン 語 の 本 


で 載っ て いる も の に つい て は それ を 使い , 
載っ て いな いも の は 自分 で 調べ で まし た . 
&7ЕЕЗ &7E0C 

&73DF &72E5 

&7400——э &7313 

&Z2 Ñ 一 ーーー* 67180 

«Ж“71Е1----- &70Е7 

&6755 一 一 > 66749 

&700C——— &6FOD 


Po PO S 
トマ 1% 


524242222212 


人 @ 松 本 泰彦 


あと 画面 関係 で &C5D3 の &02 を 錠 36 に , 


&C5FCO &F42 SB61=, &С6000 6:44 Z° & 
451-0 8 G だ 


Ш ファ イル 名 表示 の CLOAD プ ログ ラム 置 


CSDB F1EB02Z683F8F1EE:E3 
CSD8 787ЕйСТ7872Е56702:2й 
LIEN 2906787515670029: Вр 
С5ЕЗ й0896000й02878808:62 
CSF 78061Е670й058ЙВҒЕ:Й5 
CFS pCaza5FFB6020086:BB 
C6BB 4549291272С51Е78:9Е 
C608 718й5529(758076В:45 
C610 й8ТЕС5ПйӨЗТТ8ТЙЕТ:21 
(618 7867495В5В577871:ҒЕ 
C620 5054897965Ғй08000:22 


PC-1861 の ブロ グラ ム ・ メ モリ の 増やし Soar з 


PC-1261 の プロ グラ ム ・ メ モリ は 9342 バ 
イト で す が , これ を する こと に より 。,128 バ 
イト 増やせ ます . 要 は , 式 プ ログ ラム ・ エ 
リア の 128 バ イト を プロ グラ ム ・ メ モリ に す 
る と 言う も の で す . 


ワー ク ・ エ リア の &6619。 1А, ІВ, ІС, は 
вео e の 始ま り の アド ン レ 
ス を 示し (&661A, 6619 と いう よう に 逆 に 


Ао Ç u: 2. 3826 6661 А1: 6:40, 6661912 6: 
80 が 入っ て いる ), &66E1, E2, E3,E4 は 始ま 


り と 終わ り の デア ドレス (ブロ グラ ム の 始ま 
つま 0 %66Е212 6:40, &66Е1 (= 6:80, 6; 
66E3,E4 は 上 位 に E4, 下位 に E3 と いう よう 


に . ブロ グラ ム END ア ドレ ス が 入る ) PA 


ЭС ФОТ е 5с КЕМЕ 
M を 増やし ます . 


実行 方 法 


や り 方 は , NEW 後 EQU# 0 t L, 
РОКЕ8.6619, О, 8.40, O, &4O 
POKE&66E1, O, 8.40, 1, &4O 
で OK で す . さっ そく MEM し て み ま し ょ う . 
プロ グラ ム は ちゃ ん と 動く は ず で す (一 応 
テス ト は し た ) м», だ だ 式 プ ログ ラム は 組 
め ま せ ん . 

だ っ だ 128 バ イト で すけ と ど 役 
さい. 


に か が て ا‎ G 
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FX-602P 


日 の 出 と と も に オペ レー ショ ン ・ レ ッ ク 
ス ( 向 う 見 ず 作 戦 ) が 発動 する . 整然 と 並ぶ 
機体 (一 体 こ の うち の 何 機 が 戻れ る か ). Ж 


後 の 有 人 戦闘 機 と 言わ れる ES-09 ス ワ ロ ー. 


小型 だ が 性 能 は 敵 に 劣る と は 思え な い ( 狂 
っ た 機械 め っ . メ ). 

そう , 無人 機 と の 戦い …. そし て 東 の 空 
が 白 み 始め た . あな た は この 作戦 に 参加 し, 
瑞 要 寒 を 防衛 し て いる 無数 の 無人 機 を 相手 
に 戦っ て くだ さい 、. 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


ゲー ム 内 容 と し て は あり ふれ た も の 


で す が , 602P で は まず まず の よう 
や で す 。 (O) 


ゲー ム の 説明 


プロ グラ ム を 入力 し て |PO| で 開始 で す . 
最初 表示 が 図 1 の よう に な り ま す . これ が 
自 機 の 視界 を 表わし て いま す . 

次 に キー を 入力 し ます . 使用 する キー の 
説明 は 図 2 を 見 て くだ さい . ДТ, 主 な キ 
ー の 説明 を し ます . 

M2 操作 キー 


O: レポ ー ト (レー ダー) モ ー ド 
まず 図 3 の よう に な り , 敵 の 進行 方 向 , 
Y 座 標 , X 座 標 が 表示 る れ ま す . % 
| EXE | キー を 押す と 図 4 の よう に な り , 
自 機 の エネ ルギー の 残 量 , 左右 の ミサ イル 
残 数 が 表示 る れ , 図 1 の 表示 に 戻り ます . 
[03 レポ ー ト 表示 І 


4 レポ ー ト 表示 II 


О 176124784 


2: プ ブース ターON/OFF 

ブー スタ ー の 切り 替え を 行ない , 図 1 に 
戻り ます (プー スタ ーON 時 は “Б” моз, 
も う 一 度 押 す と OFF に な り ま す ). 

8 : ミサ イル (ビー ム ) モ ー ド 

ミサ イル と ビー ム の 切り 替え を 行ない , 
図 1 に 戻り ます . 

な お 飛行 機 で びす から, これ ら の キー を 入 
力 し な い ( 図 1 の まま | EXE | を 押す ) と 前 
に 進み ます . 

自 機 は 常に (0, 0) の 座標 で 前 方 (Y 軸 の 
十 方 向 ) に 向かっ て 1 ずつ 和 飛び, その 都度 エ 
ネル ギー を 1 消費 し ます . そし て プー スタ 
ーON 時 に は , それ ぞ れ 2 倍 と た と なり ます . 
や が て 敵 機 が 視界 内 に 入る と 表 1 の よう に 

表 1 英機 表示 


前 方 に 向っ て 飛行 中 


右 方 向 に 向っ て 飛行 中 
左 方 向 に 向っ て 飛行 中 
後方 に 向っ て 飛行 中 


画面 表示 


TIT. 
ped 

英機 が 視界 内 に いて , ロッ ク さ れれ ば 攻 
撃 が 可能 に な り ま す . 各 攻 撃 キ ー で 敵 機 を 
攻撃 し て くだ るい 。 2%, ビー ム / ミ サイ 
ル ・ モ ー ド で の 攻撃 は , 次 の よう に な り ま 
Ж. 
BB: ビ ー ム ・ モ ー ド 

え が 十 1 一 一 1 の 範囲 で ロッ ク し , 表示 は 
Y で 示さ れ ま す . 1 回 の 攻撃 で エネ ル 
ギー を 1 消費 し, 相手 に 近い ほど 与え る ダ 
メー ジ が 多く な り ま す . 
M: ミサ イル ・ モ ー ド 

X が 十 2ー 一 2 の 範囲 で ご で ロック し, 表示 は 
"“(О)” で 示さ る れ ます . 距離 は 無関係 で 相 
手 に 一 定 の ダメ ー ジ を 与え ます . 特に 2 連 
射 で は , 必ず 相手 を 破壊 し ます . 

それ ぞ れ の 攻撃 が 表示 る れ , それ に よっ 
て 相手 が 耐久 力 を 失 え ば “Des” と 表示 し 
て 撃墜 で す . そし て 次 の 英 が きま す . 

英機 の 性 能 は 自 機 の 通常 上 同じ で す . そ 
LT, 自 機 が 図 5 の 範囲 に 入る と 攻撃 され 
ます . 自 機 の 各部 は 1 回 目 の 攻撃 で 損害 が 
HT, 2 度 同じ 所 を 攻撃 る れる と 破壊 る れ 
ます . な お ぢ お, 損害 は Dam と 表示 し ま 
す ( 表 2 ). 

表 2 Dam 表示 


レポ ー ト 不能 
右 ミ サイ ル 不 能 


左 ミサ イル 不能 
プ ブースター 不能 


(英機 に と っ て の X) 


Y (英機 に と っ て の Y ) 


終了 

エネ ルギー を 失う か , 2 度 自 機 の 同じ 所 
に 攻撃 を 受け る と ゲー ム ・ オ ォ オー バー で , ЖЕ 
墜 し た 数 が 表示 る 和 れ ます . 
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piO 
終わ り に 


以前 か ら 作 り た い ( で きる か な ?) と 思っ 
て い だ も の が 完成 する と 。 や っ ぱり 嬉し い 
も の で す . 602P ユ ー ザ ー の 方 々 ( 今 で は 少 
MOTU IODP? ) に 楽し ん で い だ だ け 
だ ら 幸 いで す . 

それ か ら , 以前 602P の 修理 を 2 度 も 引き 
受け て くだ る っ た, 人 
"P... r3 


その 他 


 @ 自 機 が 敵 機 と 同位 置 に 入る と 損害 が 出 ま 
す ( そ の 逆 は あり ませ ん ). 

@ 視 界 の 補助 と し て 表 3 の よう に な っ て い 
ます . プ ゼ り リスト 2 の よう に 突 た で みぞ そ で 《 だ きい . 
で き な い 入力 を する と “МО” と 表示 る 
п, 図 1 に 戻り ます . 

@⑳2 連 射 は 左 ミ サイ ル か ら 発 射る れ ま す . 
相手 の 動き に 飽き て きた ら ( ま だ は 難し 

い の て し た °), F0 の LBL3 か ら 43 ス テッ 


英機 は 左側 (X が 0 以下 ) 
英機 は 後方 (Y が 0 以下 ) 
英機 は 右側 (X が 1 以上 ) 


| ГГ? LBLS HROS x= БП 
НЕС 5 y! Minig НЕП! BBS Мілр + ARID) +7 ARIZ MinF 

4 Hini Minl8 ABS ) x RANË = Нілйб || 80709 BSBF4 

i 計 jF HR18 хэй 1 xaf 607041811 “i вій. arii ” 
.1 Мілйі Min82 Hinds Шы» KROG хэ Me Ж 


$k ТЕ 


8-12 
MRIG +/- АП Bin18 


Hindé 80709 w „ ARIS і REi6 Ё RgiBIILBLS 

LBL0 KRII xf 6 +/- тэй 411812 =. 215 ters 
САНЕ x 21 = IHT RBS HL 80701 

Кіл 1 80709 LBL2 

RANS x 18 М-11 = INT LBL3 НЕЙ! x=8 60703 

MinF Mini “0” | 4 8-14 

4 YaF 18 B-18 5SBP3 80709 

РАНЕ Mini7 x 4 + 1 (IRÛ ІНІ? x=8 hn13 (| I LBL4 

H+iF = INT Hini2 ‚1 IND M-12 л 


ARI? MinF 60709 
МВ14 х-Ғ N-14 LBL6 
2 + РАР 
û x>F 4 HF 


НЕ セー ӘЛЕ Minii 


Б 
a Міп19 Hind 8 BinF 
) e x=F і Mini? 


Е %/- 30 60702 '++@2151еР5 


“--ф8451еғ5|| 8819 х-0 50705 ж ру 


NR15 x=F 60705 К-11 
+/- yağ i ж P2 МКІТ ха) 60708 
DEG 1 N-18 Ninf Hingê 5-D 
Hindê ABS yaF 60702 || BSBPS 1 IND 60706 
HROS MtF ARIS xaf 60Т01 MR19 х-0 50705 


“END arif ” МЕ16 х-0 60705 
..«2dosters| | MR02 х=0 60705 


ARIZ IND B+F' 
ARIS NinF 


2 Hf NR15 х-0 60T03 Hi2 
WRi1 ABS AF 60702 H-16 NR19 +/- KIL Minie 
6 HQ IND M+ “|” NR12 x=8 4 Mini? 
2 К-08 Kinl9 ДИ 50701 
7 IND нй 257 
HRIS х=й 60703 5 
1-06 P5 
7 IND нш ШАШ» 
H+ 
Me 1, I + = нчен 
ГЕ i 698P3 
5 И (9819 х=й 60103 


ARIS x=6 80703 


LBLS 
5 804 (86 N-05 IND МЕЙЙ FRAC ІН) 
LELI 


Х~МЯ8 Hind? 
BSBP1 і IND 60709 
HLT 24 
65BP 
+/- y=B 680701 
x20 60708 


i + MR14 = М-10 M- 13 Т 


MRIS x=8 60703 
MR04 x=W 50105 
ARIS x=6 50105 


МВ +/- Hinia — ст 
rg +/- Minii 60703 80705 


+12 


ARi1 ABS MinF ・ 

KRIG тәй і xsF 60704 
ЕНЕ x 18 = INT MinF 
6 xsF 60105 

ІНІ! 06-04 


445 も 6PS 
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ә. ARSE ゼ ょ ん 。 DE = ゴ の フシ ギヤ a 621% f 
E ! РУР MADE Sl RYA. L), 4 
i 54/7) 7 ж. Ха T PICH- RTR BA (wt! いい 
ШІН 内 Ж BASIC; т 88 АРА, の よう に 開く ます hê l Ж 52 
ます ## ARES が тарқан ч 
EASES p >Z さえ が れれ ば (ФА дё] 
a REA B- 28 2E, 
お 送 IF \ こん た が こと (ZZ 101039 “ғ. 


HORE? - АЧ ег. апо ана 


жй АЯК ғың 
HAR 90-9 


ARER ARBRES 


БОШС таг з= з дыл» 
„Ж. л АКЕ iy E 
Ё га 431 м ПЕРІ ТЕЗІ; 655 
£a 14 集 を 時 17 ち 5 のり -- кездеседі 

Ж г د‎ š いい と い 
24, -h 5 AQ 0х HEY SUES 
BUELL (АҚЫ BUF, 
わけ ぶり ませ ん が HRY WW ру JPS. JO みな 
Eu RH. уе W Т 
034225 haz 
イキ ま 。 て いる Е > % 

fiom Ro 
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00 QUA 


る 名 古屋 市 Robin 


(Тө) こん に ちら 7 Оу 
аж Æti, Н лз 

о 26-6 ек. 

W ARTU. фач 

KCL KS N 

5/ イア スト も ガ 上 る 7 ЭҖ\ 

V g. /А5С7(5ЕКОЗФ 


жатат аа, 

. LAKBAN To 783 2в8л 
“マシン 鶴 LFI, EBES FS 
T, Kis ak ER2 AER- E 

Rak スカ d3 こ と が で まる ょ うに な り リ 


な さん MSOTUSERDh ЕЛ. . 
ま ( た 。 Funkey Ва|\ , FERZ. の ノ マ ッ ソコ > (5ЕЛ ДЕЙ. 
ムク も 1 日 プス カプ まま し た 。 


E せ て や ろう / 2242541 な 人 
Г» / PS. VOERING コー イー ビス Ü ATE i } , 


Ву NERA 419 " 


>F ÛJ >+ ¥ HB А 
с)49;9) жанат 


қабыл 5 


-5 1555/9 а. 
— 


ШУКРИ E н, 
4 に ん こう と うさ ん クン ルル 


> KARE の Pedr AE. ЖАН М 
200 % REO ЕС, tangad š, 
た と みり SA/SA きみ FL EN у 
298686402900 55,4, Q` 
RTF チル あみん.… E 


x “ 


tanko tp iabea? $ 

п 02 ес Finet: 

N ° 8 pamat тазе, 2880 | 

BoRBMERz А 24» | 
A MA- 


Ра 2. tæ 


A AD 


人 戸田 市 みな み りょう こ 


く 問い 合わ せ 先 テ 三菱 商事 (株 ) 
9100 東京 都 千代 田 区 丸の内 2-3-1 
三菱 商事 別館 


VDT 用 スク リー ン 


アイ セイ ムー 


圏 ア イセ イイ バー は, VDT( デ ィ ス プレ イ 装 も 目 の 疲 れ の 原因 の 1 つ で ある 画面 の チラ 
置 ) 表 面 か ら の 電磁 波 , 静電気 を 防ぎ , 有 ツキ や 文字 の ゆれ を 防ぎ ます . 
害 な 紫外 線 を ほとん ど カ ッ ト し ます . し か 

《 サ イズ & 価 格 》 


FA a 22. 24.7 


TSE SE E Шай | 
ОТТЕГЛИ уш | кыш | 
РЕИС 
cm | 00502-20. 
ужэш e — | — — | mm — 1 
ШЕК - aT 


<і> Ұ9,800 

ぐ 問 い 合 わせ 先 > パイ オニ ア ( 株 ) 
49153 東京 都 目黒 区 目黒 1-4-1 
(03) 494-1111( 大 代表 ) 


レー ザー ディ スク ・ ソ フト 
ОРА. ANS PL 


圏 バ イオ ニア (株 ) よ り , いま 話題 の SFX 
(映画 の 特殊 視覚 効果 ) の 入門 百科 “SFX 
スペ シャ ル "(SS098-0022) が 発売 され ます 
( 5 月 26 日 発売 ). 

ぐ 内 容 > 

p 月 世界 旅行 "(1902 年 ),、 “キン グ ュ ユン 
2” (1933 年 ) か ら 現代 の “ライ ト ・ ス タッ 
27, ジェ ダイ の 復讐 " な ど に 至る まで の , 
SFX の 多種 多様 な 技術 と その 実例 を エン 
ター テイ メン ト 色 ゆたか に 紹介 し た も の で 
Ж; 


екең | ы ぐ 問 い 合 わせ 先 > 
汎用 デイ スプ レイ シリ ー ズ < 大 阪 > シャ ー プ (株 ) 経 営 企画 室 広報 
кі Ж 2 99545 大 阪 市 阿倍 野 区 長池 町 22-22 
CU-14F1/CU-14H1/MD-12P2 же неа 
画 シ ャ ー プ (株 ) よ り , 広範 な 使用 目的 に 対 機種 ) が 発売 され まし た . < 東京 > 東京 支社 業務 部 広報 
応 で き る , 汎用 ディ スプ レイ シリ ー ズ (3 99162 東京 都 新宿 区 市 谷 入 幡 町 8 
ぐ 価 格 > 会 (03) 260-1161( 大 代表 ) 


CU-14F1 Ұ64,800 
CU-14H1 Ұ99,800 
MD-12P2 ҰЗ9,800 
く 主 な 仕様 > 


機 種 名 CU-14F1 CU- 14H1 MD-12P2 


| 14 型 ファ イン ピッ チ 14 型 高 解像度 ть ШП 
ハイ コン トラ スト ハイ コン トラ スト ハイ コン トラ スト 


элек | 
“акаа me 
ша А. ОА p=: 
ле G 
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P ぐ 問 い 合わ せ 先 > ユ テ ィ ク (株 ) 
í > 7 3: p 88 99152 東京 都 目 黒 区 中 央 町 2-32-2 


イン クマ スマ ヤー 7%(03) 715-4470 


画 イ ンク マス ター は , 使い 捨て だ っ た 布 イ 
ンク リボ ン を 再 利用 する こと の で きる , 1 


ンク 人 湊 布 器 で す . 
ぐ 価 格 > 
UIM-100A イン クマ スタ ー100A( 電 動 ) 
Ұ60,000 
UIM-20 イン クマ スタ ー20( 手 動 式 ) 
Ұ18,000 
INK-4oz 特殊 補充 イン ク ( 黒 , Ж, 青 , 
茶 ) 各 半 4,.000 
REEL-1 リー ル ア ダ グ タ 標準 
38,000 


REEL-2 リー ル ア ダ ブタ 特注 


新 刊 本 T SSSR 1 
任天堂 の ゴル フ 803) 


А 
N 
N 
W 


画 任天堂 ファ ミコ ン ・ ゲ ー ム の 攻略 法 シ リ 7 >> AN 
ー ズ の 第 一 弾 “任天堂 の ゴル フ " が 出版 さ 第 3 章 プロ も まっ 青 18 ホ ー ル 攻略 法 

れ ま し た . ゴル フ ゲ ー ム に 関す る プレ イ の Сі >2 *980 

方 法 か ら テ クニ ッ ク , 楽し み 方 まで を 幅広 ぐ 問 い 合 わせ 先 > (株 ) マ イク ロ ハ ウ ス 

< く 奥行 を も た せ て 解説 し て あり ます . 49104 東京 都 中 央 区 新富 1-3-9 

[LAF 東光 ビル 6F・7E 

>Бі3Жж . フ ァ ミ リーC.C。 テクニック ® (03)552-1530 


ァ > 第 2 牽 ター を うま て 〈 く 使っ て スラ ユア ・ 


多 機能 ファ ッ シ ョ ナブ ル 電 話 機 久 ボタ ン 電 話 機 желіп ү 
TEL-101,。 MD-K105etc. о сав 


一 三洋 電機 グル ー プ で は , 4 月 1 日 より 9 MD-7200D 未定 
機種 の 多 機 能 フ ァ ッ ショ ナブ ル 電 話 機 お よ MD-3150 未定 
о, 3 機種 の ビジ ネス 用 ボタ ン 電 話 機 を 発 MD-3250 未定 
売 し ます . MD-3500 未定 
<> @ ボ タン 電話 機 
デア デ ウト パル ス 式 防 キー トー ン と リ ダ イ ヤ MD-K105 未定 
J p 呼出 音量 ・ 音 質 調整 し 短縮 ダイ ヤル 区 MD-K308 未定 
ォ ン フッ ク ・ ダ イイ ヤル お 待た せ メ ロディ MD-K616 未定 
ーー シワ ンタ ッ チ ・ オ ー ト ダイ ヤル ぐ 問 い 合 わせ 先 > 三洋 電機 (株 ) 
ぐ 価 格 > 45570 大 阪 府 和 守口 市 大 日 東町 100 
@ 多 機能 ファ ッ シ ョ ナブ ル ん 電話 機 23 (06) 901-1111( 代 ) 
TEL-101 %14,800 


MSX バ ソコン 


キャ ンプ コン の たき らい りり 


圏 CF-3300 は フロ ッッ ピー ディ スク ・ ド ライ 会 (03) 437-1121( 大 代表 ) 
プ 搭 載 の 高級 MSX パ ソコ ン で す . 

<> 
3.5 イ ンチ FDD( 両 面 倍 密度 ) Рул 

オリジ ナル ・ プ ログ ラム ディ スク (1 枚 ) j 
付属 

p 大 容量 RAM64K バ イト A 

ぐ 価 格 > Ұ148,000 

ぐ 問 い 合 わせ 先 松下 電器 産業 (株 ) 
広報 本 部 東京 広報 1・2 部 

105 東京 都 港 区 芝 公 園 1-1-2 

ナシ ョ ナル ビル 本 館 
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市 販 ゲ ー ム の 秘技 を 大 公 


HY DLIDE 


昨年 末 に PC-8801 版 を 発表 し て 以来 , 皆 
様 よ り 好 評 を いた だ いて いる “HYDLIDE" 
で す が , その 中 で も 「 妖 精 が みつ か ら な い .」, 

「 攻 が 強 す ぎる 」 と いっ た 意見 が 多い よう 
TI: 

「 妖 精 が みつ か ら な い 」 と いっ た 質問 に は 
一 切 お 答え で きま せん が , 「 敵 が 強 す ぎる 」 
と いう 質問 は , だ いた い に お いて キー 操作 
が 間違っ て いる の で す . 確か に 瑞 を 倒す に 
は , ジム くん を 移動 させ て 相手 に ぶつ ける 
だ け な の で す が , その 相手 に ぶつ か る 「 方 
向 」 が 問題 に な っ て きま す . 素直 に 敵 の 真 
っ 正面 か ら 攻 撃 し て いた の で は , 体 が いく 
つ あ っ て も 足り ませ ん . 一 番 良い 方 向 は , 
英 の 後ろ 側 か ら 攻 撃 す る の で す ( 写 真 1 ). 


タッ ク 


ディ フェ ンド ノア 
切り 換え 


初め に お 断り し て お むき ます が , この 技 は 
X1 版 で は 不可 能 で す . な ぜ な ら , 同時 キ 
ー 入 力 が で きる 機種 の み に 限 定 る され る か ら 
Хол WL: с ш САН 
[BREAK | キー を 使用 し て いる の で 可能 と 
な っ て いま す . 

この 技 は , 的 確 に 敵 の 強 き を 見 切る 必要 が 
あり ます . まず , DEFEEND に し て お な いて 
か ら 敵 と 戦い ます . そし て , 敵 の LIFE 値 
が 後 一 度 の ATTACK で 倒せ る と 判断 し た 
O (この 判断 が 結構 難し い の だ が ), その 時 
点 で 相手 に 攻撃 を か け な が ら ATTACK に 
切り 換え る の で す . 
敵 は 一 撃 の も と に 消え 去り ます . だ だ し , 


と う ぜ ん の こと な が ら 6。 


華 は 自分 の 正面 に し か 攻撃 を か け な い か ら , 
後ろ から 攻撃 すれ ば 瑞 の 攻撃 を 心配 し な く 
て も いい 訳 で す . 

こう いっ た 英 の 行動 パタ ー ン さえ 理解 で 
きれ ば , も う 瑞 に や られ る こと も 少な く な 
る で で しょう. T&E SOFT の 開発 部 で は す 
で に いろ いろ な 必勝 法 ( た だ し , キー 操作 
上 の こと に 限ら れ ま す が ) が 考え だ され て 
いま す の で , 今回 は それ を ここ で 紹介 し ま 
し ょ う . 先ほど の 後ろ 側 か ら 攻撃 する 方 法 
$, 実は 名 前 が 付い て いま し て , 私 た ち 開 
発 部 員 は 「 バ ッ ク ア タッ ク 」 と 呼ん で いま 
す (単に 英語 読み し た だ け と いう 噂 も あり 
ます が …)、. 


判断 を 誤る と 無防備 の まま 敵 の 攻撃 を くら 
うこ と に な り , 非常 に 危険 どす. ご 忠告 ま 


で に ・… 

曲り 角 ア タッ 

これ も ちょ っ と 難し い 技 な の で す が , 18 
れれ ば 自然 と で きる よう に な り ま す . 2 
地下 迷宮 な ど で 敵 と 遭遇 し た 場合 正面 
か らし か 攻撃 が で き な く な り ま す . さき に 
紹介 し だ た ディ フェ ンド / ア タッ ク 切 りり 換え 
で も よい の で す が , だ び だ び 使 用 する と 自 
分 の LIFE 値 も 下がっ て きま す . 

こん な と き は あわ て ず に , 曲がり 角 に 身 
を 隠し まし ょ う 。 そし て 何 も 知 ら ず に へ ュ 
ңа と 近付い て きた だ た 敵 が ,。 曲がり 角 に きだ た だ 
瞬間 に 攻撃 を か ける の で す ( 写 真 2 ). 敵 は 


эф чемо 


z ФР am s= s= s= 


3 = = 


x 3 w 


Бере 


こち ら に 攻撃 を か が け よ うと も し な いう ち に 


КТК ЖТ. 


だ だ , 気 を 付け な く て は いけ な い の は , 
まれ に 敵 が こち ら の 攻撃 に 気が付い て 逆襲 
る れる こと が ある 点 で す 。 油断 は 禁物 で す . 


知っ つこ て おく こと 便利 


テク ニッ ク 以 外 で 知っ て お おく と 便利 な こ 
と も あり ます . たとえば, ある 程度 レベ ル 
мое СА OTSR T Ip 
“WISP” L “ROPER” が , それ 以外 の 機 
種 で は “GOBLIN” L “ROPER” が 出現 
する よう に な り ま す ( 特 に 私 た ち は , 野原 を 
走り 回 る “КОРЕК” の こと を ハイ ラッ マー 化 
し だ と いっ て いま す )。 こい つら が 出現 す 
る と 本 当 に 嫌 な も の で す が , これ も 発生 す 
る 要因 を 取り 除い て や れ ば 出現 し な く な り 5 
iT, 

それ で は , どの よう な と き に 出現 する の 
か 17 それ は 「 弱 い 者 に いじめ 」 を し だ た とき 
に 出現 する の で す . 自分 の LIFE 値 が 50 以 
上 に な っ た だ たら 有 要 注 意 スラ イム を 倒す と 
“КОРЕК” >, コ ボ ルド を 倒す と “GOB- 
LIN (まだ は WISP) ” が 出現 し ます . 


と まあ , 以上 の テク ニッ ク が 自然 に で き 
る よう に な れ ば , も う 敵 が 強 す ぎる と は 思 
わら な で な る で じょう 、 も つと も ドラ ザン や 
バラ リス と いっ だ , 重要 キャ ラク タ は め ち 
や ゃ や くち ゃ 強い と は 思い ます が … 

で は 皆さん , プリ ン セ ス 救 出 頑 張っ て く 
だ る さい / 


ЕЕЕ Z= 5 
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バンコ 


編集 部 で は 「 パ ン ソン コン DJ』 
ん に ご 協力 を お 願い し て いま す が , 
と て も 感謝 し て お り ま す . 


か ら の 報告 を いた だ き , 


すべ て の 報告 を 紹介 し た か っ た の で す が , 
介 で きま せん . 


„о 一 部 の 人 し か A 


ン DJ 大 成功 


の ロー ド に つい て , みな さき 


お か げ さ まで 多く の 人 


紙面 の 都合 で 


ロー ド で エラ ー が 出 て し まっ た 人 は 下記 の 成功 例 を 参考 


СЕС СУЕ [Р 


48% 


А-1 Snighzer 


L3 で は … 一 発 で 
ロー ҒОК./ 
江 野茂 紀 


@ 上 Snighzer 
@ プ レイ ヤー : ヤマ ハ СТ-1000 

カー トッ ジ て デン オ ツジ ">: DL 

103S 

MC ヘッ ドア ンプ : テ クニ クス 

SU-300MC 

РОИ А75 

PIETA T ONAA 

デー タ ・ レ コーダ : РС-6082 
私 は S1 を 持っ て いな い の で す が , 
L3 で も ロー ド は で きる の で や っ て み 
まし だ た だ 。 БЕНГ п КОҚ, 方 
だ は まず デッキ で デール kc бетт. 40 
で セー ブ し た も の を 再生 し て 録音 レベ 
ル を 見 まし た だ た. その 結果 デッキ の 録音 
レベ ル を 十 5dB 前 後に し ,。 マイ コン に 
不用 な 音 を カッ ト す る た め に サブ ソニ 
ッ ク フ ィ ル タ と MPX フ ィ ル タ を ON 
に も まだ で を も で プル レネ ヤー か ら デ 
ッ キ へ 録音 し デー タ ・ レ コー ダ で 再 
生 し て ロー ド と いう 普通 の 方 法 で す . 
私 の デッキ は ヘッ ド の アマ ジス 等 が 詩 
整 で きる の で それ が 良かっ だ の か も し 
れ ま せん が , コツ は レベ ル 合 わせ と フ 
ィ ル タ だ と 思い ます . それ か ら 。 ソノ 
シー ト の ホ ュ リ は 充分 取 り 、 で きれ ば 
ソノ シー ト の ソリ を 押 き える だ た だめ に ス ・ 
タビ ライ ザ ( オ モリ ) を 載せ れ ば も っ と 
良く な る と 思い ます , これ か ら も S1 
の ソフ ト を だ くさ ん ソノ シー ト に し て 
АҒ нед у SO ы Ж, 


今回 は で き な い … な ぜ ? 
加藤 一 彦 
⑩Snighzer 失敗 


@ プ レイ ヤー : パイ オニ ア PL-707 
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ー タ ・ レ コー ダ : TRQ-1500 
@2 月 : の рлеу 
) ほら で は だ めで ЕЕ ERRETEN 
(使用 機材 等 は 同じ で す ). 
今 ま で と 同じ よう に 
や っ た の に 
ҮатаШ 


@Snighzer 失敗 
@9 安 物 の と レ ュ ー ド 台 
え テ レオ 用 ダビ ング ・ コ ー ド ギド 
ТКО-1500 
@ 今 まで と まっ た く 同 じ や り 方 だ っ た 
の に 失敗 し た . 55172 
だ め だ っ た 。 今 ま で は 一 発 だ っ だ の に 
. 面白 そ うな ゲー ム な の で 早く 《 や り 5 
Jep СУС EE A 


テー プ の 中 味 を 
直接 読み 取っ て … 
黒田 圭一 


@MADE OF BLOCK, バト ルフ ィ ー 
ルド S1 は 成功 .、 カ ジノ スロ ッ ト , 
SNIGHZER は 失敗 . 

プレ イヤ ー : テク ニク ス 
デッキ ビク ター 

成功 し た も の は どちら も 一 発 で OK 

どなり まし だ あか 5 カジ テロ ゲト 。 

SNIGHZER は どちら も 普通 の 方 法 で 

は だ めで し た . 前 者 は いつ も 同じ 所 で 

DEVICE І/О ERROR が, 後者 は た 

ま に Founmd す る だ け で まっ だ た だく メモ リ 

に 入り ませ ん . そこ で , テー プ の 中 味 

を チェ ッ ク せ ず に メモ リ に 直接 スト ア 

する プロ グラ ム ( マ シン 語 ) を 作っ て メ 

モリ に 配置 し た あと ,、 モニ ー タ の TT コマ 

ンド な ど を 使っ て 必要 な 所 だ け を 取り 

出し , 多少 直し て 動作 し まし た . 

手 で 入れ る より は と て も 早い で す が 

か な り 苦 労 し まし た だ た. SNIGHZER の 

レコ ユ コード の 音 は 他 の と 比べ て に ご っ て 


いま す . し か も 最後 の 所 で 急 に クリ ア 
に な が っ た だ り し て いま すさ れ ば は プア ン 
ー ト を 作る と き の ミ ス だ と 思い ます . 


レコ ー ダ は 低 目 に 


牧 一 郎 


パパ イオニア SA-76001II 
・ フ パイ オニ ア PL-340 


ULTAN 
@7 x: 
ж = 


レコーダ ゲ ダ に NPC РС- 
6082 
IVETTE Р Са: CZ 
ー マ ル ・ タ イグ ) 


ソノ シー ト の レベ ル は や や 低 目 に 録 
音 き れ て いる よう な の で , デッキ の 録 
背 レ ベル を 高 目 に し ます . そし て デー 
タ ・ レ コー ダ ' で ロー ド す る と き は や や 
低 目 と し た 方 が 良い よう で す . 3 回 目 
に 成功 し まし た . 600 ボ ー が 良い よう 
で す . 

3 月 号 PC-8801 シ リー ズ の The Jail 
は まだ 成功 で きま せん . 1,200 ボ ー は 難 
し い の で し ょ うか . 


ゴミ や ホコ リ を 
よく (取り まじ ょ う 

垣 木 FH 
@ULTAN 


@ プ レイ ヤー : ナシ ョ ナル SL-N5 
デッキ : 東 芝 BOMBEAT727 
デー タ ・ レ コー タダ: サン ヨー MR 
-33DR 

ソノ シー ト を LP に は りつ け ( テ ー プ 

で ),、 よ く 〈 く ゴミ や ホコ リ を 取る . 取ら 

な ui に 。 バチ タッ チッ と いう 音 が 入っ 

Те SLEI CD. カセ シッ ギュ * 

デッキ の ヘッ ド ホ ン 端 子 か ら デ ー タ ・ 


カセ ッ ト ・ デ ッ キ の 音量 を 最大 に し, 
デー タ ・ レ ュー ダ の PHASE ボ タン を 
押し て な て.、 ロ ー ド する と きる は 
PHASE ボ タン を は ず し て する と 簡単 
に ロー ド で きた だ ただ. テープ は 高級 品 を 使 
っ た 方 が いい . 


また , PC-8000 シ リー ズ や 他 の 機種 の 
プロ グラ ム を 付け て / 


成功 ノ 
山浦 信 一 
WULTAN 
プレ イマ ヤー : PS-F3 
デッキ (ラジ カセ ャ ) : ソ ニー CFS- 
W600 


再生 に は NEC PC-6081 
グラ フィ ッ ク ・ イ コラ イザ ー を 適当 
に いじ り 録 音 し た 結果 , 成功 し まし た . 
実は 明日 , 県 立 の 入学 試験 で 今日 は こ 
ん な こと し て は いら れ な い の に , つい 
つい …( 僕 は 中 3). 

僕 の 希望 し し て は , プラ ネッ ト ・ タ 
イザ ー を ぜひ ソノ シー ト で や っ て も ら 
いた い ( プ ログ ラム が 長く 途中 で や め 
た 人 も 少な く て は な いと 思い ます ). 
途中 まで だ が ゲー ム に は 
さき も つか えな か っ た 

80O1 mkII ユー ザー 
@ULTAN 
デア ンプ: Lo-D НСА-4580 

デッキ : Lo-D D-610 

プレ イヤ ー : 名 前 は 知り ませ ん 

Sm ЖР ーー サヨ ーー МК 

-11DR 
⑳ デ ッ キ は 6 年 以上 た っ た だ も の で , 7 
レイ ヤー は も っ と だ っ て いま す . 
初め ゆあ は た ぶん で き な い だ ろう と 思っ 
て いま し た . 9801 で 9801 の 100m を ロ 


=k РС-80002/'/— А 


レコ ユー タダ の セー ブ の 端子 へ 直接 つなぎ , 


これ か ら は ソノ シー ト は 袋 に 入れ て 。 


グラ イコ ョ を いじ っ つて いた ら 


も し そう で な か っ だ ら す いま せん で し 
г, これ が ら も ソノ シー ト に 期待 し ま 
す . 


ー ド し た だ たら エ ラー が た だ くさ る ん 出 て いた だ 
の で あき ら め か け て いま し た . 普通 の 
レコ ユー ド の 上 に ソノ シー ト を 置い て 10 
回 以上 や っ て エエ ラー を 一 つも な バ て せ ロー 


ド で きま し た . 

GOO ボ ー の 方 が うま くい く 
ma・MAISON 

ULTAN 

@ プ レイ ヤー : テク ニク ス SL-D3 


デッキ : テ クニ クス RS-M250 
アデ アンプ パテ クニ クス SUrV44 


デー タ ・ レ コー ダ : МЕС PC- 
6081 
⑲@VU メ ー タ ー の 十 2dB を 越え な いよ 


うに 調整 し まし た だ た (M250 は FL ピー ク 
だ か ら あ わせ や すい ). ド ルビ ー, 
MPX フ ィ ル ター は OFF, アン プ は サ 
プ ソ ニッ ク ・ フ ォ ィ ル ダー を ぞ を かけ 。 ベッ 
F の も うに し 、 に で を あき まあ の: ソ メ 
シー ト は ター ン ・ テ ー ブ ル に セロ ・ テ 
ョ ーー では も つけ は まし た こ ご た た シン 
ョ ーC-V46) に 4 回 鍼 詩 し, АИС 
功 し まや だ 。 ロ ー ド レベ ル は 10.。 や は 
り 600 ボ ー の ほう が うま くい きま す ( こ 
の 前 の Type Lesson は 失敗 し だ). や 
は り 人 有力 し な いで す で 遊 ぶる と いう の 
は いい で すね (明日 は テス ト だ っ つ 一 
に つい 放 を て し まっ だ た だ)。 


グラ イコ を 使え ば いい 


M. ほ 

ULTAN 
@ プ レイ ヤー : ケン ウッ ド P-7C 

デン で ケシ リツ リツ ッ ドド As 

デッキ : ケンウッド Х-ТУС 

グラ イコ : ケンウッド СЕ-700 

デー タ ・ レ コー ダ <:NEC РС- 

6082 

テー プ : マク セル XLII 
9 グラ イコ を 持っ て いる 人 は グラ イコ 
を 使っ て 録音 し た 方 が よい で し ょ 25. 
テー は な る べく 良質 チープ を 使う と 
іс, グラ イコ の レバ パー は 。 プロ グラ 
ム の 入る 1K と 2K を 最大 まで 上 げ , 4 
の 他 ( と くに 32Hz) は 最小 まで 下げ る . 
こう し て 録 剖 する と 。 ば ほ ょ たん た だ ど ロ ー ド 
で きる . な お 。 ソノ シート の ホ ュ コリ は 
きれ い に 取 っ て お くく こと 。 


プレ イヤ ー か ら 直 接 で 
O.K. Z 
小川 | 直樹 


ФСНАКО NYAN, ULTAN 
ステ レオ ・ プ レイ ヤー( ご くく 普通 の 
も の ) 
イヤ ホン (ヘッ ド ホ ン ) 端 子 付 ラジ カ 
e 
⑱# ず ステ レオ ・ プ レイ ヤー を ラジ カ 
も に つなぎ , CMT ケ ー ブ ル の 自 い や 
っ を ラジ カセ の イヤ ホン の 所 に つなぎ, 
音量 を 最大 に し て や っ て みた ら 1 回 で 
ҚОЛЫ, N E U aE ED 
か ら よ り 直 接し た 方 が 良い と 思い ます . 
ソノ シー ト に し て ほし い ぃ い ブ ログ ラム 
3 月 号 の パリ ッシュ か , 4 月 号 の ゴー ス 
ト ギ ャ ザー. これ か ら も 2 枚 組 で (で き 
れ ば 3, КН), や っ て いっ て は ほしい 
рая. 


ヘッ ド ホ ン 出 力 で 成功 ./ 
TAIGO 
@ULTAN 


@Lo-D 4CH ステ レオ S-6 
パソ コン 界 の シー ラカン ス ( 古 い が 
まだ 生き て いる )PC-8001 は , 600 ボ ー 
と いう 遅 き だ が , 信頼 性 は ピカ 1 で す . 
今回 も 一 発 で 読み まし た ,。 早い ば か り 
が 能 じ ゃ な いと 思い ます . 


パン レコ : 


ン D り 大 成功 ! 


1 回 で ロー ド O.K./ 
MUSHA 
@Mole 


プレ イヤ ー : 機種 不明 の 安物 
カセ ッ ト ・ レ コー タダ : サ ザン ョ ー 
MR-U4 
@ 連 よ (1 回 で ロー ド す る こと が で き 
まし に だ ЖУУРАТ УОТ, 
少し 心配 で し た が , な ん と か で きま し 
7: 


ポ ボーレート を 変更 し て … 
畑山 純男 
(1 — 


⑥ プ レイ ヤー: パ イオ ニア PL- 
1050B( カ ーー トリッジ: オー ディ イオ 
テク ニカ ) 
デッキ : オ ー レ ックス Х-55Ар 
(アン グ : ト リオ KA-5100) 
デッキ の ボリ ウム は 最大 レベ ル で 録 
音 し アド レス は OFF. チェ ッ ク サ 
ム ・ 王 ラー が 措 て だ めで し た ). もこ で 
読み 取り の ボー レー ト を 上 げた 結果 うぅ 


I= P PC-5000 シ リー ズ 


на Gum Gum World 


レコ ー ド が 切れ た の で 
ちょ つと お か が し く な っ た 
謎 の T.Y 
Ө: 5 2м. 7- мк, スク ロー ル ・ 
スネ ー ク II, ガム ガム ・ ワ ー ル ド 
ミラ クル ・ ワ ー ル ド と スク ロー ル ・ 
スネ ー ク II は 完全 に 成功 し まし た . 
рм, ガム ガム ・ ワ ー ル ド は レコ ュー 


ド が 少し 切れ て し まい , セロ テー プ 
で 裏 を と め ま し た . その た めか 。 主 


人 公 が 動か な いと いう 事態 が 起こ っ 
детін бе ЗЕД 
@ ス テレ オォ : DCW-M20 
デー タ ・ レ ュ コーダ : PC-DR311 
9 私 は レコ ュ コーダ か ら 直 接 カ セッ ト に ダ 
ピン を に じ 72, 
ソノ シー ト で 供給 し て ほし い ブ ログ 
ラム 
プロ グレ ス 。 PiO な ゲー ム 。 Ес? 
ログ ラム 
入力 し 直し た 
越智 崇 展 
@Gum Gum World 


プレ イヤ ー: テ クニ クス SL- 
1500mkII 
アァ アンプ: ヤマ ハハ СА-100011 
デッキ : パ イオ ニア CT-720 
だ だ し Rch の み 録 音 する. 
9 半分 成功 . ソノシート を 本 より は ず 
す と き に な ん と ひび が 入っ て し まっ た 
の だ 。 これ で は だ め だ ろ うし と 思っ た が 
裏 に テー プ を は りつ け 平 に し て 録音 し 
K. や は り 5 結果 は 悲惨 な も の で PC に 
入れ る だ びに TR エ ラー, 逆 相 に し て 


や っ と ロー ド 成 功 、 し か し ,。 リス ト は 
減 茶 苦 茶 で あっ た . し か し 30 分 程度 で 


打ち 直し , 今度 は E モ ニタ で マシ ン 語 


を 読み 込み 。 これ は すなお に 行なえ た . 


皆さん 取り 外す と き は 充分 に 注意 し よ 


普通 に ロー ド し て O.K./ 
鹿 間 幸弘 
The Jumper 


@ ス テレ オ : ト リオ SV-5J 


ТЕРЕ MZ-2200/2000/80B 


оле 1, 
ГОРЕЛИ 
テー プ は ご くさ 

vF PE : 更 すれ ば 案外 うま くい 

か も し れ ま せん よ 。. 


コン ボ ポ の 場合 は 

ヘッ ド ホ ン 端 子 か ら … 
松原 博志 

Ө=—// 


プレ イヤ ー : パイ オニ ア PL-X7 
た シュ イオ ЖАУ. А-А 
レコ ーー タダ ング ナオ サミ ES эй! 

仙 供 給 し て も らい た い プ ログ ラム 
機種 を 問わ ず 過 去 の PiO な ゲー ム . 
技術 的 と いう 程 の も の で も あり ませ 

ん が , プラ イベ ー ト (私 の で す ) と か , 
リバ ティ と か の 同一 系 列 の コン ポ で す 
と アン プ か ら デ ッ キ へ 行く 際 に 音量 レ 

ベル を 自動 調節 し て し まう の で , アン 

プ で 音量 を 上 げ て お いて , ヘッ ド ホ ン 

端子 か ら 別 の テレ コ に 落と せ ば , グラ 


イコ な ど 使 わ ず に も で きる と 思い ます . 


に ビー ガー が ら 
引っ 張っ て き て も OK./ 
PC-6001SR 


ミラ クル ・ ワ ー ル ド 。 スク ロー ル ・ 

スネ ー ク II, ガム ガム ・ ワ ー ル ド 
@ プ レイ ヤー : ソニ ー Р5-4750, + 

ジョ フツ Е5-321 

アン プ : ソ ニー TA-4650 

деу s ER A FD ра о 

4300SD 

デー タダ ・ レ ユー ダ : PC-6082 
…9 山 方 と も 1 回 ビロード で きた だ た. ソニ 
ー の デレ ピオ ヤーン 圧 が で こま こし て ふい 
だ た の で 下 に レコ ー ド を 置い て か ら や り 
まし だ た だ. ナシ ョ ナル の 方 は , 10 数 年 前 
の 半分 お な も ちゃ の で し だ . 出力 端子 が 
な い の で 強引 に スピ ー カ ー か ら 引 っ 央 
っ て き て や っ て も 1 回 で 成功 し まし た . 
録音 レベ ル は 真ん中 ぐら い . 
ロー ド ・ レ ベル で 
調整 する の が 一 番 

チェ ンジ ング ・ ヒ ー ロ ー 


⑳ ミ ラク ル ・ ワ ー ル ド 。 スク ロー ル ・ 
スネ ー ク II, Сит Gum World 
ミラ クル ・ ワ ー ル ド は 1 回 で OK 
で し だ 。 スクロール ・ ス ネー ク II。 
Gum Gum World は マシ ン 語 数 バイ 
ト 違 っ て いた 他 は な に も な か っ た . 
@ プ レイ ヤー : シャ ー プ  RP-3R 
コン ポポ : シャープ GX-3R 
デー タ * シュ コー タダ PC-6082 
⑧@ レ ベル は 0 の と ころ に 合わ せ , ロー 
ド ・ レ ベル を 調整 し な が ら や っ て み ま 
LR. 録音 レベ ル を 少し 高め に し て , 
ロー ド ・ レ ベル を 調整 する の が や は り 
いい の で は な いで し ょ うか . PC-6001 
用 の プロ グラ ム を も っ と (ゲー ム 以 外 
も ) / 


КО > — ЭХ Ж. ж 


テレ オ か ら レ ベル を 大き くし て 録音 し 
ОА ЧРД ононе а デー タダ タ ・ 
LTS EE 次 通 に た ロード し た と 
ころ , 一 度 で 成功 し まし た . この 企画 
は 非常 に よい と 思い ます . 介 後 も FP- 
1100 用 の プロ グラ ム を よろ し 〈 く お願い 
L-.2 32 


と ы у iz agag aan Ға? бека. 2 


同時 録音 . ノ 


FP-1100 の メン テ ナ ン ス 
OTHE JUMPER 
プレ イヤ ー: ダ イヤ トー ン DP- 
300 
PATE AN 
EXTRA 
デッキ : ア カイ GX-F44R 
デー タ ・ レ レコーダ: サン ョ ー МВ 
-11DR 
@ 私 の 場合 成功 例 に な ら っ て プレ イ 
ヤー に は EE ビシ 


AU-D607F 


ノシ ー ト を 載せ て , ホコ リ を 良く 取り , 


アン ププ から デッキ へ 人 入っ て いる REC 
の ピン プラ グ (L 側 ) を は ず し , ЯН 
ー ド を 使っ て デー タ ・ レ コー ダ と 
REC の ピン プラ グ (GR 側 ) を その まま デ 
ッ キ 側 に 片 チ ャ ン ネ ル 人 入力 を 与え て 同 
時 に 録音 し まし た . と ころ が “ロー ド 
の ヒン ト " に 書い て あっ た デー タ ・ レ 
コー ダ ' を 使っ た 方 が 良い と いう の は 。, 
私 の 場合 で は 違い まし た . カセ モッ ト ・ 
デッキ の 方 が 良かっ だ の で す . な お を 
の 時 の 録音 状態 は , 75 О йем 
ル を 十 3VU に な る 様 に セッ ト し (フイ 
ズリ ダク ショ ン な し )。 デ ー タ ・ レ ュ コ 
ー ダ の 方 は MR-11DR の 横 に つい て い 
る スラ イド ・ ス イッ チ を 真ん中 に セッ 
ト し て モニ タ し な が ら 録 斉 し まし た . 
希望 ホコ リ が つか な いよ うに カバ ー 
を つけ て は ほしい. 
1.200 ボ ー で も 大 丈夫 ? 
高塚 佳 延 
QF- Sy 
Жақа а - 
OR SLUR ap a= МК 
-33DR 
カシ オォ FEP-1100 用 の プロ グラ ム ( 大 
き な も の ). 


шш 2 - 
高橋 益 和 
デッド ・ ヒ ー ト 


@ プ レイ ヤー : Lo-D HT-L55 
デッキ :Lo-D FT-J3 
デー タ ・ レ ュ コーダ: 日 立 TRQ- 
1500 
チーズ АУА 222 
@FM-7 用 ソノ シー ト を 増やし て 〈 だ 
O, 何 回 も 取り 直し た ら で き た . z 
シン 語 部 分 の エラ ー が 多かっ た . 


ソノ シー ト が 柔らか すぎ る 


飯島 良行 
⑱ デ ッ ド ・ ヒ ー ト 
@ コ ロム ビア SR-K10 


デー タ ・ レ コー タダ : サン ヨー MR 
-11DR 
アド ベン チャ ー な ど を や っ て は ほ しい. 


音 の 高き は どれ も いい と 思い ます . v 
АӨЖ, ツノ シー ト が 和 柔らか すぎ ます . 
ちょ っ と 曲っ て いた ( 傷 が あっ た ) と こ 
ЫС, 針 が へ ん な と ころ へ 行っ て し ま 
ФАРС; 


FM-7 用 は PHASE, LEVEL, 
LEVEL FIX を いろ いろ 変え て 10 回 は 
Ретов СРО ТЕРУ 
用 は LEVEL6-10 の 間 で は どこ で も 
ロー ド で きた (1200 ボ ー で も いけ そう 
74). 


ソノ シー ト を テー プ で 
固定 し て 成 功 ノ 


The Jumper 
Ө プレ イヤ ー: シャー ジ OPTONICA 
SM-1400 
アン ププ: シャ ー ジ OPTONICA 
КР-1400 
デッキ :NEC PC-6081 
ター ン テ ー ブ ル の ゴム の 台 を 取っ て 
ソノ シー ト を セロ テー プ で 固定 し, Жж 
コリ を 取っ て か ら や っ て み ま し た . 
FP-1100 は POKE&H724D, &НС9 
に よっ て RW エラ ー を 和 無視 る せる こと 
が で きま す . だ か ら 「 機 械 語 の ブログ 
ラム を エラ ー を 無視 し て ロー ド し , $ 
ЕСТауФТЬТГИ?ТІ たい うこ 
が で きる の で , 1200 ボ ー ザ で 機械 語 の 
プロ グラ ム を お 願い し ます . 


録音 レベ ル は メー ター 
一 杯 に ./ 

| 大 江 慎 司 
⑯ ザ ・ ジ ャ ン パ ー 


@ プ レイ ヤー : パイ オニ ア PL-260 
TITZ: パパ イオ ニア SA-7900 
デッキ : パ イオ ニア СТ-970 
レコ ー ダ ・ ソ ニー ТС-1313 
テー : ノー マル 

楽勝 で す よ . 先ず ホコ ュ リ を 取り 除い 

Т, アン グ の SUBSONIC( ソ ノシ ー ト 

の ゆがみ に 対処 ) を ON と し ます . 録 

音 レ ベル は , メー ター 一 杯 に し ます . 

これ を , FP に 継い だ デー タ ・ レ ュー 

ダ で 出力 最大 で 録音 し て 終わ り で す . 
ちな み に 後 で 気付 いた の で す が , К 

ルビ ーON で 録音 し て ドル ビー な し の 


It’s a 


レコ ュー ダ で ロー ド し て いた の で す 。 


これ で も 一 発 で OK な の で す . 問題 は 
レベ ル と ゴミ だ け で す . 所 要 時 間 は 10 
分 と か か り ま せん で し た . Жіп» 6 1 
も っ と 長い の を お 願い し ます . 


音 を 大 きく し て 録音 


ALFEEBE A 

@Super Ball, 3 D-Dual Ball, Dead 
Heat 

@ 使 用 機材 は プレ イヤ ー, アン プ , х 
ピー カー の 一 体型 で ビク ター の 製品 
だ が 20 年 以上 前 に 父 が 買っ た 品 な の で 
製品 名 は わか り ま せん 。 ラジ カセ は ナ 
ショ ナル , RX-F3 を 使い ライ ン 入 力 で 
録音 し まし た . テー プ は クロ ー ム を 使 
いも し だり 
ソノ シー ト は へ ヘナ ヘナ し て いる の で , 
いら な い LP な ど に 固定 させ て 安定 き 
せ た 方 が いい と 思う . Dead Heat は Ж 
が 小さき か っ た の で , 友人 の 家 に ある ダダ 
ブル カセ ッ ト の カラ オォ オケ で 音 を 大 きく < 
し まし だ. 利用 で きる 物 は 利用 し まし 
ょ う . ちな み に 僕 は ナイ コン で ,。 ЕМ 
-7 は これ また 友人 の 物 を 使わ せ て も ら 6 
まし Ad: 


皆さん お 元気 で すか ? 毎回 原稿 を 遅 ら 
せ て は 編集 部 の や さ し い お 兄 様 方 を 困ら せ 
て いる , いけ な い 快 人 お 兄さん の BASIC 
講座 その 3 で す . つい に 連載 も 中 盤 に 入り 
まし て , そろ そろ プロ グラ ム の 方 も メイ ン 
が 完成 し Gane ら し く な っ て きま す よ . 


つま きり X= INT ( RND (1) x 28)+2 
Y- TNTC KNDC2 ¥11) +2 (4480210. 


ХАУ 1-47 
(3.21 у 249%) 


の とっ. で と っ ЖТТ) 
+ TA € Bl Hf a AIL 
7 考え 3 と . ぃ uz22 わけ だ ょ . 


POPC 
| 
(бәле.. Over š. 
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て な わけ で , そこ の お 姉さん ./ RAR 
ば す と 一 生後 悔し ます よ . 
女性 PiO 読 者 の 皆さん , お 兄さん と 仲良 
くし まし ょ お . 
で は , 始ま り , 始ま り . メ / 


世の中 
点数 だ に や 


前 回 は , だ た だ へ び 君 が 動き 回 る だ どけ の プ 
ログ ラム で し ただ. さき て 今回 は Game の 要 で 
ある “ぶつ か っ ちゃ っ だ の よ ぉ ルー チン “ 
а ч まや を 

今回 の ぶつ か り で 考え られ る も の は , 1% 
な る の が つる ZEA Ue 
いう 恐ろし い 壁 と 自分 の 尾 っ ぽ で すね . 

まず は , ⑦ を 表示 る せる プロ グラ ム か ら 
考え て み ま し ょ う . 同じ 場所 に 表示 きせ て 
は Game に な ら な いわ け で , まあ ここ は 乱 
数 を 使う の が 妥当 で し ょ う . 乱数 と いう の 
は その 名 の と お り , で だ ら め な 数 列 を 作っ 
て くれ る ん で す . だ か ら ねえ, 不 規則 性 を 
問わ れる Game に は 便利 な ん で すね ( あ た 
り 前 の こと を 言っ て いる 私 ). 

さて 乱数 で 決め て や る こと は 文 と Y の 値 
で す が , この と き 求 め る 範囲 を し っ か り 考 
えて 決め て か ら や ら な いと 枠 か ら は み 出 て 
し まっ だ り し ます よ . この Game で は 壁 に 
ぴっ だ りく っ 付け て を 表示 る せ て いま せ 
A. 図 1 の 範囲 に 出現 する よう に し は ます 
(別に 深い 意味 は あり ませ ん が ). 

プロ グラ ム で は 行 番号 210 一 220 が その マツ 
出現 シー チン に な っ て いま す . 

次 に ツウ を 取っ だ と き の ス コア の UP の サ 
デブ ルーチン を 考え ます 。 と いっ て も , だ だ 
スコ ユア 用 の 変数 を イン クリ メン ト (1 加え 
る こと ) し て や っ て 表示 る せる だ け の こと 
ж: 

つま り メ イン ・ ル ー チ ン で に ぶ つか っ 
だ か を 判断 し て , それ に 応じ て スコ ア UP 
を 実行 すれ ば 良い わけ で す . し 上 ・R み た く , 
面 数 を 競う よう な Game に も スコ ア と いう 
の が ある くら いで すか ら , Game と スコ ア 
は 切っ て も 切れ な い 関 係 に ある の で せ う か 
ね (まる で , 私 と JUNKO ち ゃ ん みた だい だ … 
の わん ちゃ っ て ね /). 


=L = 
Game Over 


59509 м-9- 540 Ы, 5 1 542; жо» 
っ て は いけ な いも の に ぶつ か っ て し まう , 
つま り プ レイ ヤー が 死ん で し まう Game 
Over で T 


ВАЅІСЖЕ E] 


表 1 変数 表 ( 今 回 新しく 使う 変数 ) 


ハイ ・ ス コア 


スコ ア 
“GAME OVER" 表 示 用 
表示 時 の アド レス 計算 結果 


尾 っ ぽ や 壁 に が つか る と ダメ な わけ で す 
ね . だ か ら ツ ⑦ に ぶつ か っ だ と き と 同 じ 様 に 
判断 させ て , Game Over シー チ ン へ 飛ば し 
て や れ ば 良 じ わけ で す 。 こん な こと は あ だ 
り 前 の こと で し て , 要 は 判断 の させ 方 を 
と どう 上 手 C 考 ん る か ちい うさ を れ じ し ょ うな 
%? 

尾 っ ぽ や 壁 に ぶつ か っ た だ か を 判断 する と 
いう こと は , 反対 に 考え る と 空白 まだ は 
以外 な b Game Over に な る と も 言え る わけ 
で す . これ を る っ き の ざ を 取る ルー チン と 
重ね 合わ せ て 考え る と 図 2 の 様 な 構造 が 考 
えら ちら れる わけ で Fe 

ょ うす る に 進む で き 方 向 が 空白 で あれ ば 
無理 に ツウ を 取る ルー チン や 死亡 ルー チン 
(な ん ちゅ う 表 現 じ ゃ /) へ 飛ば すか どう か 
判断 する 必要 は 無い わけ な の で す . 前 回 も 
述べ まし だ が その Game の 内 容 に よっ て は , 
こん な 処理 の し 方 で は うま くい か な い 場 合 
も あり ます . 

以上 の こと を 理解 し た ら , 実際 に リス ト 
を 見 て 自分 な り に 解読 し て みて 〈《 く だ る さい. 
リス ト の 横 の 部 分 に 簡単 な 説明 を 付け て あ 


РЕМ Ж ¥ Snake бате % 97% 
КЕМ Я For “РІО Reader. 

КЕМ x 1985 3/27В 

КЕМ Хх Ву. беітикКаіј іп 

РЕМ ЖХҰХХХЕХХХХХХХХХХХХХХХХХХХЯ 
КЕМ し ょ きせ っ Zs 

じ LS iCEHNSULE 0, 1,0,0 

19 DIM AD( Z56} :H=9 

11 РЕМ し ょ きせ っ て Lin 572 


соу ләш н 


20 S=0:AD=&HC310 : Р=0 : C=&H14:A=32 


sK=1:L=5:;F0OR 1=0 TO 255 
34 Ар‹1) =xHC3FF :МЕХТ:ҒОК I=0 ТО 
_:А0<1) =AD :МЕХТ 


り ま す の で , そん な に 難し く は な いと 思い 
ます よ ( 無 責任 だ に ゃ や ー て か? ). 


演出 


これ だ け で Game 本 体 は 完成 し て ます が , 
何 か 物 足り な いと 思い ます よね . そお ぢ です, 
Game を 盛り 上 げ て くれ る 効果 音 と か の 演 
出 チ ッ ク な 所 を 忘れ て は いけ ませ ん ね . < 
れ に より 少し は (?)Game が 生き 返っ て 見 
える 場合 も ある の で すか бз, 

この プロ グラ ム に も , お まけ 程度 の 音 と 
か 文字 表示 演出 を ほど こし て あり ます が , 
効果 斉 は や っ ぱ 自 分 で “あー で も な いこ 一 
で も な い ”" と いっ だ で あい で 作っ て ゆく の 
が 望ま し いで すね . 私 み だ た いな ワン パタ ー 
ン な 物 の 考え 方 し か が できない 人 に な っ て し 
まい ます か ら ね . 

次 回 は こう いっ た 演出 効果 的 な も の を , 
タイ トル 表示 を 例 に あげ て いく つか 紹介 し 
て み ま せ うか ね .。 


今回 も また , まとまり の な いま ま 終 わっ 
て し まい そう で す に ゃ あ 。. 


スネ ー ク ・ ゲ ー ム BASIC リ スト 


ТЕРИТЕӘТІТе を る ЖТ 
D ° +... Z 

ほお 言葉 も 出 な い 程 感動 きれ まし た だ か / 
私 は と っ て も うれ し いよ う . あと 連載 も 残 
す と ころ 3 回 と な り ま し た が , 数 少な い 私 
の ファ ン の 皆様 の た め に も , 頑張 り ま す . 
De ふーん ? 

д? それ で は 来 月 も まだ 会 いま は せ う ね . 
協力 : JUNKO% ihik. 


€> cC 212 V.. 


138 IF ñ=%H81 THEN 6GOSUB 2й00:50Т 


メイ ン ・ ル ー 
チン で す . 前 
回 を 見 て くだ 


0 58 
144 SOTO 2340 
199 REM 


ここ て 空白 を 判 


@p PE Dl.” o 
さい . 200 PLAY "=1B8m1880t255ošab" : S=S+ 
1sLDCRTE 11,15:РКІМТ Si 


«Ойл. この と 
き 尾 っ ぽ の 長 さ 
も 増え る が 長 さ 
は 256 以 上 に は 
な ら な いよ うに 


断 し ます . 218 X=INTCRINDC 19 #282 +2; Y=INT (END する . 


ー も し ひな ら ば ば 行 
200 か ら の スコ ア 


>”. THEN L=L+1 
—“2 Ë C $ # (O 240 RETURN 
で も な い . つま 299 REM 
り プ レイ ヤー は 


(12Х110%2:Рх-ыНС 20 йы СҮХЗ2 > 
220 IF РЕЕК(РХ:<>32 THEN 210 
UP サブ ルー チ 238 LOCATE: Х,Ү:РРІМТ"Ф":ІР 1<256 


残念 で し た . の 
曲 が 流れ ます . 

| GAME OVER 
の 文字 表示 . 

ー ハ イ ・ ス コア の 


け ^ も Kalk Ф в 判定 . 
394 ロロ ま =" AME OVER" :PLAY "51 1m ツ gg 


| 画面 表示 (レイ 
48 GUSUB 400:РОКЕ AD,&H14:GOSUB 死亡 し た の で あ アウ ト ). 

218 っ た . 行 300 か ら 
49 КЕМ Wu る ぅ ちゃ の Game Over RINT МІОФСОФ, 1,1) :РОК J= ニ 9 TO 880: 
50 G ま =1NKEY 生 : IF 6#*=CHR$#$(%H1C) ТН ルー チン へ . NEXT 

ЕМ P=1:C=&H14 < スコ ア UP と 表 320 NEXT 

68 IF G#*$=CHR#(%&H1D) THEN P=-1:C= 示 と 効果 音 で す 。 230 IF H<S THEN Н=5 

&H13 X と Y の 値 か 340 FOR 1-0 TO 500:NEXT:GOTO 20 

78 IF G ロ ま = ヒ HR ま も (HI1E) THEN Р=-32:С ら V-RAM の 399 REM hka 

=&H11 アド レス を 計 499 CLS 

Sd IF бФ-СНЕФМНІЕ) THEN P=32:C= 算 し て その ア 414 PRINT “--------ӘпаКе.бате- 
«Н12 F レス の 内 容 š 

99 IF P<>0 THENASPEEK(AD+P) が 空白 で な け 
199 POKE AD,&H23:POKE Ар+Р,С:Ар= 
ñD+P :POKE ADCK) 32:ADCK) =AD:K=K+ X Ë Y を 決め 
1 u 

118 IF К-і. ТНЕМ ド =1 5. 

120 IF ñ=%&H20 THEN 50 


0%25503с4..с4с4с24%д4асс02Ь03ес." 
310 FUR 1=1 ТО 9 (ОСАТЕ 10%1,8:Р 


ӨШ. ; 
420 FOR Ізі TO 13:РВІМТ" |" ;5РС‹3 
れ ば も うぅ 1 回 @> 3" 1" ЕМЕХТ 


434 PRINT " ヒーーーーーーーB ビ ッ .Beimukaij 
іп-----і"; 


440 PRINT "Н:";Н;" 6:4 ВЕТМЕМ 
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ちまた に は , か な り の 種類 の マシ ン 語 解 
説 書 が 出回っ て お り , 簡単 に 入手 する こと 
が で きる よう に なり まし た 。 し か し , 専門 
の 先生 方 が 書い て いる せい か , 概して 難解 
で と っ つき に くい 内 容 の も の が 多い よう に 
思い ます 。. 

そこ で , 本 講座 で は 小生 の 経験 を 生か し 
て , それ ら の 書物 と は 違う 角度 か ら マ シン 
語 に 迫っ て みた いと 思い ます . 内 容 的 に は 
難し い 理 論 等 は サラ ーッ と 流し , 必要 な 事 
柄 の み を 実践 面 か ら 習 得 し て いく と いう や 
り 方 で , 例題 を こなし て いく こと に よっ て 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 
A 
B 
C 
D 
Е 
F 
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マシ ン 語 の 具体 的 な アプ ロー チ の 仕方 を 身 
に 付け て いっ て ほし いと 考え て いま す が … 
な ん ちゃ っ て … 早 い 話 が , 皆さん に も マシ 
ン 語 で の ゲー ム 作 り の 楽し さ を 味わっ て も 
DoT, 仲間 を どん どん 増やし た いと いう 
RTH. それ に , マシ ン 語 は パン コン の 頭 


脳 で ある CPU と は 第 一 種 接近 の よう な 非 
常に 近い 間柄 な の で , CPU の 基本 原理 を 
知る に は マシ ン 語 を 勉強 する の が 一 番 と い 
RET. 

BASIC を ちょ こっ と か じ っ た だ け で , 
パン コン を 押し 入れ に 厳重 保管 し て し まっ 


акан 

a as 
は , まず マイ コン の 中 身 を 知ら な く て は な 
り ま せん . 


図 1 は 概略 を 示し た も の で , CPU 
(Central Processing Unit) Іў ЛТ А 
ば 脳 の 思考 部 分 に 当たり , 直接 デー タ を 処 
理 す る 部 分 で す . まだ メモリ は を その 名 の と 
в б, 脳 の 記憶 部 分 に 当たる も の で 各種 デ 
ー タ や プログ ラム が 保存 され ます . 外部 と 
の デー の 下 り 9 とり.《( だ と えば 。 プリンタ 
へ 印字 デー タ を 送る ろ る とか, フロッピ ー デ ィ 
スク か ら デ ー タ を 読む と か ) は I/O ポ ー ト 
を 通し て 行なわ れ ま す . この 部 分 は 人 間 で 
いえ ば , 見 た だり 聞い だ たり し だ 情報 が 入っ て 
くる と ころ で す . そし て , それ ら を 継い で 
いる の が バス と 呼ば れる 母線 で す . お お ざっ 
ば に 言え を ば こん な と ころ で す が 。 それ で は 
も う 少 し 詳し 〈 く 見 て いき . ま し ょ う 。 CPU 
は 大 きく 分 け て 図 2 の 各部 分 が ら な っ て い 


# Ў. 

< 

ジス タ 

レジ スタ は デー タ の 一 時 置場 で , 21 

ロッ カー の よう な も の し と 言え ます . 演算 部 
は デー タ の 加工 する 部 分 , アキ ュ ム レー タ 
は 加工 後 の ゲ ー タ を 一 時 蓄え て お くく 部 分 で 
+. そし て , それ ら の 動き が 連係 プレ イ を 
する よう に コン トロ ー ル する 指令 を 出す の 
が , 制御 部 の 役目 な の で す . 


ヽ 


た アナ タ … マ シン 語 を ちょ こっ つっ と か じろう 
と し た だ け で て, 腹痛 を お こし た アナ タ …。 
あな た の パン コン に は Z80 と いう すご い 性 
能 の CPU が 載っ て いる の で す . あな た が 
苦労 し て 入手 し た パソ コン は , 一 昔 前 は 企 
業 が 苦労 し て 入手 し た コン ピュ ー タ と 同 程 
度 の 性 能 が ある の で す . 骨 ま で し ゃ ぶっ て 
や ら な いと も っ た な いな と 思い ませ ん か 2? 

さあ , まず 最初 は C じ PU の 中 を 覗く と こ 
ろか ら 入 り ま し ょ う 。 


これ だ け の 機能 を ひと つの 1IC に 封じ 込 
め だ も の が 1 チッ プ CPU と 呼ば れる も の 
С, 18080, 280, MC6809 な どか な り の 種 
類 が あり ます . どの CPU で も 制御 部 に は 
暗号 解読 器 を 持っ て なり , 逐次 暗号 を 解読 
し て は 作業 を 指示 し て いき ます . この 暗号 
се», これ か ら 皆 さん が 学ば うと する 
“マシ ン 語 " その も の な の で す . 


XE 


メモ リ に は , ROM (Read Only Mem- 
ory) と RAM (Random Access Mem- 
ory) の 2 種類 が あり , 用 途 に よっ て 使い 
わけ られ ます . ROM に は デー タ が 既に 書 
き 込 まれ て お り , 消 減 す る こと は あり ませ 
А, 電源 が 入れ ば すぐ BASIC が 起動 する 
28y コン は , BASIC が ROM に 書き 込ん で 
あり ます . それ に 対し て , RAM は デー タ 
の 読み 書き が 自由 に で きま す . 当然 , 新 し 
い デ ー タ を 書き 込む と 古い デー タ は 消さ る れ 
て し まい ます : 


この ROM と RAM の 関係 は ちょ うど レン 
ネー ド と えー ブ 人 よう な も の. と ВА ます 、 
だ だ ひと つ , テー は 一 度 録 音 す る と 次 に 
録音 する まで 内 容 が 残っ て いま す が , 
RAM は 電源 を 切る と 御 破 算 に な る 点 が 違 
いま す . も っ と も , 電源 を 切っ て も 内 容 の 
消 を た ん ない RAM も ある の で す が , 割高 な た 
め に パン コン に は あま り 使 われ て いま せん . 

メモ リ は だ くさ ん の 数 値 を 入れ て お く 箱 
か ら で き , 各々 の 箱 に は 位置 を 示す 番号 
(アド レス ) が 付け られ て いま す . 図 1 の 
アド レス バス と いう の は , その 番号 の 通る 
道路 で す . CPU が “1 番 の 箱 に 入っ て いる 
数 値 を 持っ て こい "と 指令 する と アド レス 


バス に は 1 番 と いう デー タ が 流れ , 1 ЖО 
箱 が 指名 る れ ま す . そし て , その 中 の 数 値 
は デー タバ ス と いう 道路 を 通っ て CPU に 
運ば れる と いう 手順 に な り ま す . 


/O ボ ー ト 


I/O ポ ー ト は 外部 と の 連絡 を 取る , いわ 
ば 空港 の 税関 の よう な と ころ で , ここ を 通 
る ず に は 外 ヘ デー タ を 送る こと も 外 か ら デ 
ー タ を 受け る こと も で きま せん . 

1/ ひ ポー ト に は 窓口 番号 が 付け られ , Z 
の 番号 と 外部 装置 ほ と は ハー ド 的 に 対応 付け 
られ で いま Ел, тте 
タタ を 送る と き は 1 番 の 窓口 と 決め られ て い 
る 場合 , CPU が アド レス バス に 窓口 で あ 
る 1 番 と いう 情報 を 送り 、 そし て デー タダ < 
ス に デリ ン 婦 に 送り だ い デ ー タ を 送る Е; 
7/O ポ ー ト 1 番 を 通し て プリ ンタ ヘ デ ー タ 
が 送ら れ ま す . この 窓口 番号 と 各 外 部 装置 
と の 割り 当て は 同じ Z80CPU を 使っ だ た パソ 
шуы, 各社 バラバラ で 互換 性 を な くし 
て いる ひと つの 原因 で す . 

以上 ざっ と 説明 しま し だ が 。 まとめ る と , 
CPU は ほし い デ ー タ の 入っ て いる メモ リ 
の アド レス を 指名 し て デー タ を 受け 取り , 
それ を 制御 部 で 解読 し て 処理 する と いう 仕 
ЖАСТЫ СБ ЕЧ ОСТ Ст, 
その デー タダ が マシ ン 語 で あれ ば , それ こそ 
CPU を 直接 制御 で きる 特別 の 暗号 だ と い 
ЭКЕУ; 


4 ЖА 
>> x 
x I 


14 


Б. Seere xo F i 


Da а, ARA ж BARA в а А а 

Иии сат r 
だ が , 私 だ ち が 通 常 使 用 し て いる 10 進 数 で 
記憶 きれ て いる の で は あり ませ ん . 0 と 1 
だ け で 表現 で きる 2 進数 で 記憶 きれ て いま 
Т. この こと は CPU 内 部 で も 言え る こと 
T, す で て の 数 値 は 2 進数 で 処理 きれ て い 
ます . な ぜ な ら , 10 進 数 を 現 わ す に は 10 個 
の 状態 (0 一 9) が 必要 な の に 対し , 2 進 
数 な ら 2 個 (0, 1) で 済む か 6 で す . こ 
の “2 個 の 状態 " と いう の は , 仮に 電気 が 
流れ る 状態 を 1, 流れ な い 状 態 を 0 と すれ 
ば スイ ッ チ 1 個 あ れ ば 作る こと が で きる だ た だ 
め に , 非常 に 簡単 な 回 路 で 実現 で きま す . 


Y 


そん な 訳 で ,。 マシ ン 語 を 習得 する に は ま 


ず 2 進数 の 勉強 か ら と いう こと に な り ま す . 


表 1 に 10 進 数 と 2 進数 の 比較 を 示し ます . 
10 進 数 な ら 9 まで は 1 桁 で す が , 2 進数 は 
1 の 次 は も う 数 が が ない の で 桁 が 上 か が っ て 10 
に な り ま す . で も , そう な る と 大 き な 数 字 
を 現 わ す と き は ,。 0 Ł 1 OROŽJU Z¿ — 
て 非常 に 見 づら いと 思い ませ ん か ? AW 
に と っ て は ミス の も と に も な り そ う で す . 
そこ で 便宜 上 , 2 進数 を 下 の 桁 か 6 4 桁 ず 
つ を ひと まとめ に し た 数 値 で 表現 する 慣習 
に な っ て いま す . 

こ 衝 だ RC NE が もり し ます 、。 つま うり ,。 
16 進 数 どす . そし て , 10 進 数 で 10 か ら 15 に 
あたる 数 値 に は 既成 の 数 字 が な い の で , ア 
м? у “Ху КОА? 6F が 代用 さる れ ま す . 
だ と えば , 10 進 数 の 10 は 16 進 数 の A と 同じ 
で す . 都合 の よい こと に , 280, 6809 な ど 
の CPU は 一 度 に 処理 で きる 量 が 8 桁 の 2 
進数 な の で , 16 進 数 で は (2 進数 4 桁 ) と 
( 2 進数 4 桁 ) の 2 桁 で 表現 で き , 非常 に 
見 易く な り ま す . 

マシ ン 語 で ゲロ グ ラミ シダ し て いる E 
この 2 進 , 10 進 , 16 進 の 相互 変換 を する 機 
会 が よく で て きま す . 表 1 の 変換 は ぜひ と 
も 覚え て , 頭 の 中 で すぐ 変換 で きる よう に 
な っ て くだ る さい 、。 


余談 で す が , 両手 の 10 本 の 指 で いく つま 
で 数 を られ る と 思い ます か ? 10 本 だ か ら 
10 ま で … と いう の は 人 小学生. 各々 の 指 を 伸 
ば し な た と うぅ を 1 。 曲 ま た と まあ を と よる と, 
これ は 正 に 2 進数 の 世界 . これ だ と , な ん 
と … (答え は 宿題 に し て お きま し ょ うか .. 
や っ て みて くだ る きい). 


今月 人 の 』 ボ ルイ ルン ルト 


ビッ ト ら ど バ イト 

〇 か 1 ガ と いう スイ ツチ 1 個 に あ だ る 情 
報 の 最小 単位 を ビ ツ ト 〈Bit) と 計 い ます . 
*16 進 数 の 1 桁 は 4 ビッ ト で ある ” と いつ うつ 
ふう に 使い ます . 

まだ , 8 ビッ ツ ト で 1 バイ ト CByte) と 呼 
記 約 束 が びあ の ます . 


10101010 


11111111 


00001 


編集 部 より 


今月 号 よ り 読 者 の 皆様 か ら 御 要望 の 多 か 
っ た , “Z80 マ シン 語 講座 が 始ま り ま し た . 
この コー ナー で は マシ ン 語 に 興味 の ある 
љо, これ か ら マ シン 語 で ゲー ム を 作っ て 


だ さい . [P| 


みた いと 思っ て いる 方 々 に 。 マ シン 語 に つ 


いて の 初歩 か ら を 説明 し て いき た いと 思い 
ます . そこ で , この コー ナー に 対す る ご 意 
見 ・ こ 希望 な ど を ハガキ に 書い て — L — 
し PiO 編 集 部 まで 送っ て くだ さい . 

また , 毎月 の 宿題 の 解答 な ども 送っ て く 
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ete? 119, 
-AÈ N 
09,2%. 


広島 県 し で ん あき ら 福岡 県 相沢 ひろ 
pA1. 簡単 に 言っ て , ほとん どの も の が 
だ めで す 。 し か し 。 一 部 の CRT は テレ ビ 用 
画面 と し て 使え を る ろ も の が あり ます . この 辺 
に つい て は , その CRT の 説明 書 を 見 て くだ 
85, だ だ 注意 する 点 と し て , テレ ヒビ ピ 用 画 
面 と し て 使え る CRT で も ,。 チュ ー ナ ー が 付 
いて いな いも の が あり ます . その 場合 は , 


CRT と は 別に チュ ー ナ ー が 必要 に な り ま す . 


A2.1/O や PiO で は コピ ー サ ービス を 行 
な っ て いま す . あな だ が 見 だ いと 思っ て い 
る 記事 の 掲載 きれ て いる 号 と , その 記事 の 
タイ トル が わか れ ば , コピ ー を 受け 付け ま 
7. 詳し いこ と は 本 誌 の 最後 の ペー ジ に 書 
いて ある 工学 社 営業 部 まで 


„Аз, 一 つ 方 法 が あり ます . その 方 法 と 
は , 今 あ な だ た が 持っ て いる パソ コン に 使用 
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RANIL C+ ма” 


% 


м 


- 
— те 
ーー 


(е 
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= ғаламы Saxa: 


静岡 県 
る され て いる RAM を , す で て バッ クア ッ プ 用 
の 内 部 電源 を 持っ て いる RAM と 交換 すれ ば 
ょ いい の で す .。 で も 現在 の と ころ 。 この よう 
に バッ クア ッ ジ 用 内 部 電源 を 持っ た RAM 
は か な り 高 価 で すし , か り に 交換 する に し 
て も か な り ハ ー ド の 知識 が な いと , 大 切な 
コン を 概して も よい ます 。: 


1 Жез 
埼玉 県 Ryo 


北海 道 迎 夢 趣 人 東京 都 グリ ー ン ベレ ー 影 丸 

ウー ン , 上 難し い 質 問 で すね . 基本 的 に は 
PiO で は プロ グラ ム で きる 機種 で あれ ば , 
どん な も の で も 投稿 は DK と な っ て いま す . 
し か し , 日 本 で 売っ て いな い 機 種 と な る と , 
編集 部 で 評価 で き ない 場合 が ある た め , FR 
用 不 採用 の 判断 が で きま せん . 

ね た こ で ここ の まう に 日 本 ぞ で 非 っ で いな い 
機種 や , 自分 が 投稿 し よう と する 機種 が 編 
集 部 に ある か どう ヵ 不 安 な 人 は , 投稿 前 に 
ハガキ な ど で 問 い 合 わせ て か ら に し て くだ 
きい. 

で も , 日 本 で 売っ て いな い 機 種 な ん て , 
いっ だ いと どこ か ら 手 に 入れ る ん で すか ? 

( T.O) 


са. 
(( は 
А 


` 


4 

東京 都 
INSTR が な いか ら と 言っ て , ま っ だく 《 作 
れ な いと いう こと は あり ませ ん . 他 の コマ 
ンド (まだ は 関数 ) で 作り 変 を た た ブロ グラ 
ム の 変更 点 を 載せ て お きま す . 

INSTR は , ここ で は CM$ の 中 の 何 文字 
目 か ら , DT$(CM) と いう 文字 例 が 入っ て い 
る か と いう も の で す の で , 1035 行 の よう に 
MID$ 関 数 を 使っ た 条件 文 に する の が よい 
の で は な いで し ょ うか 、 

MZ 系 の BASIC は , コマ ンド や 関数 が PC 
や FM な ど に 比べ る と 少な いひ ので す が , を 
の ぶん 高速 な の で ,。 な い コ マン ド や 関数 は 
ШЕСЕ» GG Ç た いう こと や っ て も 
充分 に 楽し め る は ず で す . 


(R.E) 


NSTR 変更 リス ト 


1030 F=1 

1055 IF DT ま (CM) =MITD ま (CM も ま ょ 。F。LEN(DT ま (CM) ) 
) THEN 1090 

1040 F=F+1: IF F<=LEN(CM$) 一 LEN( DT ま (CNM) ) 
THEN 1035 


① 停 止 し て いる と き 真 上 へ ジャ ンプ 
| 
| > | 


② 動 いて いる と き 進 ん で いる 方 向 に ジャ ンプ 
(スピ ー ド に よっ て 距離 S の 長 さ が 変わ る ) 


(en FM7) MONS M2ooO ~ 
30 SD 00 05 AD 9 FB FA 
39 14 СО 20 OF СО IQ 50 
4Q 4F 20 СА2С 20СЕВ2 
ЕЗ 20 38 F4 の CAC2 СА 
DE B2 20 CODE ДЕВО 21 


ERLE 12) 
(АНАТ DO THEY SAY? 


© CONTRON. 


群馬 県 こむ と ろ ん 東京 都 NEC の まわ し 者 
ye たとえば, ピン ボー ル の 球 の 動き な ど に 
は , 複雑 な 計算 が 必要 な 場合 も あり ます が , 
ここ で は も っ と も 科 単 に .。 し か も それ らし 
〈 見 せる 方 法 を 説明 し ます . 

まず 真 上 へ の ジャ ング で す が 。 だ と えば 
A と いう 変数 に 適当 な 値 を 入れ て お き , Ү 
(座標 ) か ら A の 値 を 引い た 位置 に キャ ラク 
タタ を 表示 し ます . 次 に A を デ ク リ メン ト し , 
まだ (Y-A) の 位置 に 表示 し ます .。 そし 
て A が マイ ナス に な り ,。 Y が 元 の 値 に 戻る 
まで これ を 繰り 返す と , 何と か それ らし く 


a M 
{ NN \ 


М N 
— ` 
ュ ル レ | リグ ーー 


半田 市 Nakkey 


/ бєл. 
ESTO 
EZS CS 


БУ š A N ` 1921 
人 ЧА ; : 7 
埼玉 県 TAKE 愛知 県 ルン ナ 
ジャ ング し ます . ご の 場合 最初 の A の 値 を 
変え る と ジャ ンプ の 高き が 変化 する わけ で 
す 


また 横 へ の ジャ ンプ "は , 上 の 動作 と 同時 
に 文 (座標 ) を 変化 さき せれ ば OK で す . そし て , 
その 変化 の 量 に よっ て 遠く へ も , 近く へ も 
ジャ ング 可能 に な り ま す . 

いか が で "し ょ うか *。 1  ВАСІСОРВБЕТ 


女 な ど を 使っ て 試し て みて くだ さい . 
(K.S) 


三重 県 高橋 義信 


VU VBL CT 


ж 
= 
ж 
= 


bAT マシ ン 語 の プログ ラム は , NEWL 
て も 消え を えま せん. LDL, 変数 領域 を 使っ 
て いい だり する と 。 を まこ だ け ク サチ さき さ き 評定 し 
よい ます まだ ブラ テム: ve с у гү ч 
っ て は , 部 分 的 に 書き 替え を られ る こと も あ 
り ま す の で , マシ ン 語 プロ グラ ム を 使っ て 
いる と き は , NEW し な い 方 が 良い と 思い 
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РА 2. マシ ン 語 の プロ グラ ム の セー プ ・ 

ロー ド は , RUN モ ー ド ・PRO モ ー ド の ど 

ちら で も で きま す . 書式 が だ わからない 人 も 

いる と 思う の で , 例 を 示し ます . 

ロード : CLOADM “ファ イル 名 "“ 

〇 セー ププ : CSAVEM “ファ イル 名 ” ; Z 
P Ph P FEL x, БУЕ 
アド レス 

РАЗ. ロロ だ ド に つい て も 宙 デ の 方 息 学 Е 

の TCT うい っ た こよ と は. RE RN 

くま え に ま ず 自 分 で いろ いろ や っ て みる こ 

と が 大 切 で す . (T.A) 


` 


@ 
[УУ \\ 


y> 
ぃ た 


4) ーー ニー マミ 
8 Í 2 


x MA 2! 
ルル 

ҮР A 
& ИИН 


京都 市 迎 夢 快 人 半田 市 Tomoko 


ロビ ピロ に つい いて 


p その 記事 の 中 に も 書い に て あり ます が , РС 
-1245 で "は CPG で は その まま で は 動き ませ ん . 
プロ グラ ム 自 体 は リロ ケー タブ ル な の で す 
D, 他 に も いろ いろ 考え な けれ ば な ら な い 
こと が ある の で , マシ ン 語 の 知識 が な いと 
ちょ っ と 無理 だ と 思い ます . (Т.А) 
ШЕК 
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レス を 16 進 4 桁 で 入力 し , プリ ンタ に 出力 
する 場合 に は Y を 押し て くだ さい 。 Жу? 
リス ト 表 示 中 に [SHIFT| + |BREAK | で アド レ 
ス の 入力 に , も う 一 度 |SHIFT| + 
で モー ニタ へ 飛び ます . 画面 の み の 出 力 で は 
256 バイ ト 出 力 ご と に 一 時 停止 する の で 何 
か キー を 押し て くだ る さい. 

35, モニ タ を 正常 に ホッ ト ・ ス ター ト 
きせ る た だ た だめ に , dB-BASIC で 使う と き は 
F1F0H : 52H 一 50H, F1FCH : 10H—00H 
の よう 7 に 変更 に て ん ただ さる で 。 

プロ グラ ム ・ エ リア ; Е0ООН --Е2С8Н, 
スタ ッ ク お よび ワー ク ・ エ リア F2C9H ~F 
309H, 実行 アド レス FE000H (転送 後 は を の 
先頭 ). 


MZ-BUB&S2U00O 用 


ざさ の ブログ テム ; НАКР BASIC 
WICS 共 用 で す . 

実行 きせ る と 転送 先 ア ドレ ス を 聞い て き 
i+. 転送 し た い 場 合 は アドレス を 16 進 4 


X1 用 チェ ッ ク サ ム 


シス テム に 依存 せ ず ,。 リロ ケー タプ ブル な 
Fa Sepu E sap な ムズ まま まだ だ も 、 
0018H, 0019H と 重 な ら な いよ うに し て く 《 く だ 
さき さい. 通常 は モニ タ を 破壊 し な いよ うに 18 
00H 以 降 に 置く の が よい と 思い ます ). - 桁 で 転送 し た く な い 場 合 は [CR] キー の み を 

使い 方 は S(tart) アドレス, E(nd) アド ОНЫС だ る きい 。、 БАСТАРТУ ҚУА 
нин X1 用 チェ ッ ク サ ム УАР НЕНИН 


に た は に | +Å +) +2 +3 +4 +5 +á +7 +5 +? +ñ +B +C +D +E +F шш Add 

FR 21 19 йй 56 За E? 2B SE 34 C? DF 36 FD 38 ЗЕ FD aC сооо 
ка1@ Ei Ql АЕ 02 ҒО 09 ҒО ES DD E: 31 4E @0 DD 2°? DD :АА coio 
сеге E? Ei D5 ЕО ES Еі 11 ØC 00 19 1E 04 01 ай 18 ED be COSO 
газа 5: ӨС 7E ED 79 23 .а 10 20 F2 01 03 іа ЗЕ ӨС ЕО :ҒС созо 
сй40 79” DD S? Ml GA 20 ЗЕ 07 DF 5D 62 84 20 ОС 53 02 :50 CO40 
тй50 OF D3 81 2A 43 48 45 43 ав 52 55 2р 2A 00 24 53 iD3 COSO 
Faéa DF 2С 41 ЕЗ 24 45 DF 34 21 ED 52 38 D4 7B ӨР ØF igC Coe0 
сй70 9F ӨЕ SF 7D Es OF ЗС áF 24 ОҒ 04 ав 18 СЗ DF Сі :1С CO79 
zaga 01 DF 46 81 SA 52 49 ак 54 45 52 20 59 2F 4E йй :ñil COBO 
тата ог Бі @й ЕА DF FE 59 20 A3 FD 25 iü Qi 90 31 DF :B2 Со9о 
Foc 21 22 24 10 25 23 ӘЗ 48 ES OF dé 00 El 18 ED 40 :B3 CORO 
Faso В ES (5 DF 72 21 51 44 る 4 20 00 AF DF ев 01 20 :2С СОВО 
ғаса гв ай ок 43 а: ЗС ій Ба DF SF 01 28 ЗА 53 75 ¿D :5С СОСО 
FADA йй DF SE йі 7C ОҒ 27 ñi 70 ОҒ 23 @1 1E 00 る 18 :85 соро 
SAEQ ОЕ 54 1 7E ОЕ 18 01 83 SE 23 18 F4 OF 33 01 20 Fo СОЕО 
паста ЗА 90 DF йе йі DF 4A B1 йр 20 D? 06 39 ЗЕ 2D ОҒ :DD СОКО 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


АЗС HB +1 +2 +9: #4 +® +& а? $Ü 9 жа +B «СО "+E «ҒҒ Su 
ЕТА 39 061 18 ЕВ ОҒ 387-01 DF 289 01 53 75 40 28 08 СІ ғ72 
Ғ118 ЕЗ АҒ 57 58 ES CS FS AF 86 19 00 20 FB 4F DF 18 :9С 
7120 8:2 アウ ОЕ SA Ва Fi 81 С1 ЕІ 22 10 ЕЗ DF ЕВ д0 280 С 
ғіза За ЙЁ DF CA йй D1 066 A4 DF 1А Ai 18 ЕВ ҒО ТЕ 10 :4Е 
ғіаа ВТ? СЯ 29 CE Өй ЗЕ 17 ЕО アウ D? DF IB 00 Б7 28 11 と を イス 
2159 ЕО ЗЕ 13 28 5 09 2E 97 ЕО é? СВ ЕЙ D? ЕО 77 13 “ЗА 
т:4й. СФ Ер 77.13 18 E4 ЗЕ E4 DF 12 00 AF DF OE Q0 ЗЕ :39 
Е170 Eó ОҒ 09 00 DF 18 00 ОЕ 15 00 C9 CS FS 01 01 1А :58 
Е180 こり 78 Eé ай 20 ға 05. 00 FT ЕО 79 СІ С? CS 01 61 :5Ғ 
だ に: の із ED 78 св 28 20 Ға 95 00 ЕО 78 Сі C? ОҒ A2 ай :21 
Бода 7С DF 27 Өй DF 83 ай 20 41 44 52 2E 24 48 @@ DF :D3 
ЕТЕй (4: ай E QF Өт 67 DP ас/80-Б4 67 ОҒ ӨТ 00 SEATE 
Fico OF 43 й@ C? DF @š 88 ОЕ ЗЕ 00 С? ОҒ 76 ҒҒ FE 03 ICB 
Е100 28 16 FE 30 38 F3 РЕЗА 20 ӨЗ Dé 30 С? Eé DF FE 198 
F に だ 41 38 ЕВ FE 47 30 E4 Dé 37 С? ЗЕ E4 ОҒ SBE FF ЗЕ 5С 
=1F0 52.0Е 89 СЕ ОО F? Ei 22 18 880 СЗ 03 10 FS QF OF 193 


むー ご +ї +1 +2 +3 жа +S +4 +? +8 +? +A +E +C +D ФЕ +F ご urn 
F294 aF ЯС ОЕ 43 00 Fl ES áF DF 50 ЕЕ FE ӨЗ 20 06 FD :A4 
ёз 77 13 9% 2Е FE 70 Е6 ӨЕ. BT 27 FE 18 DE СЕ DF 14,1799 
2220 00 7D Ei С? ЕО 36 10 00 ЕЗ FS TE 23 87 28 05 DF 44 
таза 09 йй 13 どる Fi ЕЗ C? ЗЕ 28 09 ЕО 79 03 09 18 18 :5F 
F249 ES CS 21 50 09 ЕО 44 12 ҒО 4E !: 99 4р 44 DF SF i4 
FASE 00 C 1 ЕІ ЗЕ 90 DF 04 00 ЗЕ йа ҒО СВ 10 OE DO CS :93 
трай 059 ES FS 15 pA 21 QA 009 Ai 61 1A ED 78 Es 08 28 :87 
т>р?0 1 と 2В 7D В4 22 Е5 16 20 Ғ2 09 С5 й1 40 SY 09 DF CIF 
F 280 ба ЕС 47 Әй 54 29 45 72 2Е 0009 СІ D? F1 18 0р :21 
гэй Ғ1 Өр 60 79 ӨС 03:16 ӨЕ ED 51 18 ЕО 51 Е} 01 Сі :?С 
EER сэ р=- өс йа ЗЕ 28 Ер 79 ӨЗ СВ 58 28 F9 С? ҒО 70 ЕЗ 
SRA СЕРТІ 1; ЄЗ Ое CID? OF pe ELT ЕЗ-<ВЕ:88:568-23752Б 
gore £3 19 ЕЗ つの C? АР S0 59 38 Өй 40 ай РЯ 44 DF SE :55 


を 入力 する と , メッ セー ジ を 出し て 再 入 力 
を 要求 し て きま す . 

転送 先 ア ドレ ス の 指定 時 に キー の み 
を 入力 する と , チェ ッ ク サ ム ・ モ ー ド に な 
E シャ ー ジ BASIC の モニ タ の D ュ ユマ 
ンド と 同様 に アド レス を 入力 も し てく だ さき - い 。 
デリ ンタ を 使わ な い 場 合 ,256 バ イト 出力 ご 
と に 一 時 停止 する の で , . 何 か キー を 押し て 
фа 

プロ グラ ム ・ エ リア : C000H ~C2BFH, 
START CO000H (転送 後 は を その 先頭 ) 

転送 不能 エリ ア : 0000Н ~ 129ЕН (SHA 
ЕР Monitor), 0000H ~ 14FFH (WICS 
Monitor), FD41H ~FFFFH, 転送 前 と 転 
送 後 が 重なる 場合 . 
注 1 : アデ ド レス 入力 時 に [BREAK| キー 入力 
で モニ タ ・ コ ユー ルド ・ ス ター ト . 
注 2 : チェッ クサ ム 表 示 中 , キ 
ーー 入力 で チェ ッ ク サ ム の アド レス 入力 待ち 
に 戻る . 
注 3 : C02FH, C030H の 2 バイ ト を ワー ク ・ 
エリ ア に 使っ て いる の で 自分 自身 の チェ ッ 


クサ ム を と る に は 注意 が 必要 . 


| MZ-80 &2000 用 жена 


チェ ッ ク サ ム ・ プ ログ ラム 掲載 号 , 掲載 予定 号 PC-6001/mkIL/6601,Jr. 用 85 年 4 AS 85 年 9 月 号 FM-7/8,LEVEL3, MZ-700-K/C 用 "85 年 5 月 号 "85 年 10 月 号 
X1,MZ-80B&2000 用 "85 年 6 月 号 "85 年 11 月 号 PC-8001/mkII /8801 用 "85 年 2 月 号 "85 年 7 月 号 PASOPIA/FP-1100 用 "85 年 3 AS '85 年 8 AS 
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エル ドラ ド 伝 奇 
өтү лық 
PC-8800 シ リー ズ ( テ ー プ / デ ィ ス ク 版 ) 
アキ ラ を 殺し た の は 誰 だ 1?0 ホシ ュ を 誘 
か いし だ 目的 は !? 君 は アキ ラ の 残し だ ビ 
デオ を 手 掛 り に , アマ ど ジン の 奥地 に 存在 す 
る と いう 黄金 の 都 エ ルド ラド へ 向っ た . 
テー プ 版 1 名 / デ ィ ス ク 版 2 名 


PiO 4 月 
Е (292 


【 当 選者 発表 】. 


坂本 昭彦 
宮城 県 桃生 群 大 森 良 彦 
京都 府 京都 市 


東京 都 東大 和 市 


* 商 品 到着 まで 1.、 


КУ. ааг ey Mima ГУ ань > Мы M 
Ай s. د‎ A . a a 


s À. W 


OREX 

PC-12 シ リー ズ で は , HEX$ が あり ませ 
ん きこ で 
プロ グラ ム を 48 バ イト (PC-125 シ リー ズ の 
リザ ー プ ブ ・ エ リア ) で 収め る た め , 16 進 数 
2 ケタ し か で きま せん が , 便利 だ と 思い ま 
す . 


使い 方 


耳 に 10 進 数 を 入れ て 。 サブ ルー チン を っ コ 
ー ル し ます . する t, H$ に 16 進 数 文字 列 
が 入り ます . 


アセ ドン ト š 


この プロ グラ ム を 作り まし た . 


エニ ックス , 日 本 ファ ルコ ム , マイ クロ デザ イン さん の 協力 に より の , 
抽選 で 16 名 の 読者 の 方 に 下記 の 区 製品 を プレ ゼン ト し ます . 


官製 ハガキ に 右 下 の シー ル を 貼り , 


055 34 01 


住所 ② 氏 名 年 齢 ⑱ 職 業 ま た 


は 学年 希望 の ソフ トウ ェ ア 名 称 (下記 で 紹介 し た ソフ ト の 中 か ら 1 


つ だ け ) を ハッ キリ と 記入 し て , 


レ ゼ ント ・ コ ー ナ 
号 で 行ない ます . 


ー 宛 に 送っ て くだ さい . 


6 月 7 日 (消印 有効 ) まで に PiO Z 
な お , 当選 発表 は PiO 8 月 


注 : 応募 シー ル の 貼っ て いな い ハ ガキ は 無効 に な り ま す . 


9 アス テカ 


(日 本 ファ ルコ ム ) Ұ7,200 
PC-8800 シ リー ズ (ディ スク 版 ) 

中 南米 は マヤ 地方 に 眠る “マヤ 文明 "は , 
現在 で も な な, その 全貌 を 明らか に は し て 
いな い …・ 

巨大 な 構想 の も と で 作ら れ た , 
険 小 説 シ リー ズ " 第 1 巻 ! 


コー ナー に し に, 
抽選 の 結果 , 次 の 12 名 の カカ 々 に ゲー ム ・ 


@Mr. ウ イン キー 


福岡 県 甘木 市 手嶋 康裕 
栃木 県 栃木 市 高野 広 茂 
鳥取 県 鳥取 市 田中 浩二 


2 週間 か か る 場合 が あり ます . あら か じ め ご 了承 くだ さい . 


“ETE 


多数 の 方 々 より ご 応 


⑥ ひ 任天堂 の ゴル フ 


(マイ クロ デザ イン ) Ұ980 
"ファ アミ コン ・ ゲ ー ム WW 攻略 法 レ リーズ" 
の 第 1 Н (= 7 ЖЕТІ, ファ ミリ サー 
コン ピュ ー タ 用 ゲー ム ・ カ ー ト リッ ジ “= 
м7" で の あら ゆる テク ニッ ク を 公開 し て 
бо; 
10% 


ファ ミコ ン ・ OE 1 


ERED. 


慕い た だ き あ り が と う ご 


У”?ЕРЖОН 0572773 


岡山 県 岡山 市 
埼玉 県 八潮 市 
佐賀 県 佐賀 市 
АЛПА 22 #6 
秋田 県 秋田 市 


笹原 勝彦 
石崎 浩二 
水木 由紀 夫 


EA SC NY apy alspa S? Iy р 


ОЕ 


“” 


DSO ジー С. 


D PA РУ, РУС РУ DI DI DI DIO DIO DI DIO DIO DIO DA DID IO DA ODO DD ЕУ 


Q) 2 — 3 番目 の 値 を タプ ログラム 先頭 番地 
+&2C1 

②20 一 21 番 目 の 値 を ゲロ グラ ム 先 頭 番地 
+&191 

@30—31# Ной 2 2 u L XS # hb 
+&201 

以上 の 作業 で 終わ b C+. 


最後 に 


48 バ イト 以内 で 4 ケタ の HEX の プロ グ 
CN меу, 
ШИ HEX$ 計 算 用 プロ グラ ム 


18882084169216406: 


718Ғ?379702: 


Сэ Ch O. 


374859587989205 
á40F 453407 
74072437 5FC460460: 


m r m m rm mm 


са Cn (0 O O 10 


m‏ سم م لم لم 


LHD ® O S Оо © 


са 5 U O T b 


— O. G 


PiO パ ザール _ 


ФРС-6042%ҰЗКС, 買っ て くれ た 人 に 


は 本 を 差し 上 げ ま す . 詳し く て は W〒 で ". 


また , CE-126P と の 変換 も I. 
Ф 253-01 高座 郡 寒川 町 岡田 2462 
青木 健二 


ФСЕ-155 (8K RAM) を \15K. 詳し く 
WFT. š 

® 37021 多野 郡 吉井 町 吉井 528 
黒沢 一 意 36% 


MIH, 付属 品 あ り ) 十 ゲー ム ・ カ ー 
トリ ッ ジ 2 本 十 本 1 冊 を \15 一 18K で 売り 
із; まず は 年 て . 
® 185 国分 寺 市 東 恋ヶ窪 2-5-8 

村上 博樹 


中 MZ-731 二 付属 品 キ マニ ュ ア ル 二 カバ 
-ки  ОН--/Уа4л?4у?Ж 
¥25KME, バラ 不可 、 МТТ. 
Ф 120 足立 区 綾瀬 5-13-19 

吉村 誠 


ФМ5 + ВАЅІС-І, Сғ”а7мғ”- 
ム ・ カ ー ト リッ ジ 3 本 十 ゲ ジョ イ パ ッ ド 十 
付属 品 を \38K, 37:РС-1350--Ұ2ОК と 
DXR, WT. 
Ф 352 新座 市 栗原 6-1-36 

桜井 Ak 


中 M5 十 BASIC-I キ ゲー ム ・ カ ー ト リッ 
ジ 10 本 キジ ョ イ パ ッ ド 2 つ 十 図 書 を 
\40K, PC-6001 填 PC-6006 圭 図書 を 
#25К. WTO. 
Ф 174 板橋 区 中 台 1-56-36 

吉沢 Ж 


Ф РС-6001тк П --РС-60М43--РС- 

DR330 + PB-100+ a # ¥75K © 6 v+. 価 

格 相談 可 . 送料 こち ら 6 持 ち . 希望 価格 を 

書い て W〒 で 、. 

240-01 三浦 郡 葉山 町 長柄 1642-209 
下田 宣弘 14% 


ФРВ-200(%1 9 b, E) --СЕ-2032 х2 
十 関連 図書 士 LSI ゲ ー ム を \6K で . 送料 
こち ら 持 ち も . まず は W〒 で . 
Ф 315 茨城 県 石岡 市 大 和 町 13965 

鈴木 秀一 


間 フ ァ ミ リー コン ピ ビ ピュー タオ ソフ ト ( プ 
ルフ )1 本 付 を 5K( 多 少 キ ズ 有 ). WT 
で 


Ф 326 栃木 県 足利 市 助 戸 新山 町 2305 
新島 博幸 16 歳 


まま PC-8001mkII + カラ ー デ ィ ス プレ イ 

セー ee が ペー ニー アル を 

\70K、 まず は 〒 で イ 

Ф 673 兵庫 県 明石 市 西新 町 1-21-5 
西尾 浩之 15% 


あま FX-700P+ プ ログ ラム ・ ラ イプ ラリ を 
\10K く らい . 詳し く は W〒 で . 
Ф 250 小田 原市 浜町 3-.1.38 スカ イマ 
ンション 402 

高瀬 宗 英 13 歳 


Ф М5јг. 十 BASICG 十 ジョ イス ティ ッ 
AFFERRI ニー ファ テ ネ リ サリー ペー シ 
ッ ク を ぎ 5K, PC-8801/8001 用 RF モジ ュ 


レー タ ҰТК, いずれ の 場合 も W〒 で . 


® 370-03 新 田 郡 新 田町 木崎 1022 
笹原 淳 17 歳 


ФРС-6001+РС-6006 + Ж + fF IE t, 22 26 


料 こ ちら 持ち で \25~30K。 まず は 〒 で . 


Ф 227 横浜 市 緑 区 在 田 町 434-1 第 二 
EHR 
柴田 修 19% 
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&PC-6001mkII + f Җа +PC-DR330+ 
関連 図書 二 カ モッ トビ ジョ ン 二 カセット 
2 本 ( 完 動 , 無 キ ズ , 送料 こち ら 6 持ち) を 
ғ ます 人 はず て. 
Ф 385 佐久 市 岩村 田 大 和 町 3258 

山崎 洋 


ФРС-1251 +СЕ-124+ В # М (95, ff 
属 品 付 ) を \15K (送料 込み )、〒 で 
@ 166 杉並 区 松ノ木 1-5-13 

木村 治彦 15 歳 


中 オモ ロマ ル チ ビ ジョ ン 十 カセ ッ ト を 
КС. 送料 は そちら 6 持ち . また は PC- 
1350 十 CE-202M 十 CE-124/ フ ァ ミ リー ュ 
ンピュータ と の 交換 可 。 W〒 で . 
PiO'85 年 4 月 号 を 半 0.35 一 0.4K で . 
Ф 241 横浜 市 旭 区 笹野 台 175 

菊池 淳也 136 


ФУІС-1001--16К КАМ--1211М-- デ 
ー タ ・ レ ュー ダ 十 本 十 カ シオ ワン キー ボ 
ー ド を ぎ \20K ぐ で らい で 

233 横浜 市 港南 区 下 永谷 615-9 
ДЕ $ 


Ф РС-1260 (新品 , Ж, Ж, Ж, 付属 品 
ff) +CE-124 を \15K で . 価 応談 . 
® 411 三島 市 光ヶ丘 1-4-8 

村松 茂樹 16 歳 


あま FM-7 用 ジョ イス ティ ッ ク (8 方 向 , + 

ンタ ー ス トッ プ , プレ イク , スペ ー ス ・ 

キー 対応 ) ғҰ5Қ, МТС, 

© 945 新潟 県 柏崎 市 桜木 町 26-14 
小野 塚 聖 一 


ФСЕ-202М%Ұ25К, WT. 
302 取手 市 新町 4-10-9 
中 村 健 太朗 


中 ファ ミリ ー ベ ご ベーシック を ぎ 8K. 送料 
こち ら 持 ち . МТТ, 
@ 930 富山 市 上 赤江 町 1-8-11-4 

古川 周治 16 歳 


үс 


RAZ VHF IF A4 
SM 3991 
+ Е -SK こし 
> 


FELT SAB) 


GEE 49. ak ビデ オ お 2 , 
T 450- 


1۱ 
# 19 8 ӘЖЕ zê p 


2 


ФРС-6001+РС-6006+РС-8050К + |834 
Е яе Е С) 


を で きれ ば ぎ 40K 以 上 (価格 は 相談 の 上 ). 


連絡 は 必ず W〒 で (希望 価格 , 必要 事項 

記入 ). 

Ф 567 大 阪 府 茨木 市 新堂 3-11-17 
脇坂 哲也 17 歳 


&$MZ-721(% = a 7 yv, 家庭 用 テレ ビ 接 
続 ケ ー ブ ル ) 十 関連 図書 3 冊 を 32K. 送 
料 こ ちら 持ち . THO. 
® 561 豊中 市 庄内 幸 町 4-11-7 

村田 £ 


ФРВ-300+ЕА-3+ K +AC7 57 Z Ж 
YT ТТ. 
Ф 791 松山 市 西垣 生 町 1351.3 

中 矢 誠 


まま レ ベル 3 マー ク I 圭 拡張 RAM カ ー ド 
+TV ア ダ プ タ (PC8044) #Y40K. シャ 


ー プ 12M-15B グ リー ン ・ モ ニタ ҰАК, 


いずれ も 新 同 . ж, 付属 品 付き . TT. 
Ф 567 大 阪 府 茨木 市 鮎川 3-25-28 
河野 茂 紀 19% 


昌 PC-1261( 新 品 ) 十 ソフ トウ ェ ア ・ ラ イ 
プ ブラリ #2320K € Gu. 
Ф 115 北 区 赤羽 西 6-33-10-307 

太田 勇一 15% 


Ф5С-1000П + 2 + > F(22— Z232— v 
二 モ ナ ュ GP) で きま 5K( ま だ 新しい )、W 


@ 370-35 群馬 郡 群馬 町 足 門 1361 
丸岡 Ж 15% 


まま PC-1350 填 カセット ・ イ インター フェイ 
ス ( 取 説 付 ) を 壮 20K ぐ 6 い . 多少 の 値 引 
š sf. まだ た PC-1402 と の 交換 も 可 . な る 
べく 手渡 し 希望 . 詳し く は W〒 で . 
Ф 146 大 田 区 久が原 5-20-6 

鈴木 守 一 


Ф РС-1500+СЕ-150+СЕ-151+СЕ-155 
+CE-156 十 関連 書 を \50K で . まだ は 
CE-515P 十 CE-202M と 交換 可 . 
Ф 229 相模 原市 相生 2-13-26 

ЖН ЖАР 


ФРС-1501--СЕ-150 を Y60K. PC-1245 
# ҰАК, РС-8001 2 ҰЗОК, すべ て 完 
動 。 まずは TEL 記 入 の 上 〒 ギ で. で きれ 
ば 手渡 し 希望 . 
Ф 277 東 葛飾 郡 沼南 町 高柳 1113-21 
宮 和久 14% 


まま PC-8001mk II + 付属 品 + キ ツン フト ・ カ 
バー( ビ ニー ル 製 ) を \48~50K. 完 動 , 
キズ な し , 送料 こち ら 持 ち 壮 50K な ら 十 
«сату WTA: 
電 259-11 伊勢 原市 上 粘 屋 1766 

大 津 裕史 15% 


あ PC-1245 十 ゲー ム ・ ウ ォ ッ チ 4 つ (破損 
は ある が 完 動 , 電池 な し) を \7K, MZ- 
700 用 ジョ イス ティ ッ ク (MZ-1X03) を 
ҰК (送料 こち ら 6 持ち ). TT. 返事 は 
決定 者 どけ に る せ て も らい ます 。. 

@ 487 愛知 県 春日 井 市 中 央 台 2-2-2 
226-402 

増田 博 


まま PV-1000 キ + ジョ イス ティ ッ ク 2 本 二 カ 
ー ト リッ ジ 3 本 (ワー ププ ワープ ,。 “А” 
“>, җ—^%— лу 5)+ 7 Z' 2 5. 
5К, 
Ф 571 門真 市 岸和田 912-13 

徳田 英樹 13% 


中 HHC-20 十 A と アダ プ タ 十 マニュアル を 
ЕЗІ) «еі 
@ 960 福島 市 腰 浜 21-17 

佐久 間 史 浩 13 歳 


ФРС-6001тк П 付属 品 を \32K, デー 
タレ コー ダ 二 説明 書 を 付け て \38K, 送 
料 は こち 6 持ち. キズ は な い , 汚れ が 少 
L. で きれ ば W〒 で . 
@ 721 福山 市 箕島 町 5816-80 

柴野 公 志 14 歳 


串 GP-500F を \ ぎ 21K で らい で . も ちろ ん 


Ж, ケー ブル , マニ ュ ア ル , 保証 書付 き . 


S59.7 月 に 購入 . 完 動 , 無 改造 , 新 同 , 
EC, 
Ф 227 横浜 市 縁 区 すす き 野 団地 3-22- 
303 

林田 Ж 166 


&$PC-6601+ffj&šm tA - uv a — Fg 


ナカ セッ ト 2 本 十 本 十 マ イク ロ ・ フ ロッ 
ビー を ぎ 90K. 送料 そちら 持ち . まず は 
WT. 
® 151 渋谷 区 本 町 6-36-1 

池谷 辰也 16 歳 


を PiO'84 年 5、 7, 9 月 号 ( 特 に 9 月 号 ) を 
各 \0.6K. まず は 〒 で . 
Ф 306 古河 市 本 町 1-4-59 

山岸 覚 16% 


¢ РС-1501--СЕ-150-- (CE-157/CE-156 
+CE-159) + fF Rt 2 ҰЗОК, 完 動 品 , 
キズ 不可 . まず は W〒 で . 
@ 386-13 上 田 市 五 加 897-4 

小林 Ж 16 歳 


1/O'83 年 12 月 号 \0.5K( 送 料 こ ちら 持 

b). МТС. 読め ゆれ ば キズ , s =u 

OK. 切り 抜き は 不可 . 

@ 240 横浜 市 保土ヶ谷 区 霞 台 145 
佐藤 Ж 


HAL か ロー タス の PCG (MZ-1200) を 
ぎ \10K 以 下 ( 送 料 込 )、W〒 で お 願い . 
Ф 330 大 宮 市 高 鼻 町 2-320 

川 人 基 弘 16 歳 


を る PC-1350 寺 カセット ・ イ ンタ ーー フェイ 
ス を 適 価 で . РІОП) |3), '844F4, 5, 9, 
11 月 号 を モッ ト Л 6%3К,‚, 273z 6 118 
ぎ 0.4K. PC の 方 は 希望 価格 を 書い て , 
PiO の 方 は 何 号 を 売っ て くれ る か を 書い 
TWTT. 両方 と も 送料 こち 6 持ち . 
© 511 Ф711 Ш1023-16 

Жай 5k 20% 


Ф JR-100 二 RF コン バー タオ デー タ ・ レ 

コー タダ を ぎ \18K で . まず は 〒 か W〒 で . 
ФУ 736 安芸 郡 海田 町 東海 田 5979-5 
米田 光輝 17% 


を FA-3 を る 3K, Z U > Z КТ. ж 

料 そ ちら 持ち . МТТ, 

© 939-01 西 砺 郡 福岡 町 副 岡 新 264 
懸 高 芳 和 13 歳 


ФРС-1500, FM-7/77 に 関す る 書籍 を 適 
価 に て 譲っ て くだ さい . 書名 ・ 定 価 ・ 希 
望 価格 ・ 電 話 番 号 を 書い て . 
® 341 三郷 市 早稲 田 5-22-22 

岩田 勝 博 


を る を PC 用 FDD, TF-20 お よび TEF-10 ど ち 
OT t. 当方 PC8001mk II 使用 \45 一 
55K 以 内 で . 
® 400 甲府 市 国母 4-12-7 

望月 健司 


@7 7 š )—a y a — Z #34—5K Ç. 
カセ ッ ト が あれ ば 半額 で 5 いで 買い ます . 
完 動 に 限る . キズ は 可 . 
а 610-01 城陽 市 寺田 尼 塚 68-207 

宮本 竜 郎 12 歳 


PC-8001mkII に 接続 可能 な 。 F > F 
ビッチ 0.39mm 以 下 で 14 型 か 15 型 の 2000 文 
字 カ ラー ディ スプ レイ を 30K で 買 ぅ . 
応談 可 . 送料 そちら 持ち . 〒 に 詳し く 書 
いて て だ さい 。 た だ も NB シャー デ グ , 
ニ デ コム , SONY に 限る . 
® 573-01 大 阪 府 枚方 市 藤阪 西町 6-2- 
404 

奥田 祐一 


Ф PC-8801mkII に 使え る デー タ ・ レ ュ 
ー ダ を ぎ 3K 前 後 で び 、 で きる だ け NEC の 
デー タ ・ レ ュー ダ ' を お 願い し ます . 
Ф 795 大 州 市 若宮 上 ノー 

藤 健司 


を PC-8001mk II 用 の ジョ イス ティ ッ ク , 
PiO'84 年 10 月 号 , 85 年 3 月 号 を 送料 込み 
で \ き 4 一 5K( ジ ョ イス ティ ッ ク の み の 場 
合 は , ЖҰБАСҰЗК), まず は 〒 で . 
電 509-31 岐阜 県 益田 郡 小坂 町 長瀬 57- 
1 

石丸 秀樹 16% 


piOBAZZAR 


$CE-126P を な る べく 安 〈. 完 動 な ら ば 
多少 の キズ は 可 . まず は W〒 で . 
Ф 431-11 浜松 市 湖東 町 1169-44 

ЖН Ж 21% 


J Ë - lcor 
RFG É 
ътт. 
JR-200+ RF 
121°-5 É Ick 

ANTS. 


Р:-85о кан 


EIME реда 
тсе орал 


СЕ ода る 


PC-60M43( ケ ー ブ ル 付 ) 完 動 ・ 美 品 を 
*27K, WT T. 
@ 431-02 浜名 郡 舞 阪 町 舞阪 4240-1 

FJ ЛЕН 15 歳 


@ 7 7 š J) —a Z z — Z # %6K pl F, 

カセ ッ ト を 現 価 の 半額 で 6 本 以下 . 両方 

絶対 に 完 動 品 で , きず は 多少 可 . 送料 を 

ちら 持ち . 

© 061-24 札幌 市 西区 手稲 星置 131-30 
梅田 雅章 12 歳 


人 ファミ リー コン ピュ ー タ を ぎ 6K 前 後 
С. 完 動 品 (ボタ ン , スイ ッ チ , コー ド 
の 接触 不良 は ダメ ) 5, Жі, 説明 書 な 


L, 多少 の キズ も OK. 送料 は ワリ カン . 


まず は 〒 で .。 いつ まで も 待つ . 
® 799-15 今治 市 旦 甲 130-2 
青野 英明 16 歳 


¢ PiO 85 年 2 月 号 を 0.5K で . また PC- 

6001 で 使え を る 4 マシ ン 語 の 本 を 半額 で . 

W〒 待 ち ま す . 

Ф 662 兵庫 県 西宮 市 高塚 町 2-22-305 
жан 


を ポケ コン ・ マ シン 語 入 門 を \1K. W 

т, 

Ф 515-22 
長井 博司 


三重 県 松阪 市 大 阿 坂町 805 


$PiO 84 年 8 一 10 月 号 を 各 \0.4K で . З 
š tó TZ GIKT. カモ ッ ト レ ー ベ 
ル な し , 多少 の 書き 込み 可 . 切り ね き 不 
а]. 送料 を ちら 持ち. МТТ, 
Ф 448 刈谷 市 今川 町 花 池 90-3 

岡田 邦 裕 


Ф СЕ-201М を \5K 以 下 で . 完 動 な 6 多 
少 の キズ は 可 . 
@ 655 神戸 市 垂水 区 千代 ヶ 丘 2-1-18- 
302 

宇野 英男 


$FM-NEW7+ 付 属 品 二 カラ ー モ ニタ 
(2000 字 以上 , 14 型 ) デー タ ・ レ ュー ダ ' 
を で きる だ け 安 〈 売 っ て くだ さい . 詳し 
《 は W〒 で . 
@ 975 原町 市 本 陣 前 2-69 

角島 正人 


人 MAX マシ ー ン 用 BASIC を 半 5K, セガ 
の BASIC Level3B を \5K, ゲー ム ROM 
LEKT., THO. 
Ф 591 堺 市 中 百舌 島町 4 丁 486 

南部 達也 22 歳 


を $ フ ァ ミ リー コン ピュ ー タ 付属 品 キ + ゲ 
ー ム ・ カ ー ト リッ ジ ( 何 本 で も OK) を \5 


~15К ( 完 動 )、 まず は 〒 で .. 

Ф 515-15 三重 県 飯南 郡 飯高 町 向 赤 桶 
2270 

中 西 ж 14& 


ФРІОП)-|3/% %Ұ0.6К, '84 年 4 一 6 月 号 

%Ұ0.5К, 7 一 9 月 号 を \0.4K( 切 り 抜き 

Жа, 書き 込み 可 ). まとめ て 売っ て 〈 

れる 場合 は 送料 こち ら 持 ち . 

® 028-21 下閉伊 郡 新 里村 茂 市 3-205-5 
野崎 聡 


ФРЅА, GB-20 (PC8001 用 ) な どの PCG 

相当 品 を 安く 売っ て て ださい. まず は 

WT G 

@ 520-05 

H1-5-12 
三輪 直樹 


Ф РС-1350 2 Y18K 以下 . 完 動 な ら ば キ 

Жез БЕЛЛТОКОК $ ТЕРТ 

で 

® 315 茨城 県 石岡 市 内地 2-11-12 
若山 広 光 


滋賀 県 滋賀 郡 志 質 町 小野 朝 


PiO'84 年 5 一 7。 11 月 号 を まとめ て \1. 

5K で らい で 買い ます (1 冊 \0.5K). まず 

(WFT. 

4480-11 愛知 郡 長 久手 町 上 川原 14-12 
池野 裕昭 15 歳 


Ф РСС-8200 を 完 動 無 改造 で , \12K く ら 
いで お 願い し ます . それ と , 284 年 11 月 号 
1/0 を \1K で (送料 込み )、 〒 を 待っ て い 
ЖЖ; ` 
@840 佐賀 市 神野 西 4-3-15 

進 武彦 18 歳 


PC-6006 を \8K 以 下 . 連結 は TEL 記 入 
е 
49270 千葉 県 松戸 市 大 谷口 743 新松戸 ハ 
ィ ッ 208 

四宮 Ж 16 歳 


Y 当方 …X1C (CZ801C/D) (t Ж, Ж, 

付属 品 , 箱 あ り ) ナ + ジョ イス ティ ッ ク (2 

トリ ガー) 十 関係 図書 

貴方 …PC-1350 二 CE-202M х2 +СЕ- 

515P +CE-130T +CE-124+ (CE-515M) 

+ デー タ ・ レ コ ュ コータ 取り に 来れ る 人 待 

っ て ます . W〒 で 連絡 し て くだ さい. 

Ф 661 兵庫 県 尼崎 市 南 武 摩 之 荘 6-3-1 
門脇 隆 成 17 歳 


靖 当 方 …PC-1255( マ ニュ アル 付 ),。S59, 

11 月 購入 士 CE-124 オ ポケ ュ コンマ シン 語 

入門 オッ フト ウェ ア 集 1 冊 十 Z 

貴方 …①PC-1350( 完 動 , マニ ュ ア ル 付 ) 

+ (ОРС-1251--СЕ-125 

Ф 246 横浜 市 瀬谷 区 阿久 和 町 4396 
鴨 井 和幸 16 歳 


@` J :-:56-1000П + カー トリ ッ ジ 3 本 

+ 付属 品 

貴方 ご ファ ミリ ー ュ ンピュータ オカ ー ト 
リッ ジ 1 本 十 付 属 品 

т, 520-02 大 津 市 本 堅田 1-2-25 
加藤 は じ め 


$Y 当 方 …PC-6022 
貴方 …① PC-PR401. © PC-6021. © 
СР-500М, ④\16K で 売る . TEL を 書い 
て 〒 か W〒 で . 
電 229 相模 原市 下 九 沢 1558 上 中 ノ 原 
団地 13-204 

真壁 Я 19% 


@:`⁄J-:JR-100+RF3z Z 2t— 2 +R 
貴方 …①PASOPIA/5/7. ②MULTTI8. 


③ PC-8001. (4) РС-6001--РС-6006, 5 
動 な ら キ ズ だ ら け で も 0OK. WFT. 


@ 320 宇都 宮 市 一 条 3-3-30 
ТЕ 英明 16 


形 当 方 …PC-6601 十 カートリッジ 2 本 十 o. 
貴方 …①PC-6001mkII 二 ディ スプ レイ 
FF = Z. г m— +a, @X1+ > 4 
х 764 +a. ӘЕМ-7+7 4 х 7 4 
キ デ ー タ ・ レ ュー ダ ог ディ スク. 
④ ぎ 80K 以 上 で 売る . 
@ 640 和歌 山 市 園部 872-7 

中 村 誠 吾 


形 当 方 …SG-1000 II, ( 新 同 , 完 動 ) + ff 
属 品 二 カー トリ ッ ジ 1 本 
貴方 … フ ァ ミ リー コン ピュ ー タ ( 完 動 な 
олжа), まず は W〒 で て で, 1 箇月 以内 
に 連絡 を (早い 者 勝ち ). 
Ф 144 大 田 区 南 六 郷 3-11-9 

須賀 信幸 14% 


Фи--РС-8801-7-Л.5а2-2- 

カシ オ PT-20 十 LSI ゲ ー ム 3 個 

貴方 …PC6601SR. 〒 で 連絡 し て . 

Ф 321-43 真岡 市 並木 町 3.24-8 
HARA 17% 


部 当 方 …PB-700+ 付 属 品 一 式 +OR-4+ 
関連 図書 1 冊 

#2 --РС-1350+ а, また は ぎ 25K 以 上 で 
売る 。〒 ま た は W〒 に て 連絡 待つ . 

Ф 567 大 阪 府 茨木 市 橋 の 内 1-5-2 Ж 
ЖЕ 

大 森 % 20% 


ФІ>--РВ-410-2472/У1, 
(S60. 1. 7 購入 ) 
貴方 …①PC-1251. ОРС-1245, @*10K. 
PC-1251 の 場合 , \1K 追 加 し ます . まず 
は W〒 で 待っ て ます. 
Ф 360 熊谷 市 東 別 府 308-1 

強 瀬 仁志 16% 


Y 当方 …①MZ-2000 二 GRAM I, П, 
HI. ②PC-6601 ( 完 動 , 付属 品 一 式 あ b, 
保障 書 あ り ) + 関連 図書 +e. 
貴方 …①PC-6001mk II 二 デ ー タ ・ レ ュ 
— 8° +Ж30К+а. @FM-7/NEW7+ F 
ー タ ・ レ ュー ダ +ж20К+а. (92 0% 
の マイ コン gw. ④① は ぎ 80K 以 上 , © 
は ぎ 70 人 KK 以上 で 売る . МТТ / 
Ф” 640 和歌 山 市 園部 872-7 

中 村 誠 吾 16 歳 


移 当 方 …JR-200 キ デー タ ・ レ ュー ダ 
(RQ-8300) + 関連 図書 +\ 
貴方 …①PC-8001. @PC6001mkII. © 
MZ-80B. ④ ペ ベー シッ クマ スタ ー レ ベル 
Шт - 25 or 2. @ ЕР-1100, © 
PASOPIA5 ог 7.⑦MULT8. Ұл に 
つい て は 話し 合っ て 決め る . МТС 
つま で も 待つ . 
8 480-03 春日 井 市 神 屋 町 280 

倉知 克 仁 


Y 当方 …PC-1245(S. 60.3 月 購入 ) まだ 
は \ ぎ 5 一 6K で 売り ます . 
貴方 … フ ァ ミ リー ベー シッ ク . まだ は 
\5K で 買い ます . МТТ, 
® 985 多賀 城市 伝 上 山 3-24-8 

山田 ін 15% 


Y 当方 …PC-1251 二 CE-125 十 み 
貴方 …PC-1350 or PC-1261. 送料 こち 
61 t. まず は W〒 で . これ に 載っ て 
か ら 3 週間 ほど 待ち ます . 
Ф 500 岐阜 市 加納 本 町 6-35 

宮嶋 [Е 


ме. = 
SAR ер (аур 
44 75 --РСбооімк +02311 
=< 422% Е 
、 T6OKGC6€b zU 
A H- Pc-9%o1ukI model 20 
1% +h5-€=2+?| 
Сежтәжааы ат.) 


v 


Dd сер 
PEJ 4 5—4 


Y > H --‘PB-700 (付属 品 一 式 , 844F12 月 
ША, キズ 無 ) +OR-4(4KB RAM) 十 お 
も し ろ ゲ ー ム [3 け PB- FAN BOOKSI], 
貴方 …PC-1350 十 CE-124. 詳し く は 〒 で 
お 願い し ます . 
@ 274 千葉 県 船橋 市 松 ヶ 丘 5-6-8 

高沢 英 一 


$ 5 :-.РС-1500+ 18 а +Ж5К +151 
ゲー ム 7 種 類 
貴方 …PC-1350 十 付属 品 . 詳し く は 〒 で . 
送料 は こち ら 6 持ち . 
® 156 世田谷 区 上 北沢 5-48-64 

石川 公治 14 歳 


疹 当方 … エ ポッ ク ・ カ セッ トビ ジョ ン 
Jr. 士 カセット (アス トロ コマ ンド ). 
貴方 …CE-124. 早い 方 優先 な る べく 
近県 の 方 希望 . まず は 〒 で . 
272 市 川 市 大 町 124-2-145 

秋山 隆 14% 


疹 当方 …PC-8001+TV ア ダ プ タ 二 付属 
m +PB-100+ a ў 
貴方 …FP-1100†TV ア ダ プ ター 付属 品 
Ф 605 京都 市 東山 区 今 熊野 南 日 吉 町 
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КР 淳 16 歳 


疹 当方 …PC-6001mk II SR 十 PC-60M43 
(15 色 対応 , RGB デ ィ ス プレ イ ) 十 ジョ 
イス ティ ッ ク 二 g み ( だ だ し マニ ュ ア ル は 
な し ) 
貴方 …MZ-1500 十 付属 品 他 .W〒 で . 
т 440 豊橋 市 柱 2 番 町 243-1 

伊藤 彰 記 


塊 当 方 … フ ァ ミ リー コン ピュ ー タ ( 完 動 , 
箱 ) 十 カセット 15 本 十 PC-1246 十 Z 
貴方 …①PC-1501+RAM8KB 以 上 / 
Ұ12К, ② PC-1500 +CE-161/CE-159 + 
СЕ-156/РС-1255/РС-1251/Ұ17К, @ 
РС-1255--Ұ19К, ④ ぎ 36.5K で 売る . Т 
で いつ まで も 待つ . 

Ф185 国分寺 市 東 恋 ヶ 和 窪 6-5-14 


ЕК ж 146 


編集 後記 


一 新 学 期 が 始ま っ て , も うぅ 1 人 箇月 た ち ま し だ 。 な に か と ょ と 慌 た だ し 
か っ た 毎日 に も , や っ と 落ち 着き が 戻っ て きた よう で す . 新 1 年 
生 の 皆さん も , 学校 や 会 社 な どの 新しい 場所 に 慣れ て , そろ そろ 
ギン 6 と を 会 問 は し よう あか な ど ЕЖАТСАСЕТІМ22Ж 
張っ て くだ さる いね. 

ST, 我 が PiO 編 集 部 に も 新しい メン バー が 加わ b, これ か G 
が エン ジン 全開 の 季節 . 今 ま で の 内 容 に , さら に 新 し る を 加え , 
フレ ッシュ な 企画 を 皆さん に お 届け し だ た いと 思っ て いま す の で , 


これ か ら も よろ し く お 願 いし ます . (O) 
・ フ バー ジョ ン に 狂っ て いま す . 


ШЕСНО 0 2 > Zx; の ロン グダグダ 
最近 は リミックス ・ プ パー ジョ ン が 流行 の よう で すね .。. 今月 の ソノ 
シー ト の BGM も リミックス で いこ うと 思っ て い だ た の で す が , 時 
1921547, 先月 と 同じ も の に な っ て し まい まし た だ . 来 月 は し っ 
か り 曲 を 作り ます の で , どう か お 許し を … 

と ころ で 。 今月 号 の ソノ シー ト に ポケ コン の プロ グラ ム を 初め 
て 収録 し まし だ . PC-1260/61 を お 持ち の 皆さん は 必 ら ず ロ ー ド 
し て みて くだ る さい. 成功 の 報告 を 待っ て いま す . (key) 
一 最近 市 販 ゲ ー ム で 流行 っ て いる こと と いえ ば , 今 ま で は 違う 分 
野 の ゲー ム と いわ れ て きだ も の を 1 つ に まとめ る こと (だ と えば 
リア ル タ イ ム 型 ロー ルレ イン グ ・ ゲ ー ム と か 。 ロー ルレ イン 
グ の 要素 を 加え だ も の と か ). で も , シ ュー ティ ング ・ ゲ ー ム に アド 
ベン チャ ー 的 要素 を 加え を だ も の は あっ て も , ロー ルプ レイ ング 的 
要素 を 加 を だ シュー ティ ング ・ ゲ ー ム ( 敵 を 倒せ ば 倒す ほど 自分 
が 強く な っ て いく よう な ) は 見 当たり ませ ん ね ぇ . 誰 で も が すぐ で ぐ 


(お 詫び と 訂正 ) 


に 考え 付き そう な の に …。 私 と し て は , ゲー ム の スト リー な ど に 
oT Iž OME (これ が だ ぶん 一 番 難 し いと は 思い ます が ), な 
か な か 面白 く な る ん じゃ な いか な , と 思う の で す が …. (V) 
一 新入 社員 の “b” C+. PiO 編 集 部 に 入っ て や っ と 1 週間 が た 
ち ま し た が , 雑誌 を 作っ て いる と いう 実感 が あま り 感 じ ら れ ませ 
А, 仕事 に 慣れ て いな い の と , 仕事 が 忙し く て 朝 (E?) 起き だ 
ら 会 社 に 出社 し , 夜 ア パー ト に 帰っ て 来 た ら 寝る と いう 生活 を 繰 
り 返 し て いる せい だ と は 思う の で す が , ふと 目 を 覚ます と , 実は 
まだ 学生 で プロ グラ ム の デバ バッグ の 最 中 に 居眠り を し て い だ だ け 
だ っ た だ た り し て (暗い /). こ の 疑問 も この 原稿 が 活字 に な る 6 月 号 
が 発売 さき れれ ば は っ きり する の で す が . 早く PiIO な エディ ター に 
な れる よう 頑張 り ま す の で , よろ し くく お願い し ます . (Ti) 
画 今 年 も 野球 の シー ズン が 始ま り ま し た . 昨年 は 2 回 し か 観戦 で 
き な く , 忙し き の あ まり 興味 も 半減 し , 最悪 の シー ズン で した. 
今年 は 夜中 に ビデ オォ を 観 な が ら , お いし い ビ ー ル で も 飲も うと 思 
つの て も * а 8 (Shu) 
画風 区 を ひい だ た だ ら , それ が 原因 で 花粉 定 に な っ て し まっ だ よう で 
す . 1 箇月 以上 も る 鼻水, くし ゃ み , の どの 痛み が 続き まし た . < 
し ゃ み が 出 を そう で 出 な いと き は , 光 に 顔 を 向け て くし ゃ み を 出し 
で て も まう も きっ ば し まま を (Y2) 
画 新 し い ク ラス , 新しい 職場 , 新しい 環境 …… . そろ そろ 慣れ だ 
ころ で すか ? 5 月 病 な ど と いう 言葉 も 聞か れ ま す が , 皆さん は 
大 丈夫 で し ょ うか (も っ と も , 1 年 中 病気 の 人 も いま す が ). 


PiO 85 年 5 月 号 に 掲載 の FP-1100 用 「7 なら で 」 の 記事 は , 電波 新聞 社 発行 の 月 刊 マ イ a. ДЕРЕ な ЖЕН ら ベ ゲー ム 」 の 記事 を 参考 引用 し 
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編集 部 の チェ ッ ク 不 足 に より , 原作 者 , 電波 新聞 社 な ら び に 読者 各位 に 御 迷惑 を な むか けし まし た . 
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④ 郵 便 振替 《 東 京 5-22510》 

裏 の 通信 欄 に , 必ず PiO 何 月 号 ガ ら ご 希望 明記 し て ぐだ さい . 
омеа 
③ 定 額 小 為替 

※ 必 ず の ー③ の 方 法 で ご 送金 くだ さい . 

(1,000 円 以上 の 切手 代用 は ご 遠慮 願い ます ) 


ны ua 
を 同封 し て くだ さい 


昭和 60 年 6 月 1 日 発行 (毎月 1 回 1 日 発行 ) 
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ぜん らく ビル 5F 


кене а” 


у" ШШЕ Л ШС ЕЕ? ымдарды ж: 


TOHO CINEFILE-SOFT LIBRARY 


SOFTWARE( き ) 


CINEMATIC 


зер 


у? аы н hy 


ж +» А 
аа + 
w è 


純一 まい っ た 、 ま いっ た 。 何 て いう マッ プ 
な ん だ 「 二 層 構 造 と いう か 、 二 階 建 て と いう 
か 、 こ ん な の 初め て 見 た よ 

新宿 の 街 に 取材 に 行っ て 原画 を お こし 


た っ て 聞い た けど 、 絵 も り リア ル よ ね 。 
Ш- ЗА, 歩道 橋 を 上 っ て 、 下 り て 、 ま た 


上 っ て 。 新宿 の 雰囲気 が 実に 良く で て いる 。 

グラ フィ ッ ク も メチ ャ 速い !「 ねえ 、 画 
面 の 左右 に 四 人 の 顔 が 出 て いる けど 、 こ れ は 
どう いう 意味 な の ? 
純一 第 三 部 の 新宿 人 篇 で は 、 マ ル チ プ レイ ・ 
アド ベン チャ ー と 言っ て 、 四 人 の 人 物 を 同時 
に 動か し て ゲー ム を 進め る ん だ 。 

t. 左側 の 二 人 に は 、NAOKO、 
MAK I っ て 書か れ て る けど 、 右 に は な いわ ? 
純一 マル チ プ レイ ・ ア ドド ベンチャー が スタ 
ー ト する の は 、 牧 た ち が 林 田 研究 所 に 着い て 、 
林田 博士 か ら 連 絡 用 の トラ ン シ ー バ ー を 渡さ 
れ て か ら な ん だ 。 今 は 、 ま だ 研究 所 の ドア の 
前 だ か ら 、 牧 と 、 そ れ か ら 一 緒 に いる 尚子 の 
名 前 だ け を 表示 し て いる ん だ 。 

じゃ あ 、 右 の 二 人 は いっ た い 誰 な の ? 
純一 林田 博士 と 、 助 手 の 宏 クン さ 。 

きっ と 博士 た ち は 中 に いる の ね 。 よー 
し 、 IN" で 研究 所 に 入っ た わ 。 
純一 お っ と 、【HIT АМҮ KEY) と 
CEE ペー スッ パー 介し C Z k o 

何 か 長 い メ ッ セ ー ジ が 出 た わ 。 な ーー る 
ほど 、 ナ ル 赤 ド 。 こ こ で トト ランシー パー を も 
ら う の ね 。 あ 、 画 面 の 右 下 に ある オジ サン 顔 
の 寺 に HAYAS 1 DA と 者 前 が 由 た わ 。 で 
ЕЕ о 
純一 それ は ね 、 マ ル チ プ レイ が スタ ー ト す 


画面 の 中 に いる 人 の 名 前 だ けが 表示 さ 
れる ん だ 。 
そ 一 か ! 宏 さん は 林田 研究 所 に は いな 


い の ね 。 一体 どこ に いる の か し ら 。 

R= シフ ト ・ キ ー を 押し な が ら 、f・1 キ ー、 

それ か ら f・4 キ ー を 押し て ご らん 。 
STATUS “НЕКЕСІ”. US 


ー ン ・ キ ー を 押し た ら 絵 が 変わ っ た わ 。 
純一 この STATUS と いう コマ ンド は 、 
四 人 の 登場 人 物 が 今 ど こ に いて 、 何 を 持っ て 
いる か を 、 確 か め る た め の 命 令 な ん だ 。 
じゃ あ 、 因 ぎん は 今 、 セ イプ シン ジュ 
クエ キ に いる わけ か 。 画面 を 見 る と 、 右 上 の 
宏 さ ん の 顔 の 下 に HIRO S | っ て 名 前 が 表 
示さ れ て 、 尚 子 と 博士 の 名 前 が 消え て 、 あ れ 
っ 、 牧 さん の “MAKI” が 赤く な っ て る わ 。 
純一 いま 、 宏 の こと を 調べ た か ら 、“HIR 
0617 が 自 で 表示 あれ た ん だ MAIK ま パ 
が 赤く な る の は 、 宏 の こと を 調べ た の が 牧 だ 、 
と いう 事 を し て いき ん だ 。 
いつ 、 牧 さん が 調べ る っ て 決ま ろ た の ? 
純一 カー ソル を 見 て ご らん 。 
МАК!:Ш 
と な っ て いる だ ろ 。 со MAKI U & 
語 で いう 主語 みた いな も の で ね 。 
ОТЕ 1 
MAKT: STATUS: HIROSI 
っ て いう コマ ンド は が に EL STATU 
S と いう 命令 を し て いる わけ ね ! 英語 の 命令 
ёо < U) Ë SZ I 6 ВБА MAKI 
か ら 他 の 人 に 「 主 語 」 を 移せ る ん で し ょ 。 
純一 それ に は CALL” と いう 動詞 を 使 
АУ. 
MAKI:CALL 
A JD 6 = Z 
ウソ っ ! メッ セー ジ が 女 言葉 に な っ た ! 
純一 は は は ! ひび ひひ Il 


NAOKO 


МЕМУЕЛЕ GE 


で 東宝 ・ 東 宝 映画 


画 適 応 機種 


x WSA CGO. 

МАОКО:Ш 
に 変わ っ た ね わ ね わ よ 。 
H= aaant део 1 コレ デ STAT 
US” と CALL" の 合い 方 は わか っ た ネ 。 
人 名 や 特殊 な 動詞 は 、 フ ァ ン クシ ョ ン ・ キ ー 
に 入っ て いる か ら 、 利 用 する と 便利 デス 。 

マル チ プ レイ の コマ ンド は 良く わか っ 
た けど 、 ど うい うぶ ふう に 使い 分 ける の 7 


バー カ 。 カーソル が 、 


W Cy < т 
Бан ЕТ 
割 を 持っ て いる こ 


純一 ゲー ム を 進め て いく と 、 
は 出来 な い 事 、 尚 子 が いる 
それ ぞ れ の 人 物 が 、 あ る 役 
ETA AT, 
ロー ルプ レイ ング ・ ゲ ー ム で よく 、「 知 
性 」 と か 「 戦 闘 能 力 」 と か 言う けど 、 そ れ に 
似 て いる と 考え て いい の か し ら ? 
純一 スル ドイ っ っ! マルチプレイ ・ ア ド ベ ン 
ー は 、 ロ ー ル プ ブレイ と アド ベン チャ ー を 
うま く 骨 合 きせ た ゲー ム な ん だ 。 を に か く 、 
新宿 の 街 に は ゴジ ラ っ て いう も の すご い 怪 澤 
が いる わけ だ し 、 そ れ に 加え て 、 自 邊 隊 は ス 
ー メ バー X Есш Y Ç Sb. ZEEE 
(34855 2`( THESE í JU 83859 DD. а 
ん で も な い 大 騒ぎ が も ちあ が っ て いる わけ だ 。 
そん な 中 で 果敢 に 生き ぬい て いく に は 、 と て 
も 一 人 の 力 じ ゃ か な わな い 。 四 人 総 が か り で 
ぶつ か る 事 が 必要 な ん だ 。 


Ггпем GODZILLA; oT., Ж 
激 な ゲー ム な ん だ わ ね 。 
純一 過激 も 過激 、 過 激 プ レイ ・ ア ド ベ ンチ 
ー な の だ 「! 


一 申し 込み 先 


ено оа 〒100 東 京都 千代 田 区 有楽 町 1-2-1 
8 東宝 (株 ) 事 業 部 
TEDIN パソ コン ・ ゲ ー ム ソフ ト 係 
5” 2D/2 枚 組 ; 
E500 TEL. 03 (591) 4557 


ブル ッ ゥ から バラ 色 ま て 、 あ の 
娘 の 気分 は 不 規則 変化 の グラ 
デー ショ ン 。 女心 の 微妙 る きみ た 
いな も の に 、 僕 、 そ ろ そ ろ 気 付き 
始め て る 。 を ん な 世代 の た め に 、 
PC-6001mkHSR は 15 色 の 高 
度 な グラ フィ ッ ク 機 能 で 登場 。 
640X200 ド ッ ト (15 色 中 4 色 )、 
320X200 ド ッ ト (15 色 ) の 繊細 
な 表現 で て 、 彼女 の 心 の 色 を 映 
Чо 52422122422. 


+ МЇ 
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@ PC-6000 シ リー ズ か ら 継 承 
し た 豊富 な ソフ トウ ェ ア 

人 @ 強 力 な N66SR-BASIC 

@ 2 オク ター フ の 音声 合成 機能 

@FM 音 源 デ ジ タ レ シン セ 内 蔵 

01024 字 の 漢字 ROM 
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あ 
の 
IR 
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3 ч 
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ALC バ ー ソ ナル コン ピュ ー タ PC-6000 ミ リー ズ ~ 
マーク 
HA 
PC-600ImkllbR 
О 本 体 標準 価格 89,8003 
тЫ PC-2000 ヨ リー ズ 50 PC 600 ткП / "59 РС 6001 ткз / 5292 РС-6601.2%%РС-660ізв 
向 性 HE は E ト を や る いす る 。 KeoPC-800ImwHsn / PC-8200 コ リー スズ t*% PC-8801mullsn / PC-I002)U—2` 


Ө МЕСО YV Z7”1— коже PC-98OIE/ 628%° PC-98OIE, $° PC-98OIM / №200 en OST 


日 本 電気 グレ ルー プ NEC パ ソコ ン イ ン フ ォ メ ーション セン ター 〒108 東京 都 港 区 三田 三 丁目 14-10( 明 治 生命 三田 ビル ) 谷 (03)452-8000 ※ 電 話 番号 は 、 よ く お 確か めのう え お か (だ さい , 


ЖЕЕБ17673-6 
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